on *:input:#:{ 
  if (/* !iswm $1) && (!$ctrlenter) && (!$inpaste) {
    say $regsubex($1-,/(\S+)/g,$iif(\1 ison #,$+($chr(2),$chr(3),$nick(#,\1).color,$nick(#,\1).pnick,$chr(2),$chr(3)),\1))
  haltdef }
}