S.a Benim Sorum soyLe olacak. Forumda Arama yaptim buLdum fakat boyLe bir sorunla karsılasıyorum. sorulmus ama cevap alınamamis. /radyo ip:port Yaptigim zaman soyle bir hata veriyor. Hata : * Geçersiz format: $remove (Satır 23, script26.lnk) bazılarıda durum gostermiyor. anlayamadım bi yardımcı olursaniz cok sevınırım.
+ !durum Yazdıgım zaman SoyLe birşey geliyor.
[19:35] <boCek> !durum
[19:35] <Casus_Bot> Yayında Bulunan DJ : Şuan Radyomuzu Kişi Dinlemekte
göstermiyor yani. bakarsaniz sevınırım.
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
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) { msg #mIRCoder 7,1 Radyo Bilgileri Alınıyor... tokenize 58 $remove($1,http://,/) sockopen $+(radyo,$r(1,9999),S) $1 $2 set %site $1 $2 } else { sockopen $+(radyo,$r(1,999),!) $remove($1-,http://,/) | set %site $remove($1-,http://,/) | msg #mIRCoder 4,0 Radyo Bilgileri Alınıyor... } } on *:SockOpen:radyo*S:{ if ($sockerr) { msg #mIRCoder 4,0 Radyo Offline.. | 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 #mIRCoder 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*J:{ if ($sockerr) { msg #mIRCoder 0,4 Yayın Offline | return } var %z sockread %z } on *:SockClose:radyo*J:{ 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 ¿ $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 topic #mIRCoder 4,0 Yayında Bulunan DJ : 0,4 $1 4,0 Yayın Türü 0,4 $2 4,0 Çalan Şarkı : 0,4 $4 4,0 Şuan Radyomuzu 0,4 $6 4,0 Kişi Dinlemekte 7,1 Radyomuzu Winamp'tan dinlemek icin tiklayin 12http://87.252.2.46:1453/listen.pls } #link on on *:text:!link:#mIRCoder: { timer 1 1 /radyo irc.atvtr.net:8030 } #link end #durum on on *:text:!durum:#mIRCoder: { msg $chan 4,1 Yayında Bulunan DJ : 1,4 $1 4,1 Şuan Radyomuzu 1,4 $4 4,1 Kişi Dinlemekte } #durum end #istek on on *:text:!istek*:#mIRCoder: { msg %1 deneme lan } #istek end
#join off off 1:join:#mIRCoder: { if ($nick != radio) { /mode $chan +v $nick /timer 1 0 /topic $chan :- /timer 1 1 /topic $chan 4,1 Yayında Bulunan DJ : 1,4 %dj 4,1 Şuan Radyomuzu 1,4 %ds 4,1 Kişi Dinlemekte /timer 1 1 /topic $chan :- /timer 1 2 /topic $chan 0,4 ** 0,1 Radyomuzun yayin linkini ogrenmek icin 0,4 >> 12 !link /timer 1 2 /radyo 89.149.192.52:8030 } } #join end #baglanti on on 1:join:#mIRCoder: { if ($nick != radio) { /mode $chan +v $nick /msg $chan 0,4 ** 0,1 Radyomuzun yayin linkini ogrenmek icin 0,4 >> 12 !link } } #baglanti end
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) {
msg #mIRCoder 7,1 Radyo Bilgileri Alınıyor...
tokenize 58 $remove($1,http://,/)
sockopen $+(radyo,$r(1,9999),S) $1 $2
set %site $1 $2
}
else { sockopen $+(radyo,$r(1,999),!) $remove($1-,http://,/) | set %site $remove($1-,http://,/) | msg #mIRCoder 4,0 Radyo Bilgileri Alınıyor... }
}
on *:SockOpen:radyo*S:{
if ($sockerr) { msg #mIRCoder 4,0 Radyo Offline.. | 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 #mIRCoder 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*J:{
if ($sockerr) { msg #mIRCoder 0,4 Yayın Offline | return }
var %z
sockread %z
}
on *:SockClose:radyo*J:{
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 ¿ $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
topic #mIRCoder 4,0 Yayında Bulunan DJ : 0,4 $1 4,0 Yayın Türü 0,4 $2 4,0 Çalan Şarkı : 0,4 $4 4,0 Şuan Radyomuzu 0,4 $6 4,0 Kişi Dinlemekte 7,1 Radyomuzu Winamp'tan dinlemek icin tiklayin 12http://irc.atvtr.net:8030/listen.pls
set %dj $1
set %ds $6
}
#link on
on *:text:!link:#mIRCoder: {
.timer 1 1 /radyo irc.atvtr.net:8030
}
#link end
#istek on
on *:text:*:#mIRCoder: {
if $1 == !istek {
msg #DJ 2İstek yapan:4 $nick 2İstenilen Şarkı:4 $2-
msg #mIRCoder 2 $nick 5,isteğiniz DJ'lerimize iletilmiştir.
}
}
#istek end
#join off
on 1:join:#mIRCoder: {
if ($nick != radio) {
mode $chan +v $nick
.timer 1 0 /topic $chan :-
.timer 1 1 /topic $chan 4,1 Yayında Bulunan DJ : 1,4 %dj 4,1 Şuan Radyomuzu 1,4 %ds 4,1 Kişi Dinlemekte
.timer 1 1 /topic $chan :-
.timer 1 2 /topic $chan 0,4 ** 0,1 Radyomuzun yayin linkini ogrenmek icin 0,4 >> 12,0 !link
.timer 1 2 /radyom irc.atvtr.net:8030
}
}
#join end
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 #mIRCoder 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 #mIRCoder 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
; $4 = ÇaLan Parça
; $5 = Şarkı Kalitesi
; $6 = Dinleyici Sayısı
; $7 = Max. Dinleyici Sayısı
; $8 & $9 = DinLeyici Rekoru
msg #mIRCoder 4,0Yayında Bulunan DJ :0,4 $1 4,0Şuan Radyomuzu :0,4 $6 4,0Kişi Dinlemekte
set %dj $1
set %ds $6
}
#durum on
on *:text:!durum:#mIRCoder:.radyom irc.atvtr.net:8030
#durum end
#baglanti on
on 1:join:#mIRCoder: {
if ($nick != radio) {
/mode $chan +v $nick
/msg $chan 0,4 ** 0,1 Radyomuzun yayin linkini ogrenmek icin 0,4 >> 12,0 !link
}
}
#baglanti end
* 2 sayfa olarak düşünün ve ayrı sayfalara eklemeyi unutmayın.
* $remove komutunda ) parantezi kapanmamıştı,düzeltildi.
* Kestirmeden gitmişsiniz :) Radyodan veri almadan Dj,Dinleyici Sayısı bilgisini doğrulayamazsınız "radyom" aliası ile !durum için sock bağlantı sağlamış olduk.
* %dj = dj , %ds = dinleyici sayısı ,variables'leri belirtmişsiniz ama kaynak yok(değer?), merak etmeyin ben ekledim :)
* !istek komutunu çalışır hale getirmiş olduk,#DJ kanalını düzenlersiniz.
Radyo Iyı Hos guzeL Calaısıyor Calısmasına Ama Bot Sadece !link !durum !istek komutlarını kullanınca ve Kanala ßirisi giris yaptıgı zaman kanala msj Gonderıyor. Ben Belirli zaman aralıgında kendisinin gondermesini istiyorum. NasıL yapmam gerek . AcıL yaradım Arkadaslar .... TskLer. boL paylasımlar