alias badnick {
return nick1 nick2 nick3
}
on *:NICK: {
if ($newnick ison #mychan) {
if (!$hget(badnick)) hmake badnick 20
var %i = 1
while ($gettok($badnick,%i,32)) {
if ($+(*,$gettok($badnick,%i,32),*) iswm $newnick) {
if ($newnick !isop $chan) {
hinc badnick $newnick
var %badnick = $gettok($badnick,%i,32)
if ($hget(badnick,$newnick) == 1) do something heere
if ($hget(badnick,$newnick) == 2) do another here
}
}
inc %i
}
}
}