#IP-Nick Tracker - Updated

[IP Nick Tracker - WHOIS ONJOIN]
----------------------------------------------
- The IP Nick Tracker whoises on join in all channels you're part of
- It opens in another @window and not in active window to keep your active window clean
- The whois info and nicks tracked are being saved in tracker.txt for future reference
- The IP Nick Tracker displays Nick, Alt Nicks used, IP address, Full names used, last seen (date) and channel just where it got spotted joining.
----------------------------------------------



#IP-Nick Tracker on
alias tracker.txt {
  return tracker.txt
}

on *:JOIN:#: { window -De @whois
  var %mask = $mask($fulladdress,2)
  var %nfname = $mask($fulladdress,0)

  ; get the previous nicks
  var %nicks = $readini(tracker.txt, %mask, nicks)

  ; get the previous full names
  var %fname = $readini(tracker.txt, %mask, fullname)

  ; add the new nick ($addtok will take care of duplicates)
  var %nicks = $addtok(%nicks,$nick,32)

  ; add the new fname ($addtok will take care of duplicates)
  var %fname = $addtok(%fname,$ial(%mask).user,32)


  ; update the nicks
  writeini -n tracker.txt %mask nicks %nicks

  ; update the seen time
  writeini -n tracker.txt %mask seentime $date

  ; update the fullname
  writeini -n tracker.txt %mask fullname %fname

  echo -t @whois BEGIN > $nick ------------------------------------------
  echo -t @whois IP %mask
  echo -t @whois Alt Nicks:  $readini(tracker.txt, %mask, nicks)
  echo -t @whois Full Names:  $readini(tracker.txt, %mask, fullname)
  echo -t @whois Last seen on  $readini(tracker.txt, %mask, seentime)
  echo -t @whois Spotted Just Joined In: $chan
  echo -t @whois END > $nick ------------------------------------------
}

alias ntrack {
  var %mask = $address($1,2)
  var %nfname = $address($1,0)
  ; get the previous nicks
  var %nicks = $readini(tracker.txt, %mask, nicks)
  ; get the pervious full names
  var %fname = $readini(tracker.txt, %mask, fullname)
  ; add the new nick ($addtok will take care of duplicates)
  var %nicks = $addtok(%nicks,$nick,32)
  ; add the new fname ($addtok will take care of duplicates)
  var %fname = $addtok(%fname,$ial(%mask).user,32)
  echo -a 12 $1 On The Host %mask has used the nicks:  $readini(tracker.txt, %mask, nicks) and the full names:  $readini(tracker.txt, %mask, fullname)  and was last seen on  $readini(tracker.txt, %mask, seentime)
}

alias tracker.txt {
  return tracker.txt
}

on !1:nick: { window -De @whois
  var %mask = $mask($fulladdress,2)
  var %nfname = $mask($fulladdress,0)

  ; get the previous nicks
  var %nicks = $readini(tracker.txt, %mask, nicks)

  ; get the pervious full names
  var %fname = $readini(tracker.txt, %mask, fullname)

  ; add the new nick ($addtok will take care of duplicates)
  var %nicks = $addtok(%nicks,$newnick,32)

  ; add the new fname ($addtok will take care of duplicates)
  var %fname = $addtok(%fname,$ial(%mask).user,32)

  ; update the nicks
  writeini -n tracker.txt %mask nicks %nicks

  ; update the seen time
  writeini -n tracker.txt %mask seentime $date

  ; update the fullname
  writeini -n tracker.txt %mask fullname %fname

  echo -t @whois BEGIN $nick ------------------------------------------
  echo -t @whois IP %mask
  echo -t @whois Alt Nicks:  $readini(tracker.txt, %mask, nicks)
  echo -t @whois Full Names:  $readini(tracker.txt, %mask, fullname)
  echo -t @whois Last seen on  $readini(tracker.txt, %mask, seentime)
  echo -t @whois END $nick ------------------------------------------
}

#IP-Nick Tracker end