![]() |
|
|
|
#1 |
|
Bir umuttur yaşamak
![]() ![]()
Üyelik tarihi: 09 Eylül 1991
Bulunduğu yer: Konya Mesajlar: 323 WEB Sitesi: https://www.teklan.com.tr/ IRC Sunucusu: irc.teklan.com.tr İlgi Alanı: mIRC Scripting Alınan Beğeni: 211 |
Merhaba,
Bir arkadaşın isteği üzerine yazmıştım baya oldu yeni paylaşmak aklıma geldi =) Sunucusunda cycle bot kullanan arkadaşların işine yarıyabilir. Yapamayan olursa PM atsın yardımcı olabilirim. Kod:
on *:sockopen:radyoc*:{
if ($sockerr > 0) { sockclose $sockname | returnex }
sw $sockname CONNECT RadyoIP:RadyoPORT $+(HTTP/1.1,$CRLF,$CRLF)
}
on *:sockread:radyoc*:{
var %;rdin | sockread %;rdin | tokenize 32 %;rdin
if ($gettok(%;rdin,1-2,32) == HTTP/1.0 200) || ($gettok(%;rdin,1-2,32) == HTTP/1.1 200) {
sockwrite -nt $sockname GET /;*.nsv HTTP/1.1
sockwrite -nt $sockname Host: $sock($sockname).addr
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Accept-Encoding: identity;q=1, *;q=0
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/39.0.2171.95 Safari/537.36
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
sockwrite -nt $sockname Range: bytes=0-
sockwrite -nt $sockname $crlf
}
}
Örn; Kod:
var %:rnd $+($md5($ticks),$r(10,999)) .sockopen $+(radyoc,%:rnd) IP PORT ![]() Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.
|
|
|
Alıntı
|
|
|
#2 |
![]()
Üyelik tarihi: 27 Ocak 2015
Bulunduğu yer: Denizli Mesajlar: 136 WEB Sitesi: www.AlemTR.com IRC Sunucusu: www.AlemTR.com İlgi Alanı: Alınan Beğeni: 69 |
Merhaba,
Bir arkadaşın isteği üzerine yazmıştım baya oldu yeni paylaşmak aklıma geldi =) Sunucusunda cycle bot kullanan arkadaşların işine yarıyabilir. Yapamayan olursa PM atsın yardımcı olabilirim. Kod:
on *:sockopen:radyoc*:{
if ($sockerr > 0) { sockclose $sockname | returnex }
sw $sockname CONNECT RadyoIP:RadyoPORT $+(HTTP/1.1,$CRLF,$CRLF)
}
on *:sockread:radyoc*:{
var %;rdin | sockread %;rdin | tokenize 32 %;rdin
if ($gettok(%;rdin,1-2,32) == HTTP/1.0 200) || ($gettok(%;rdin,1-2,32) == HTTP/1.1 200) {
sockwrite -nt $sockname GET /;*.nsv HTTP/1.1
sockwrite -nt $sockname Host: $sock($sockname).addr
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Accept-Encoding: identity;q=1, *;q=0
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/39.0.2171.95 Safari/537.36
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
sockwrite -nt $sockname Range: bytes=0-
sockwrite -nt $sockname $crlf
}
}
Örn; Kod:
var %:rnd $+($md5($ticks),$r(10,999)) .sockopen $+(radyoc,%:rnd) IP PORT Helal Olsun : ) |
|
|
Alıntı
|
| Etiketler |
| cyclelere, dinletmek, radyo |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
|
|
Benzer Konular
|
||||
| Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
| Cycle Socket Proxy Bot | Code | mIRC/Socket Botlar | 2 | 28 Aralık 2017 01:14 |
| Proxy cycle sistemi | Return | Hazır Kodlar | 0 | 28 Eylül 2015 22:00 |
| Cycle Botları Konuşturmak / Edit | No_FeaR | TCL Scriptler | 0 | 26 Temmuz 2015 04:36 |
| Cycle (Sorunsuz) | No_FeaR | Eggdrop, BNC ve Socket Botlar | 2 | 26 Mart 2015 15:04 |
| Radyo !Yes !No !İstek TCL | No_FeaR | TCL Scriptler | 0 | 23 Mart 2015 17:59 |