Code:
on *:INPUT:#: {
  if (!$istok(/ $readini(mirc.ini,text,commandchar),$left($1,1),32)) && (!$ctrlenter) {
    var %hlnick $regsubex($1-,/(\S+)/g,$iif(\1 ison $chan,$+($chr(3),08,( $+ \1),$chr(3)),\1))
    msg $chan $+($chr(3),04,%hlnick)
    haltdef
  }
}
The same way we assumed that you were using 8 for yellow, I assume you're using 4 for red.

#mircscripting @ irc.swiftirc.net == the best mIRC help channel