The code is only changing #channel in red, nothing else is touched.
I tried the code and it works fine for me.
Did you also get the $controlat() and the $colorat() function in the thread I referenced?

The whole code you need to put in your remote is:

Code:
on ^*:text:*:#:{
  hadd -m ontext text $1-
  echo -i2tml # $+(<,$nick(#,$nick).pnick,>) $regsubex(test,$hget(ontext,text),/\B(#[^ \x2c\x07]+)/g,04\1 $+ $controlat($hget(ontext,text),$regml(test,\n).pos))
  haltdef
  hfree ontext
}
alias colorat {
  if ($prop == set) {
    if ($1 != $chr(15)) {
      var %i $iif($2,$2,$gettok(%colorat,2,44))
      %colorat = $1 $+ $iif($1,$iif(%i,$chr(44) $+ %i))
    }
    else %colorat =
  }
  else {
    set -u %colorat
    var %r /(?:\x03(?:(\d+)(?:,(\d+))?)?|(\x0F))/g,%r $regsubex($left($1,$2),%r,$colorat(\1,\2).set)
    %r = %colorat
    unset %colorat
    return $iif(%r != $null,$chr(3) $+ %r)
  }
}

alias controlat {
  if ($prop == set) {
    if ($1 != $chr(15)) {
      if ($1 isin %controlat) %controlat = $remove(%controlat,$1)
      else %controlat = %controlat $+ $1
    }
    else %controlat =
  }
  else {
    set -u %controlat
    var %c $iif($3,$3,kubir),%r $+(/,$chr(40),$left($regsubex($remove(%c,k),/(.)/g,\x $+ $base($replace(\1,u,31,b,2,i,29,r,22),10,16,2) $+ |),-1),|\x0F,$chr(41),/g),%r $regsubex($left($1,$2),%r,$controlat(\1).set)
    %r = %controlat
    unset %controlat
    return %r $+ $iif(k isin %c,$colorat($1,$2))
  }
}
I added the -l switch of /echo which take care of the highlight settings

Last edited by Wims; 11/06/12 02:48 AM.

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