on *:INPUT:*:{
     if ($left($1,1) = $chr(43)) || ($left($1,1) = $chr(45)) {
0   if ($left($active,1) = $chr(35)) {
0        mode $chan $iif($len($1) > 2,$1,$1 $+ $str($mid($1,2,12),$gettok($2-,0,32))) $2- $iif($regex($1,[+-][vhoaqeI]),$me)
      ;haltdef
    }
   if ($active = Status Window) {
     mode $me $1-
   haltdef
} } }