ok all the nick you wrote in the sentence will be underlined simply

on *:INPUT:#: {
  if ($inpaste) || ($ctrlenter) || ($readini(mirc.ini,text,commandchar) != $left($1,1)) {
    var %i = 1, %s = $1- | while ($gettok(%s,%i,32)) { 
      if ($nick($chan,$v1)) { var %s = $puttok(%s,$+(4,$gettok(%s,%i,32),),%i,32) } 
      inc %i
    }
    msg $chan 12 $iif(c isincs $chan($chan).mode,$strip(%s),%s) 
    halt
  }
}