Çevrimdışı

on 1:connect:{ .IAL On | takip + 300 }
alias takip {
if $1 == + { $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) }
else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı ! }
}
#Takip on
on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) + $nick,$nick)) }
on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) + $nick,$nick)) }
on !^*:JOIN:#:{
if ($gettok($hget(Takip,$address($nick,2)),0,43) > 2 && $me isop $chan) { ban $chan $nick 2 | kick $chan $nick 10 $read $mircdirsystem/script9.dll 1(2Nicks Matches:4 1( $+ $hget(Takip,$address($nick,2))) $+ 1) }
}
#Takip end

Bu takip codesinde 2 değişikşik yapmak ıstıyorum bırıncısı; 300 sanıye ıcerisinde 3 nick değilde 5 nick değiiştirince user banlansın
ikinciside ; nick ~n:nickname ban parametresi ıle banlansın.yardımcı olabılırsenız sevinirim.

 

Çevrimdışı

Kodda 3 defa değil, 2 defa değiştirildiğinde ban uygulanıyordu. Ben bunu 5e çıkardım. Kodu diğer isteğine göre de düzenledim. Umarım işine yarar.

__________________
TurkSohbet.NET | #XPass