on *:Input:#:{
  if ($1 ison $chan) {
    say 4[12>»>3 $1 12<«<4] $2-
    halt
  }
}