mIRC Başka Nickle Gireni Belirleme Kodu

tarafından
35
mIRC Başka Nickle Gireni Belirleme Kodu

Bu kod ile mIRC’de baska baska nickler ile giren varsa bu kod ile uyari alabilirsiniz. Remotelere ekleyiniz.

on 1:start: { .hmake nicksch 100 }
on 1art:#: { if ( $comchan($nick,0) < 2 ) { nicksgrab $nick $site } }
on 1:quit: { nicksgrab $nick $site }
on 1:kick:#: {
if ( $comchan($knick,0) < 2 ) {
if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch }
}
}
alias nicksgrab {
.hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1
}
alias NicksTrouve {
var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2)
return $iif($hget(nicksch,%a) != $1,$ifmatch)
}
on 1:JOIN:#: {
var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [2Onceki Nicki4]12 $ifmatch  )
if ( %NickPrecedent ) { echo -tm $chan $ifmatch }
}