Kod: Kodu kopyalamak için üzerine çift tıklayın!
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,32),$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,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) & $nick,$nick)) }
on !^*:JOIN:#:{
if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) {
echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2))
if (4 <= $numtok($hget(Takip,$address($nick,2)),38)) { ban -k # $nick %cSj Saniyede Kullandığın Nickler: $hget(Takip,$address($nick,2))) }
}
}
#takip end
menu channel,query {
Nick Takip
.Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)
.Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)
}