on *:text:*:#: {
  if ($nick == %mnick) {
    write monitor.txt $+ ($chr(40), $asctime(mmm/dd/yyyy),$chr(41)) $+($chr(40),$time(hh:nn:ss TT),$chr(41)) $+($chr(40),$nick,$chr(41)) $1-
  }
}
on *:text:*:?: {
  if ($nick == %mnick) {
    write monitor.txt $+($chr(40), $asctime(mmm/dd/yyyy),$chr(41)) $+($chr(40),$time(hh:nn:ss TT),$chr(41)) $+($chr(40),$nick,$chr(41)) $1-
  }
}
 
alias view { if $isfile(monitor.txt) { window -e @Monitoring | loadbuf -ip @Monitoring monitor.txt } }
 
alias monitor {
  if (!%mnick) {
    set %mnick $1
    echo -a $1 is now being monitored.
  }
  elseif ($1 == %mnick) {
    echo -a %mnick is already being monitored.
  }
}
 
alias unmonitor {
  if (!%mnick) {
    echo -a There is no one being monitored.
  }
  else {
    write -c monitor.txt
    echo -a %mnick not being monitored now.
    unset %mnick
  }
}
 
menu menubar,nicklist { 
  Monitor Nick
  .Monitor Nick:/monitor $$1
  .Unmonitor Nick:/unmonitor $$1
  .View:/view
}
 

Commenting Options