on *:nick:{
if (kelebek* iswm $newnick) { 
var %a 1
while %a <= $comchan($newnick,0) {
if $me isop $comchan($newnick,%a) {
mode $comchan($newnick,%a) -v $newnick
%opchannel = $addtok(%opchannel,$comchan($newnick,%a),32)
}
if $me !isop $comchan($newnick,%a) { msg $comchan($newnick,%a) !kb $newnick }
inc %a
}
msg $token(%opchannel,1,32) $newnick nickinizi değiştirin.
unset %opchannel
$+(.timer,$newnick) 1 60 allkick1 $newnick 
}
}