Stuff

on *:input:*: {
  var %mode = $right($1,-1))
  if ($left($1,1) == / && ($left(%mode,1) == + || $left(%mode,1) == -)) {
    if ($right(%mode,1) == b) {
      if (%mode == +b) { mode $chan +b $address($2,2) }
      if (%mode == -b) { mode $chan -b $address($2,2) }
    }
    else {
      mode $chan %mode $2-
      halt
    }
  }
}