alias varmi {
%mesaj1 = * lan *
%mesaj2 = * len *
var %i = 1
while $eval($+(%,mesaj,%i),2) {
if ($eval($+(%,mesaj,%i),2) iswm $1-) {
return $true
}
inc %i
}
}
 
on @*:text:*:#:{
if ($varmi($strip($1-))) { kick # $nick Bad! }
}