 Agresif-Newnick-Koruması
on *:nick: {
var %x 1
while $comchan($newnick,%x) {
var %v1 $v1
if ($regex(%v1,/(#kanal1|#kanal2)/i)) {
hadd -mu4 newnick %v1 $addtok($hget(newnick,%v1),$newnick,32)
if ($numtok($hget(newchan,%v1)) >= 4) {
tokenize 32 $hget(newnick,%v1)
ban -k %v1 $* 1 Ban sebebi
hdel -m newnick %v1 $deltok($hget(newnick,%v1),$*,32)
}
}
inc %x
}
}
;--- Kanalda '' 4 ve üzeri '' Farklı Nick'in , Aynı nick IWD'si alma şartıyla '' Ban + Kick '' Uygular.
;--- Örnek ; Sohbet-Net1,Sohbet-Net2,Sohbet-Net3 < örneğini baz alırsak ;
;--- Available-wq,Available-ff,Available-kj < nick'ine dönüştüğünde kanaldan atar.
;--- Saygılarımla ; k.S.c |