This is a Nickname Tracker. It tracks nicks associated with the same IP. I did NOT create this, I am posting it for a friend to copy correctly. Thanks.

alias tracker.txt {
  return tracker.txt
}

on !1:JOIN:#: { window -De @joins
  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,$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 @joins Begin $nick ------------------------------------------
  echo -t @joins ip %mask
  echo -t @joins altnicks:  $readini(tracker.txt, %mask, nicks)
  echo -t @joins full names:  $readini(tracker.txt, %mask, fullname) 
  echo -t @joins last seen on  $readini(tracker.txt, %mask, seentime) 
  echo -t @joins Spotted In: $chan    
  echo -t @joins 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 ip %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) 
}
menu nicklist {
  NickTrack:ntrack $$1
}

alias tracker.txt {
  return tracker.txt
}

on !1:nick: { window -De @joins
  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 @joins Begin $nick ------------------------------------------
  echo -t @joins ip %mask
  echo -t @joins altnicks:  $readini(tracker.txt, %mask, nicks)
  echo -t @joins full names:  $readini(tracker.txt, %mask, fullname) 
  echo -t @joins last seen on  $readini(tracker.txt, %mask, seentime) 
  echo -t @joins End $nick ------------------------------------------
}