Radyo Botu Remote. Yardım - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Rap · 20 Eylül 2011, 19:46

Arkadaslar Script ime Bazı Remoteler Eklemek isTiyorum . Örnegin #Radyo Kanalında !istek/Durum/!Çalan/!Parça Yazıldıgında Kanala Bot yerine ben yansıtacam. Sonra #Dj Kanalında !saatler Falan yazılınca Sıralama benzeri veya bu sekil bir kodu olanlar yardımcı olabilirmi?

angry1 · 24 Eylül 2011, 16:25

on *:TEXT:*:#dj: {
if ($1 == !Var) { /msg $chan 4 $2 1Nickinin ÖzeLine 4 Mesaj1 YoLLanmıştır4. | /msg $2 1 İstediğiniz1 Şarkı Mevcut 4,1 Çalma 4Listesine1 ALınmıştır4, 1Teşekkür Ederiz1. 2mIRC4TR2FM }
if ($1 == !Yok) { /msg $chan 4 $2 1Nickinin ÖzeLine 4 Mesaj1 YoLLanmıştır4. | /msg $2 1 Üzgünüm İstediğiniz Şarkı Mevcut 4DeğiLdir1, 1DiLerseniz Başka Bir istek Şarkısı isteyebilirsiniz1, 2mIRC4TR2FM }
if ($1 == !RekLam) { /msg $chan 1 Radyo GLobaL4 Reklamı1 Atılmıştır4. | /describe $chr(36) $+ $server 0,1 0,4 Radyo Yayınımızı 0,1 4 $2 0,4 iLe DinLemek iÇin Link´e TıkLayın 11,1 4>> 0,5 mIRCTRFM 0,12 SanaL aLemin En KaLiteLi Radyosu 0,1 0,4 0,1 0,4 11,1 4>> 0,4 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 11,1 4>> }
if ($1 == !şifre) { /msg $chan 4 Şifre 1BiLgileri ÖzeLinize GönderiLiyor4.1 Lütfen Bekleyin4.
/msg $nick 1 IP 7:4 72.8.146.244
/msg $nick 1 Port 7:4 1905
/msg $nick 1 Şifre 7:1 Radyo 4 SorumLusundan1 ALıcakSınız4.
/msg $nick 1 Radyo BiLgilerinin Sonu4.
/msg $nick 4 Radyo1 BiLgiLerini ALan Nick 1( 4 $nick 1) iyi YayınLar DiLeriz 12mIRC4TR12FM
}
if ($1 == !bilgi) {
/msg $chan 1 isteniLen Şarkı Varsa 4 !Var Nick 1 Yazınız4. ( 1 BeLirttiğiniz4 Nick'in1 ÖzeLine Şarkının OLduğunu BeLirten4 Mesaj1 Atar 4)
/msg $chan 1 isteniLen Şarkı Yoksa 4 !Yok Nick 1 Yazınız4. ( 1 BeLirttiğiniz4 Nick'in1 ÖzeLine Şarkının OLmadığını BeLirten4 Mesaj1 Atar 4)
/msg $chan 4 Dj'e1 ÖzeL Radyo RekLamı iÇin 4 !RekLam Nick 1 Yazınız4. ( 1 BeLirttiğiniz Nick'e ÖzeL Radyo GLobaL4 Reklamı1 Atar 4)
/msg $chan 1 Radyo BiLgiLeri iÇin 4 !şifre1 Yazınız4. ( 1 Radyo BiLgiLerini :4 IP1 ,4 Port1 ,4 Şifre1 BiLgiLerini Verir 4)
/msg $chan 4 !Var Nick 1-- 4 !Yok Nick 1 KomutLarında KuLLanıLan4 MesajLarı1 Görmek iÇin 4 !msj 1 Yazınız
/msg $chan 1 BiLgi Listesinin Sonu4.
}
if ($1 == !msj) {
msg $chan 4 !Var Nick 1Komutunda4 ;
msg $chan 1 İstediğiniz1 Şarkı Mevcut 4,1 Çalma 4Listesine1 ALınmıştır4, 1Teşekkür Ederiz1, 2mIRC4TR2FM
msg $chan 1 Mesajı YoLLanıyor4.
msg $chan 4 !Yok Nick 1Komutunda4 ;
msg $chan 1 Üzgünüm İstediğiniz Şarkı Mevcut 4DeğiLdir1, 1DiLerseniz Başka Bir istek Şarkısı isteyebilirsiniz1, 2mIRC4TR2FM
msg $chan 1 Mesajı YoLLanıyor4.
}
}
if ($1 == !reklam Dj-Nick) {
msg $chan 1 Bu KomutLa Servere 4Notice1 Atarsınız4,1 Radyo4 Link'i1 Bütün userLerin4 özeLine1 gider4.
}
}

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,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
sockopen $+(radyom,$r(1,9999),Df) $1 $2
set %sitem $1 $2
}
else { sockopen $+(radyom,$r(1,999),!) $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | set %sitem $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) }
}
on *:SockOpen:radyo*Df:{
if ($sockerr) { msg #DJ 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.mIRCTR.ORG:1905
; $4 = ÇaLan Parça
; $5 = Şarkı Kalitesi
; $6 = Dinleyici Sayısı
; $7 = Max. Dinleyici Sayısı
; $8 & $9 = DinLeyici Rekoru
msg #radyo 1 Yayında Bulunan DJ : 4[ $1 ]
msg #radyo
msg #radyo 1 Şuan Radyomuzu : 4[ $6 ] 1Kişi Dinlemekte.
msg #radyo
msg #radyo 1 Şuanda Radyomuzda Çalan Şarkı 4[ $4 ] 1
msg #radyo
msg #radyo 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:#radyo:.radyom irc.sunucuismi.net:port
on *:text:*:*:{
if !link == $1 {
/msg $chan 1 Kesintisiz Yayınla Sizlerleyiz.Dinlemek İçin 7http://mircsirin.com./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 ]
}
}
}

-------------------------------------------------------------------------------------

- 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 kapalı | 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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| 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 kapalı }
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 Yayın 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 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
msg #Radyo 0,13 - 0,6 $1 0,13 - 0,14 Şu anda yayında. 0,13 - 0,13 - 0,6 Radyoda, 0,13 - 0,13 - 0,14 $4 0,13 - 0,13 - 0,6 çalıyor..! 0,13 -
msg #Radyo 0,13 - 0,14 RAdyo mIRCTRFm’i şu anda, 0,6 ‘ $+ $6 $+ ‘ 0,14 kişi dinliyor..! 0,13 - 0,13 - 0,14 En yüksek dinleyici sayısı, 0,13 - 0,6 $+ ‘ 56 $+ ‘ 0,13 -
msg #radyo 0
msg #Radyo 0,13 - 0,14 Online istekleriniz için msn adresimiz, 0,13 - 0,13 - 0,6
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
0,13 -
msg #radyo 0
msg #Radyo 0,13 - 0,14 Radyomuzu winamptan dinlemek için, 0,13 - 0,13 - 0,6 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,13 - 0,13 - 0,14 adresine tıklayınız.. 0,13 - 13,13 13,15 - [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] - 13,13
msg #radyo 0
msg #Radyo 0,13 - 0,14 13.:: 0Radyo mIRCTRFM 13::. 0Sanal Alem’in en kaliteli radyosu.. Online DJ’lerimizden isteklerde bulunabilir sevdiklerinize ulaştırabilirsiniz. 0,13 - 0,13 - 0,6 isteklerinizi << !istek Sanatçı - Şarkı >> ş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 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,13 - 0,13 - 0,14 adresine tıklayınız.. 0,13 - 13,13 13,15 - Radyo mIRCTRFM - 13,13
}
#link end
#dj on
on *:text:!dj:#Radyo: {
msg #radyo 0,13 - 0,6 %dj 0,13 - 0,14 Şu anda Radyo mIRCTRFM’de yayında. 0,13 -
}
#dj end
}
#durum on {
on *:text:!durum:#Radyo: {
.radyo Radyo Link’i
}
#durum end
on *:text:*:#Radyo: {
if !istek * iswm $1- {
/msg #dj 0,10 - 11,1 %dj 0istek talebi var! 1,10 - 1,10 - 11,1 $nick 0Rumuzlu kullanıcı, 11( $+ $2- $+ ) 0isteğinde bulundu.. 1,10 - 1,10 - 0,1 Lütfen 11!Evet 0yada 11!hayır 0şeklinde yanıt 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”
}
}

hangisinden verim alıyoran onu kulllan arkadasım linkleri ve adresi değişmeyi unutma

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Radyo Botu Dj yayın istatistiği remote kodu hkk.	helloweenfs	mIRC Scripting Sorunları	0	15 Mart 2021 18:07
Radyo Botu Yardım	SheqiL	Eggdrop, NeoStats, BNC	7	03 Nisan 2012 16:14
Radyo Botu Yardım	rockercocuq	mIRC Scripting Hazır Kodlar	0	17 Temmuz 2010 12:06
Radyo botu yardım	hipokrat	Eggdrop, NeoStats, BNC	10	30 Ağustos 2007 21:10

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.