on *:TEXT:!whois on*:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if (%whois) {
      notice $nick Whois check is already on for $+ $chan
    }
    else {
      set %whois $addtok(%channel,$chan,44)
      msg $chan $+ Whois check is now on for $+ $chan
    }
  }
}
on *:TEXT:!whois off*:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if (%whois) { 
      set %whois $remtok(%channel,$chan,1,44)
      msg $chan $+ Whois check is now off for $+ $chan
    }     
    else { 
      notice $nick $+ Whois check is not on for $+ $chan    
    }  
  }
}
on *:JOIN:%whois: {
  whois $nick
  set %msgchan msg $chan
  set %nick $nick
}
raw 319:*:{
  %msgchan $wc1 $+ %nick is on: -  $+ $replace($3-,$chr(43),$chr(32))
  unset %chan
  unset %nick
}