on 1:connect:{
.IAL ON
takip + 300
}
alias takip {
if $1 == + {
$iif($hget(Takip),hfree Takip)
.enable #Takip | $iif(!$hget(Takip),hmake Takip 300)
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 !^*:JOIN:#:{
if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) {
/echo -at #sohbet 0,1**** 0,1( 0,1TAKİP RAPORU 0,1)0,1 $chan 0,1kanalına  giren0,1 $nick 0,1nickinin %cSj saniye içinde kullandığı nickler: 0,1  $hget(Takip,$address($nick,2))
}
if $gettok($hget(Takip,$address($nick,2)).data,0,43) > 3 {
ban -k $chan $nick 2 Nick Change
}
}
#Takip end