IRC Sunucu Radyo Kodu. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

bøCek · 04 Temmuz 2010, 16:42

Merhabalar.

Öncelikle bu kodu eklememdeki sebeb çoğu arkadaşımız radyo kodu var ama !link !calan !dinleyen !durum faliyeti istemesidir. Elimden geldigi kadar yardimci olsamda diğer Ustadlarim yardımcı olsada forumda halendaha istenen bir kod olduğunu görmüş bulunmaktayim. Eğerki uygun bulunmazsa konum silinebilir. Şimdi Kodu Tanitalim.

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

 alias radyom {
   sockclose  radyo*Df
   sockclose radyo*zyn
   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,http://,/)
     sockopen $+(radyom,$r(1,9999),Df) $1 $2
     set %sitem $1 $2
   }
   else { sockopen $+(radyom,$r(1,999),!) $remove($1-,http://,/) | set  %sitem $remove($1-,http://,/) }
 }
 on *:SockOpen:radyo*Df:{
   if  ($sockerr) { msg #mIRCoder 4,0 Radyo Offline.. | return }
   sockwrite -tn $sockname GET / HTTP/1.1
   sockwrite -tn $sockname  $crlf
 }
 on *:Sockread:radyo*Df:{
   sockread %radyom
   if  (icy-name isin %radyom) { set %radyom2 %radyom2 ¿  $remove($gettok(%radyom,2,58),|) }
   if (icy-genre isin %radyom) {  set %radyom2 %radyom2 ¿ $remove($gettok(%radyom,2,58),|) }
   if  (icy-url isin %radyom) { set %radyom2 %radyom2 ¿  $remove(%radyom,icy-url) | sockclose radyom | radyom2 }
 }
 on  *:Sockclose:radyo*Df:radyom2
 alias radyom2 { sockopen  $+(radyom,$r(1,9999),zyn) %sitem | unset %sitem }
 on  *:SockOpen:radyo*zyn:{
   if ($sockerr) { msg # 4,0 Radyo  Offline.. }
   sockwrite -tn $sockname GET /7.html HTTP/1.0
   sockwrite -tn $sockname User-Agent: Mozilla
   sockwrite -tn $sockname
 }
 on  *:Sockread:radyo*zyn:{
   if ($sockerr) { msg # 0,4 Yayın  Offline | return }
   var %zm
   sockread %zm
 }
 on  *:SockClose:radyo*zyn:{
   sockread -f %radyom
   var %zm  $remove(%radyom,<HTML><meta http-equiv="Pragma"  content="no-cache"></head><body>,</body></html>)
   var %im $numtok(%zm,44)
   while %im {
     set %radyom2 %radyom2 ¿  $remove($gettok(%zm,%im,44),|)
     dec %im
   }
   durumm
   unset %radyom2
   unset %radyom
 }
 alias -l durumm {
   sockclose radyo*Df
   sockclose radyo*zyn
   tokenize 191 %radyom2
   ; $1 = Dj in Yazdığı İsim
   ; $2 = Genre
   ; $3 = URL  irc.server.com:/port
   ; $4 = ÇaLan Parça
   ; $5 = Şarkı Kalitesi
   ; $6 = Dinleyici Sayısı
   ; $7 = Max. Dinleyici Sayısı
   ; $8  & $9 = DinLeyici Rekoru
   msg #turkiye 1 Yayında Bulunan DJ :  4[  $1 ] 
   msg #turkiye 
   msg #turkiye 1 Şuan Radyomuzu     :  4[  $6 ] 1Kişi Dinlemekte.
   msg #turkiye 
   msg #turkiye 1  Şuanda Radyomuzda Çalan Şarkı 4[ $4 ] 1
   msg #turkiye 
   msg  #turkiye 1 Kesintisiz Yayınla Sizlerleyiz.Dinlemek İçin  7http://irc.server.com:port/listen.pls
   set %bo $1
   set %Ce $6
   set %k $4

 } 

 on *:text:!durum:#turkiye:.radyom   irc.server.com:port 
 on *:text:*:*:{
  if !link == $1 {
    /msg $chan 1 Kesintisiz Yayınla Sizlerleyiz.Dinlemek İçin  7http://irc.server.com:port/listen.pls
  }
  if !dj == $1 {
    /msg $chan  1 Yayında Bulunan DJ :  4[  %bo ]
  }
  if !dinleyen == $1 {
    /msg $chan 1  1 Şuan Radyomuzu     :  4[ %Ce ] 1Kişi Dinlemekte. 
  }

  if !calan == $1 {
    /msg $chan  1  Şuanda Radyomuzda Çalan Şarkı 4[ %k ] 
  }
}
 }

Kırmızıyla Belirttiğim Yerleri Kendi Serverinize Göre ayarlayınız.

Şimdi Nasıl Çalıştığına Bakalım.

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

<boCek> !durum <Casus_Bot>  Yayında Bulunan DJ : [ Dj Ay_mavi ] <Casus_Bot> <Casus_Bot>  Şuan Radyomuzu : [ 27 ] Kişi Dinlemekte. <Casus_Bot> <Casus_Bot>  Şuanda Radyomuzda Çalan Şarkı [ Dj Aydin Özer Club mix ww.djler.net ] <Casus_Bot> <Casus_Bot>  Kesintisiz Yayınla Sizlerleyiz.Dinlemek İçin http://irc.atvtr.net:8030/listen.pls --------------------------- <boCek> !link <Casus_Bot>  Kesintisiz Yayınla Sizlerleyiz.Dinlemek İçin http://irc.atvtr.net:8030/listen.pls --------------------------- <boCek> !calan <Casus_Bot>  Şuanda Radyomuzda Çalan Şarkı [ Dj Aydin Özer Club mix ww.djler.net ] --------------------------- <boCek> !dinleyen <Casus_Bot>  Şuan Radyomuzu : [ 27 ] Kişi Dinlemekte. --------------------------- <boCek> !dj <Casus_Bot>  Yayında Bulunan DJ : [ Dj Ay_mavi ]

Yapmaniz Gerek En üsteki Kodu mIRC'ınızın Remote Bölümüne ( Alt + R ) Olan kısma kopyalayip yapiştırıyoruz. Daha Sonra Tamam Dedikten sonra işlem bitmiştir.

Bunlar Nasıl Çalışır ?

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

!link : Belirtmiş olduğunuz link'i Kanala yansıtır. !calan : Yayında Çalan Şarkıyı Kanala yansıtır. !durum : Yayında Kim Dj , Yayında Kaç kişi dinliyor , Yayında Çalan Şarkı , Genel durum. !dinleyen : Yayını Kaç kişi dinliyor. !dj : Yayındaki DJ'i belirtir.

Diyebilirsiniz Hepsini Zaten Durum Yapiyor. Ama Bazi Arkadaşlarımız Sadece Kısa komut yani !link vermek ısteye bilir !dj merak edebilir hepsini bir anda vermek ıstemeye bilir diye oyle bir duzenlemede eklemiş bulunmaktayım ama Hepsini bir anda yaptırmak ısteyenler ıcın !durum olayı bence harika gibime geliyor çünkü benim aklıma gelip oyle bir tasarlama yapmis bulunmaktayim.

Evet Arkadaşlar Elimden Geldigi Kadar Açıklamalı ve düzgün bir anlatışla anlattım. Umarım begenir ve yardımlarım dokunmuş olur.

Dipnot Mesajı: Kodda Hata Çalışmama Gibi bende göremedim egerki sizde sorun olursa konu altında bildiriniz elimden geldigi kadar yardımcı olabilirim.

Kodlama : Difüzyon
Düzenleme ve Tasarım : boCek
Kodlamasından dolayi Difüzyon'a Teşekkürler.

Tesekkur Mesajı Yazmaniza Gerek Yok Teşekkür Et Buttona Tıklasaniz Yeterdir
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

sirjoan · 06 Temmuz 2010, 20:52

ÇOOKK teşekkür ederim. Zaten diğer radyo ile rekabetimiz vardı.. Çok saol
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bøCek · 06 Temmuz 2010, 20:55

Şakıyı Nasıl tanıyacak derken ? !calan dedigi zaman Yayında O'anda N'çalıyorsa kanala aktarcak. tcL'deki sistem aynen mIRC'ede uygulanmis vaziyette.

sirjoan · 06 Temmuz 2010, 21:44

bøCek Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Şakıyı Nasıl tanıyacak derken ? !calan dedigi zaman Yayında O'anda N'çalıyorsa kanala aktarcak. tcL'deki sistem aynen mIRC'ede uygulanmis vaziyette.

saol yaptım teşekkür ettim sanırım rep de verdi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

EquatioN · 29 Ağustos 2010, 14:27

arkadaşım çok güzel işime yaradı fakat calan parcayı her parca değiştikten sonra yada belirli aralıklar la kanala yansıtmasını sağlayabilirmiyiz

oSmanLi · 06 Eylül 2010, 10:12

Zaten Radyo.tcL bunun hepsini yapıyo anlamadım Koruma Botunun Radyo ile işi nedir
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

sad33 · 08 Eylül 2010, 01:10

EquatioN Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

arkadaşım çok güzel işime yaradı fakat calan parcayı her parca değiştikten sonra yada belirli aralıklar la kanala yansıtmasını sağlayabilirmiyiz

evet aynen katılıyorum.

bocek guzel bir çalışma emeğine sağlık

onNes · 08 Eylül 2010, 01:52

oSmanLi Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Zaten Radyo.tcL bunun hepsini yapıyo anlamadım Koruma Botunun Radyo ile işi nedir
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Sana diyorki hem koruma hem radyo hem oyun gibi bir çok seçenek olarak kullanabilirsin diyor. Ayrıca sock bot daha hızlıdır. Ayrıca neden herşeye muhalefet oluyorsunuz onu anlamadım...

EquatioN · 25 Eylül 2010, 21:53

arkadaşım çok güzel işime yaradı fakat calan parcayı her parca değiştikten sonra yada belirli aralıklar la kanala yansıtmasını sağlayabilirmiyiz

fLayer · 09 Ekim 2010, 17:51

bunun aynısını Neden Radyo.tcl de yapmıyor şuanda verilenlerin hiç biri Radyoda istenildiqi qibi çalışmıyor bunun çalışması qüzel ßenCe

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Radyo Botu kodu ..	DaDaS	mIRC Scripting Hazır Kodlar	1	22 Eylül 2012 17:48
radyo kodu	local	mIRC Scripting Sorunları	1	07 Mayıs 2011 23:25
Radyo Acma Ve İstek kodu.	kup{a}pazl	mIRC Scripting Hazır Kodlar	9	13 Ocak 2011 19:45
Giriş kodu ve Radyo botu	Fu2kan	Eggdrop, NeoStats, BNC	1	06 Temmuz 2006 03:09

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

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.