[Toprak]

Merhaba,
Bir arkadaşın isteği üzerine yazmıştım baya oldu yeni paylaşmak aklıma geldi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Sunucusunda cycle bot kullanan arkadaşların işine yarıyabilir.
Yapamayan olursa PM atsın yardımcı olabilirim.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

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
  }  
}

Cyclenize eklemek için;


Örn;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

var %:rnd $+($md5($ticks),$r(10,999))
  .sockopen $+(radyoc,%:rnd) IP PORT