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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   IRC Sunucu Radyo Kodu. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/342668-irc-sunucu-radyo-kodu.html)

bøCek 04 Temmuz 2010 16:42

IRC Sunucu Radyo Kodu.
 
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:

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- Kodu:

 <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- Kodu:

 !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 :)

sirjoan 06 Temmuz 2010 20:52

Cevap: IRC Sunucu Radyo Kodu.
 
ÇOOKK teşekkür ederim. Zaten diğer radyo ile rekabetimiz vardı.. Çok saol;sucsuz;araba

bøCek 06 Temmuz 2010 20:55

Cevap: IRC Sunucu Radyo Kodu.
 
Ş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

Cevap: IRC Sunucu Radyo Kodu.
 
Alıntı:

bøCek Nickli Üyeden Alıntı (Mesaj 1040456939)
Ş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 ;olley

EquatioN 29 Ağustos 2010 14:27

Cevap: IRC Sunucu Radyo Kodu.
 
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

Cevap: IRC Sunucu Radyo Kodu.
 
Zaten Radyo.tcL bunun hepsini yapıyo anlamadım Koruma Botunun Radyo ile işi nedir :)

sad33 08 Eylül 2010 01:10

Cevap: IRC Sunucu Radyo Kodu.
 
Alıntı:

EquatioN Nickli Üyeden Alıntı (Mesaj 1040498865)
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

Cevap: IRC Sunucu Radyo Kodu.
 
Alıntı:

oSmanLi Nickli Üyeden Alıntı (Mesaj 1040509010)
Zaten Radyo.tcL bunun hepsini yapıyo anlamadım Koruma Botunun Radyo ile işi nedir :)

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

Cevap: IRC Sunucu Radyo Kodu.
 
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

Cevap: IRC Sunucu Radyo Kodu.
 
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


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 18:02.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net