#5 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Badnick Sorgulama
uFuK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias ufuk {
var %i 1
while %i <= $lines(badnick.txt) {
if $1 == $read(badnick.txt,%i) { msg #x $v1 karalistede bulunuyor. }
inc %i
}
}
on *:text:*:#x: {
if $1 == !sorgu { ufuk $2 }
}
#x kanalında !sorgu nick yapıldıgında badnick.txt içersindeki nickle sorgulanan nick çakışırsa kanala bu bir badnicktir mesajı döner.
Herşeyi while ile yapmak yerine , $readdeki w operatörünü kullansak daha mantıklı olmazmı , sadece; Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#x: {
if $1 == !sorgu {
msg $chan $2 , $iif($read(badnick.txt,w,$2),listemde mevcut.,listemde yok.)
}
}
şeklinde kasmadan yorumlatabiliriz.
19 Mart 2011, 12:31
Benzer Konular 
Ağaç şeklinde
