Çevrimdışı

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 $+ !*@*) == badnick {
inc %:bulunan 1
mode #sohbet +b $address($1,2)(%:gnick,666,1)
kick $1 %:gnick $read(badsozler.txt)
}
inc %s
}
/msg #master Kanal listesi tarandi: $1 kanalında - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
raw badnick:*: {
badnicktara $1
}
on *:join:#sohbet: {
if $level($nick $+ !*@*) == badnick {
mode #sohbet +b $address($1,2)($nick,666,1)
kick #sohbet $nick $read(badsozler.txt)
}
}
on *:nick: {
if $level($newnick $+ !*@*) == badnick {
mode #sohbet +b $address($1,2)($newnick,666,1)
kickall $nick $read(badsozler.txt)
}
}
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:#sohbet: {
if $opnick == $me {
badnicktara #sohbet
}
}

arkadaslar buna muaf kanal eklemek istiyorum yardım ederseniz sevinirim.