menu nicklist {
  $iif($1,owwScript)
  .$iif($1,Chans $+ $chr(58))
  ..$iif($1,&Echo channels):{
    set %chan $active 
    set %nick $1 
    set %echo true
    .raw whois $snick($active,1)
  }
  ..$iif($1&,Say channels):{
    set %chan $active 
    set %nick $1 
    set %message true
    .raw whois $snick($active,1)
  }
}
raw 319:*: { 
  var %channels $replace($sorttok($3-,32,c),$chr(64),4 $+ $chr(64) $+ 7,$chr(37),7 $+ $chr(37) $+ 7,$chr(43),10 $+ $chr(43) $+ 7)
  if (%joined == true) {
    if (%justjoined. [ $+ [ %chan ] ] == true || $4 == $null) { unset %nick %channels %nick %joined %echo %message }
    if ($4 == $null) { unset %nick %channels %nick %joined %echo %message | halt }
    echo 12 %chan $timestamp %nick is on the following channels:7 %channels
    unset %channels %nick %joined %echo %message
  }
  if (%echo == true) {
    if ($4 == $null) { echo 12 %chan $timestamp %nick is only on this channel | unset %nick %channels %nick %joined %echo %message | halt }
    echo 12 %chan $timestamp %nick is on the following channels:7 %channels
    unset %channels %nick %joined %echo %message
  }
  if (%message == true) {
    if ($4 == $null) { msg $active %nick is only on this channel | unset %nick %channels %nick %joined %echo %message | halt }
    msg $active %nick is on the following channels:7 %channels [12owwScript]
    unset %channels %nick %joined %echo %message
  }
}
on *:JOIN:#: {
  if ($me isop $chan || $me ishop $chan) {
    if (!%justjoined. [ $+ [ $chan ] ]) {
      whois $nick
      set %chan $chan
      set %nick $nick
      set %joined true
    }
  }
}