Çevrimdışı

Bad nick tarama için kullandığım kod:

alias badnicktara {
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 $+ !*@*) == 8 {
inc %:bulunan 1
mode # +b $address($1,2)(%:gnick,666,1)
kick $1 %:gnick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
inc %s
}
echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
raw 8:*: {
badnicktara $1
}
on *:join:#: {
if $level($nick $+ !*@*) == 8 {
mode # +b $address($1,2)($nick,666,1)
kick # $nick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
}
on *:nick: {
if $level($newnick $+ !*@*) == 8 {
mode # +b $address($1,2)($newnick,666,1)
kickall $nick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
}
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
}
}
on *:op:#: {
if $opnick == $me {
badnicktara #
}

Çalışması kullanıcı ya eklediğim 8:dfjfdj şeklindeki bad nick eğer kanal girğin an varsa kanaldan banlar ve atar onu.