on *:connect:hashtable profil.ini
on !*:join:#:{
  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 && %nick != %nick2 {
    set %quand $readini profil.ini %mask quand | beep
    $iif(!$window(@IP-Takip),window -z @IP-Takip)
    aline -hp @IP-Takip - $- $+($time,-) $+($chr(40),#,$chr(41)) $nick rumuzlu kullanıcının, bundan önce aynı IP adresinden giriş yaptığı kişi: %nick2 $+($chr(40),%quand,$chr(41))
    var %c = 1
    while $comchan($nick,%c) {
      .notice $comchan($nick,%c) $nick rumuzlu kullanıcının, bundan önce aynı IP adresinden giriş yaptığı kişi: %nick2 $+($chr(40),%quand,$chr(41))
      .notice $comchan($nick,%c) Saat: $gettok(%quand,1,45) - Gün: $gettok(%quand,2,45)
      inc %c
    }
  }
  if !$ini(profil.ini,mask) { hashtable }
}
alias hashtable if !$hget(profil) { hmake profil 5 } | else hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $+($time,-,$date) | hsave -sai profil profil.ini $hget(profil,mask) | hfree profil