on *:input:*:{
  if ($left($1,1) == -) {
    set %modees $chan($chan).mode
  } 
  if ($left($1,1) == -) && ($2-) { 
    msg $chan $1-
    mode $active $left($1,2) $iif($2-,$2-,$null)
  halt }
  if ($left($1,1) == -) && ($mid($1,2,2) !isincs %modees) {
    unset %modees
    halt
  }
  if ($mid($1,2,2) isincs %modees) && ($left($1,1) == -) {
    mode $active $left($1,2) $iif($2-,$2-,$null)
    unset %modees
  }
}
on *:input:*:{
  if ($left($1,1) == $chr(43)) {
  set %modees $chan($chan).mode }
  if ($mid($1,2,2) isincs %modees) && ($left($1,1) == $chr(43)) {
    unset %modees
  }
  if ($mid($1,2,2) !isincs %modees) && ($left($1,1) == $chr(43)) {
    mode $active + $+ $mid($1,2,2) $iif($2-,$2-,$null)
    unset %modees
  }
}