Tekil Mesaj gösterimi
Alt 27 Ocak 2015, 23:16   #2
No_FeaR
 
No_FeaR - ait Kullanıcı Resmi (Avatar)
 
Ü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
Standart Cevap: Cycle'lere Radyo Dinletmek

Toprak Nickli Üyeden Alıntı Mesajı göster
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
  }  
}
Cyclenize eklemek için;


Örn;

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

Helal Olsun : )
 No_FeaR isimli Üye şimdilik offline konumundadır   Alıntı