13Takip Raporu : 7 ASI_31 13 Nickinin 7 5200 13Saniye içinde kullandigi nickler: 7 ASI_31 + ALPARSLAN + Nicksiz
ASI_31 I-Robot Tarafindan Kanaldan Atildi (0,1 /4!0\ 14,1 0S14pam 4/ 0C14lone 4/ 0I14nviter 4/ 0B14ots 4?0,1 /4!0\ 0(140N14icks 0M14atches0: 0,1 4 ( 4ASI_31 + ALPARSLAN + Nicksiz15 ))
Yukarida goruldugu gibi sunucuya giriyorum ve operimi girince op oluyorum sonra oper odasina baska bir admin 4-5 defa girip cikinca onu bot clone sanip ban+kick atiyor bu ban+kick'i kaldirmak istiyorum sanirim bu korumanin kodunu remotede Takip etme addonu olarak buldum bu assagida verecegim addon ayni sekilde calissin istiyorum sadece fazla girip cikani ban+kick ile atmasin istiyorum simdiden yardim edecek arkadaslara cok Tsk ederim
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on 1:connect:{ .IAL On | takip + 5200 }
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 DevreDisi ! }
}
#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 ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 13Takip Raporu : 7 $nick 13 Nickinin 7 %cSj 13Saniye içinde kullandigi nickler: 7 $hget(Takip,$address($nick,2)) }
if ($gettok($hget(Takip,$address($nick,2)),0,43) > 2 && $me isop $chan) { ban $chan $nick 2 | kick $chan $nick 0,1 /4!0\ 14,1 0S14pam 4/ 0C14lone 4/ 0I14nviter 4/ 0B14ots 4?0,1 /4!0\ 0(140N14icks 0M14atches0: 0,1 4 ( 4 $+ $hget(Takip,$address($nick,2))) $+ 15 ) }
}
#Takip end
menu * {
.-
Nick takip
.Acik:.takip +
.-
.Kapali:.takip -
.-
}