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

**immortaL** · 11 Ocak 2017, 13:21

Sitenize yada çette iken 1000 sn icersinde bir nickle girip sonra çıkarak tekrar farklı bir nickle geldiğinde daha önce kullandığını nicki takip etmenize yaraya bir addondur.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on 1:connect:{ .IAL On | takip + 1000 } 
alias takip {
  if $1 == + { $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) }
  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDisi ! } 
}
#Takip on
on ^*:QUIT:{ if !$regex($wildsite,/admin/i) { 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:#:{ if !$regex($wildsite,/admin/i) { 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 !$regex($wildsite,/admin/i) { 
    if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 13Takip Raporu : 14 $nick 13 Nickinin 14 %cSj 13Saniye icinde kullandigi Nickler:14 $hget(Takip,$address($nick,2)) } 
  }
}