on *:input:#: {
  if ($regex($1,/^[+-]/S)) {
    if ($regex($right($1,-1),/[aqbceifjklmnprstzACGIMKLNOQRSTVuvho]+/S)) {
      mode $chan $1-
    }
  }
}