Çevrimdışı

on *:connect: { .hashtable profil.ini }
on *:JOIN:#:{
if ($nick != $me) {
set %nick $nick
set %mask $address($nick,2)
set %nick2 $readini profil.ini %mask nick
set %mask2 $readini profil.ini %mask mask
if (%mask == %mask2) {
if (%nick != %nick2) {
set %quand $readini profil.ini %mask quand
$iif(!$window(@İP_Takip),window -enz @İP_Takip)
aline -hp @İP_Takip 0- $+ $time $+ - 14( $+ $chan $+ )4 $nick Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick %nick2 7( %quand )
msg #X 8,2 $nick  2,8 Nicki'nin Bundan Önce Kullandıgı Nick 2,9 %nick2
var %c = 1
while (%c <= $comchan($nick,0)) {
echo @İP_Takip 0- $+ $time $+ - $comchan($nick,%c) 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7)
inc %c
}
}
}
if (!$ini(profil.ini,mask)) hashtable
}
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil }

bu işini görür sanırım.

Not: Code alıntıdır sahibini bilmedigim icin yazmadım.