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 )
        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 }