Dene
medim ve çalışacağından şüpheliyim, eğer çalışmazsa yazdığım kodun mantığıyla yardım etmeniz gerekiyor, işte kod:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:NICK:{ if $hfind(karaliste,$address($newnick,5),1,W) { var %: = 1, %c = $ifmatch | while $comchan($newnick,%:) { var %; = $v1 | if $me isop %; && $newnick isreg %; { mode # +b %c | kick # $newnick $hget(karaliste,%c) } | inc %: } } }
Umarım işine yarar..