Kod : Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
var %:nick $regml(3), %:ident $regml(4), %:ipnick $regml(5)
set %nick %:nick
set %mask %:ipnick
set %nick2 $readini profil.ini %mask nick
set %mask2 $readini profil.ini %mask mask
if %mask == %mask2 && %nick != %nick2 {
set %quand $readini profil.ini %mask quand | beep
window -e @NickTakip
echo @NickTakip -
echo @NickTakip - 0,2 <= $+($time,-,$date) => - 0,4 Nick : 0,2 %:nick - 0,4 Önceki Nicki : 0,2 %nick2 - 0,4İdent-IP : 0,2 $+(%:ident,@,%:ipnick)
echo @NickTakip -
}
}
if !$ini(profil.ini,mask) { hashtable }
}
alias hashtable {
if !$hget(profil) { .hmake profil 1 }
else { .hadd profil nick %nick | .hadd profil mask %mask | .hadd profil quand $+($time,-,$date) | .hsave -sai profil profil.ini $hget(profil,mask) | .hfree -s profil }
}