ShoutCast (Radyo) BilgiLeri Gösterici - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SCouNDReL · 23 Ocak 2006, 02:16

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

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

kuLLanIm : /radyo ip(server) port
Not : http:// YazmanIza Gerek Yok

Addonun Benzeri Forumda Vardı ama Daha AyrıntıLı Yapayım Dedim Umarım İşinize Yarar..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Radyo bot TCL (Shoutcast v2)	ByOzCaN	TCL Scriptler	4	10 Ağustos 2020 13:24
Shoutcast radyo recoder/player	IrCbaStarD	mIRC Scripting Hazır Kodlar	10	18 Ağustos 2017 02:23
ShoutCast Radyo yayını hakkında	h4run	Servisler	4	08 Haziran 2008 23:48
Radyo Bilgi Gösterici..	JaMMaH	mIRC Scripting Hazır Kodlar	11	07 Aralık 2007 00:23
ShoutCast Radyo Yardım(bot)	By_ReBeL	mIRC Scripting Sorunları	0	24 Eylül 2007 20:51

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.