Cycle'lere Radyo Dinletmek

[Toprak]

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.

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;

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