Çevrimdışı

if $2 == JOIN {
$right($3,-1),1) == $chr(35) {
var %lol $lines(badnick.mercy)
while %lol >= 1 {
if $remove($read(badnick.mercy,%lol),$chr(32),*,/,\,.,$chr(44),-,_,!,;) iswm $remove($gettok($1,1,33),:) {
set %nomercysıralama %lol
sw nomercy kick %::chan $remove($gettok($1,1,33),:) Deneme : %nomercysıralama
}
}
}
}

burda hata nerde ya 3 saattır ugrasıyoruz bı yardım edebılecek varmı. Botun normal hali

on *:join:#:{
var %lol $lines(badnick.mercy)
while (%lol >= 1) {
if ($remove($read(badnick.mercy,%lol),$chr(32),*,/,\,.,$chr(44),-,_,!,;) iswm $nick) { /set %nomercysıralama %lol | //echo -a %nomercysıralama }
/dec %lol
}
}


kusursuz calısıyor ama sock calısmıo :(