on *:text:!whois on*:#: {
  if ($nick isop $chan || $nick ishop $chan) && ($2 == on) {
    set %joinwhois. [ $+ [ $chan ] ]
    msg $chan 10»15]|[14join whois now 4on14 for4 $chan 15]|[10«
  }
}
on *:text:!whois off*:#: {
  if ($nick isop $chan || $nick ishop $chan) && ($2 == off) {
    unset %joinwhois. [ $+ [ $chan ] ]
    msg $chan 10»15]|[14join whois now 4off14 for4 $chan 15]|[10«
  }
}
on *:join:#:{ 
  set %joinwhois. [ $+ [ $chan ] ]
  .whois $nick 
} 
raw 319:*:{ 
  if (%joinwhois. [ $+ [ $chan ] ]) {
    msg %joinwhois. [ $+ [ $chan ] ] 10»15]|[4 $2 14is on:4  $3- $+ 15]|[10«
  }
}