IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

PHP- Kodu:
   alias radyo {  
  if ($1 == $null) { echo -a Radyo Adı Yazın (Örn : radyo.turkcoders.com:2525) | halt }   
  if (: isin $1) {  
    tokenize 58 $1   
    sockopen radyo $1 $2  
    set %site $1 $2  
  }  
  else { sockopen radyo $1- | set %site $1- }  
}  
on *:SockOpen:radyo:{  
  if ($sockerr > 0) return     
  sockwrite -tn $sockname GET / HTTP/1.1  
  sockwrite -tn $sockname $crlf  
}  
on *:Sockread:radyo:{  
  if ($sockerr > 0) return     
  sockread %radyo  
  if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) }  
  if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) }   
  if (icy-url isin %radyo) {  set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url:) | sockclose radyo | radyo2 }  
}  
on *:Sockclose:radyo:radyo2  
alias radyo2 { sockopen radyo2 %site | unset %site }  
on *:SockOpen:radyo2:{  
  if ($sockerr > 0) return     
  sockwrite -tn $sockname GET /7.html HTTP/1.0  
  sockwrite -tn $sockname User-Agent: Mozilla  
  sockwrite -tn $sockname  
}  
on *:Sockread:radyo2:{  
  if ($sockerr > 0) return     
  var %z  
  sockread %z  
}  
on *:SockClose:radyo2:{   
  sockread -f %radyo  
  var %z $remove(%radyo,<HTML><meta http-equiv="Pragma" content="no-cache"></head><body>,</body> 
<!-- Mirrored from 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.mIRCFox.Com/.?sayfa=dokuman_oku&id=54 by HTTrack Website Copier/3.x [XR&CO2006], Wed, 25 Oct 2006 17:57:19 GMT --> 
</html>)  
  var %i $numtok(%z,44)  
  while %i {  
    set %radyo2 %radyo2 ¿ $gettok(%z,%i,44)  
    dec %i  
  }  
  tokenize 168 %radyo2  
  gostert  
  unset %radyo2  
  unset %radyo  
}  
alias -l gostert {  
  tokenize 191 %radyo2  
  ; $1 = Dj in Yazdığı İsim  
  ; $2 = Genre  
  ; $3 = URL  
  ; $4 = ÇaLan Parça  
  ; $5 = Şarkı Kalitesi  
  ; $6 = Dinleyici Sayısı  
  ; $7 = Max. Dinleyici Sayısı  
  ; $8 & $9 = DinLeyici Rekoru  
  ; $10 = Ne oLduunu biLmiOm   
  echo -a İsim : $1  
  echo -a Genre : $2  
  echo -a URL : $3  
  echo -a ÇaLan Parça : $4  
  echo -a Şarkı KaLiteSi : $5  
  echo -a DinLeyici Sayısı : $6  
  echo -a Max. Dinleyici Sayısı : $7  
  echo -a DinLeyici Rekoru : $8 & $9  
}
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]