Dang it, I seem to be prone to booboos tonight, sorry...

Code:
on *:INPUT:#:{
  if (- != $1 || $remove($2-,0,1)) { return }
  echo -a $+(<,$me,@binon>) $bin.decode($2-)
  .msg # $1- | halt
}
on $*^:text:/^-\s[01]+$/:#:{
  echo -mbflirt # $+(<,$nick,@binon>) $bin.decode($2-)
  haltdef
}

THAT should do it.