04 Mayıs 2021, 19:54 | #1 |
Radyo Kodu Gelişmiş
- alias radyo {
sockclose radyo*S sockclose radyo*J if (: !isin $1) && (!$2) { echo -a 1453 | return } if ($1 == $null) { echo -a 38.99.21.22 | return } if (: isin $1) { tokenize 58 $remove($1,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) sockopen $+(radyo,$r(1,9999),S) $1 $2 set %site $1 $2 } else { sockopen $+(radyo,$r(1,999),!) $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | set %site $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) } } on *:SockOpen:radyo*S:{ if ($sockerr) { msg #Radyo 0,6 Radyomuz ?u anda kapaly | return } sockwrite -tn $sockname GET / HTTP/1.1 sockwrite -tn $sockname $crlf } on *:Sockread:radyo*S:{ sockread %radyo if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) } if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) } if (icy-url isin %radyo) { set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url:) | sockclose radyo | radyo2 } } on *:Sockclose:radyo*S:radyo2 alias radyo2 { sockopen $+(radyo,$r(1,9999),J) %site | unset %site } on *:SockOpen:radyo*J:{ if ($sockerr) { msg #Radyo 0,6 Radyomuz ?u anda kapaly } sockwrite -tn $sockname GET /7.html HTTP/1.0 sockwrite -tn $sockname User-Agent: Mozilla sockwrite -tn $sockname } on *:Sockread:radyo*J:{ if ($sockerr) { msg #Radyo 0,4 Yayyn Offline | return } var %z sockread %z } on *:SockClose:radyo*J:{ sockread -f %radyo var %z $remove(%radyo,,) var %i $numtok(%z,44) while %i { set %radyo2 %radyo2 ¿ $remove($gettok(%z,%i,44),|) dec %i } gostert unset %radyo2 unset %radyo } alias -l gostert { sockclose radyo*S sockclose radyo*J tokenize 191 %radyo2 ; $1 = Dj in Yazdy?y Ysim ; $2 = Genre ; $3 = URL ; $4 = ÇaLan Parça ; $5 = ?arky Kalitesi ; $6 = Dinleyici Sayysy ; $7 = Max. Dinleyici Sayysy ; $8 & $9 = DinLeyici Rekoru msg #Radyo 0,13 - 0,6 $1 0,13 - 0,14 ?u anda yayynda. 0,13 - 0,13 - 0,6 Radyoda, 0,13 - 0,13 - 0,14 $4 0,13 - 0,13 - 0,6 çalyyor..! 0,13 - msg #Radyo 0,13 - 0,14 RAdyo XXX Fm’i ?u anda, 0,6 ‘ $+ $6 $+ ‘ 0,14 ki?i dinliyor..! 0,13 - 0,13 - 0,14 En yüksek dinleyici sayysy, 0,13 - 0,6 $+ ‘ 56 $+ ‘ 0,13 - msg #Radyo 0,13 - 0,14 Online istekleriniz için msn adresimiz, 0,13 - 0,13 - 0,6 Radyonuzun MSN Adresi 0,13 - msg #Radyo 0,13 - 0,14 Radyomuzu winamptan dinlemek için, 0,13 - 0,13 - 0,6 radyonuzun Linki 0,13 - 0,13 - 0,14 adresine tyklayynyz.. 0,13 - 13,13 13,15 - Radyonuzun Web Sitesi - 13,13 msg #Radyo 0,13 - 0,14 13.:: 0Radyo XXXXXX 13::. 0Sanal Alem’in en kaliteli radyosu.. Online DJ’lerimizden isteklerde bulunabilir sevdiklerinize ula?tyrabilirsiniz. 0,13 - 0,13 - 0,6 isteklerinizi << !istek Sanatçy - ?arky >> ?eklinde DJ’lerimize bildirebilirsiniz. 0,13 - set %dj $1 set %cp $4 set %ds $6 } #link on on *:text:!link:#Radyo: { msg #Radyo 0,13 - 0,14 Radyomuzu winamptan dinlemek için, 0,13 - 0,13 - 0,6 Radyonuzun LYNK’i 0,13 - 0,13 - 0,14 adresine tyklayynyz.. 0,13 - 13,13 13,15 - Radyo XXXXXX - 13,13 } #link end #dj on on *:text:!dj:#Radyo: { msg #radyo 0,13 - 0,6 %dj 0,13 - 0,14 ?u anda Radyo XXXX FM’de yayynda. 0,13 - } #dj end } #durum on { on *:text:!durum:#Radyo: { .radyo Radyo Link’i } #durum end on *:text:*:#Radyo: { if !istek * iswm $1- { /msg #Radyo@ 0,10 - 11,1 %dj 0istek talebi var! 1,10 - 1,10 - 11,1 $nick 0Rumuzlu kullanycy, 11( $+ $2- $+ ) 0iste?inde bulundu.. 1,10 - 1,10 - 0,1 Lütfen 11!Evet 0yada 11!hayyr 0?eklinde yanyt verin. 1,10 - /notice $nick 0,13 - 0,6 $nick 13,13 0,6 istedi?iniz < $+ $2- $+ > olarak Dj’e iletildi. 0,13 - /set %istekrumuz $nick } if !istek iswm $1- { /msg $nick 2 Bos istek gondermeyiniz $nick ” Örne?in : [20:03:37] !istek Gulben Ergen - Lay La Lay Lalay gibi” }
________________
Popüler Olabilirsin Ama Kalite Başka Birşey.. |
|
|
05 Mayıs 2021, 00:26 | #2 |
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
emeğine sağlık
________________
per aspera ad astra ✨ |
|
|
05 Mayıs 2021, 00:30 | #3 |
Paylaşım için teşekkürler emeğine sağlık
________________
|
|
|
05 Mayıs 2021, 00:44 | #4 |
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
tşk ederim :)
________________
Popüler Olabilirsin Ama Kalite Başka Birşey.. |
|
|
05 Mayıs 2021, 00:44 | #5 |
emeginize saglik
________________
No MoRe DramA
|
|
|
05 Mayıs 2021, 00:44 | #6 |
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
ben tşk ederim
________________
Popüler Olabilirsin Ama Kalite Başka Birşey.. |
|
|
05 Mayıs 2021, 01:14 | #7 |
Emeğinize sağlık .
________________
"hakikâte giden yolda, meşakkatsiz bir varış yoktur."
|
|
|
05 Mayıs 2021, 01:20 | #8 |
Emeğinize sağlık
________________
Bazen de yıldızlar bakar.
İnsanlar kayar hayatımızdan.. |
|
|
05 Mayıs 2021, 01:51 | #9 |
Emeğine sağlık.
|
|
|
05 Mayıs 2021, 16:33 | #10 |
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
emegine saglik dostum
________________
Edep; aklın Tercümanıdır. İnsan edebi kadar akıllı, Aklı kadar şerefli, Şerefi kadar Kıymetlidir. Massive.. ~ E & B ~ |
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|