on *:join:*: {
  write bilgipaylasimi.txt $nick $+ $chr(11) $+ $gettok($address($nick,0),2,64) $+ $chr(11) $+ $time 
}

alias -l takip {
  .set %hea * $+ $1 $+ *
  if $read(bilgipaylasimi.txt,w,%hea) {
    set %host $gettok($read(bilgipaylasimi.txt,w,%hea),2,11)
    tara %host
    halt
  }
  else {
    msg #test Sonuç yok.
  }
}

alias -l tara {
  var %s = 1,%ss = $lines(bilgipaylasimi.txt) 
  while %s <= %ss {
    if $+(*,$1,*) iswm $+(*,$read(bilgipaylasimi.txt,%s),*) { set %anlikisim $gettok($read(bilgipaylasimi.txt,%s),1,11) | msg #test Bu Host'un kullandığı nick > %anlikisim  } 
    inc %s
  }
}

aliaytenF397E13B.B0A32A35.7461F6B0.IP11:36:10