IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

Kod:

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 ;
;--- Che-wq,Che-ff,Che-kj < nick'ine dönüştüğünde kanaldan atar.
;--- Saygılarımla ; Che