Çevrimdışı

if $me isop $1 {
set %:bulunan 0
var %s 1
while %s <= $nick($1,0) {
%:gnick = $nick($1,%s)
if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == 666 {
inc %:bulunan 1
mode $1 +b $ulist(%:gnick,666,1)
kick $1 %:gnick Badnick kullandiginiz tespit edildi!
}
inc %s
}
echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}

raw 366:*: {
badnicktara $1
}

on *:join:#: {
if $level($nick $+ !*@*) == 666 {
mode # +b $ulist($nick,666,1)
kick # $nick Badnick kullandiginiz tespit edildi!
}
}

on *:nick: {
if $level($newnick $+ !*@*) == 666 {
banall $newnick $ulist($newnick,666,1)
kickall $newnick Badnick kullandiginiz tespit edildi!
}
}

alias banall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- }
inc %i
}
}

alias kickall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- }
inc %i
}
}