Bad Nic Kötü Nick Koruması

on @*:join:#:{ if $read(badnick.txt,w,$nick) { ban -ku600 $chan $nick 5 $nick is a bad nick. } }
on !*:nick:if $read(badnick.txt,w,$newnick) { var %1 = 1 | while $comchan($newnick,%1) { if $me isop $comchan($newnick,%1) { ban -ku600 $comchan($newnick,%1) $newnick 5 $nick is a bad nick. } | inc %1 } }