🔔 Çevrimdışı bildirim almak ister misiniz?
Bir konuya etiketlendiğinizde, özel mesaj aldığınızda, bir mesajınız alıntılandığında forumda olmasanız bile anlık bildirim almak için lütfen izni verin.
arkadaslar bu botu kullandım ancak ilk kanala girdiğinde otomatik topic atıyor radyo hakkında bilgiyi ancak daha sonra !link yazdıgında '' * Timer 1 halted '' cıkıyor ve Link i gostermiyor sizce bu neden kaynaklanıyor birde bu botun kanala bilgilerini istenince değilde 1 dakikada bir kendisinin gostermesini sağlayabilirmiyiz ?
Botun Kodu şu..
Alıntı:
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 #radyo 7,1 Radyo Bilgileri Alınıyor...
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...]) | msg #radyo 4,0 Radyo Bilgileri Alınıyor... }
}
on *:SockOpen:radyo*S:{
if ($sockerr) { msg #radyo 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 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 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 #radyo0,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 #radyo 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 12 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
set %dj $1
set %cp $4
set %ds $6
}
#link on
on *:text:!link:#radyo: {
timer 1 1 /radyo 89.149.192.52:8030
}
#link end
#durum on
on *:text:!durum:#radyo: {
msg $chan 4,1 Yayında Bulunan DJ : 1,4 %dj 4,1 Şuan Radyomuzu 1,4 %ds 4,1 Kişi Dinlemekte
}
#durum end
#istek on
on *:text:!istek*:#radyo: {
msg %1 deneme lan }
#istek end
#join off
off 1:join:#radyo: {
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:#radyo: {
if ($nick != radio) {
/mode $chan +v $nick
/msg $chan 0,4 ** 0,1 Radyomuzun yayin linkini ogrenmek icin 0,4 >> 12 !link
} }
#baglanti end
25 Ekim 2006, 00:37
Benzer Konular 
Ağaç şeklinde
