Code:
on ^*:text:*:#: {
  haltdef
  set -u4 %tnick $nick
  set -u4 %tmsg1 $1-
  set -u4 %ttchn $chan
  stcolo
  echo $chan $tmsg
}
alias stcolo {
  if ($regex(%tmsg1,$iif($len($color(background)) == 1,$+(/,$chr(3),$chr(40),0,$color(background),$chr(124),$color(background),$chr(40),(?=[^\d]),$chr(41),$chr(41),/g),$+(/,$chr(3),$color(background),/g)))) { set %tmsg $regsubex(%tmsg1,$iif($len($color(background)) == 1,$+(/,$chr(3),$chr(40),0,$color(background),$chr(124),$color(background),$chr(40),(?=[^\d]),$chr(41),$chr(41),/g),$+(/,$chr(3),$color(background),/g)),$chr(3) $+ $color(normal text)) }
  else { set %tmsg %tmsg1 }
}
alias tmsg {
  return $nnick %tmsg
}
alias nnick_ {
  if (%metheme == Close) { return $tstmp $lef $+ $opv_ $+ %tnick $+ $rig }
  else if (%metheme != Close) { return $tstmp $lef $opv_ $+ %tnick $rig }
}
alias lef {
  return $chr(3) $+ %bcp $+ $readini($mircdirsystem/theme.ini, nbrackets, left) $+ $chr(3)
}
alias rig {
  return $chr(3) $+ %bcp $+ $readini($mircdirsystem/theme.ini, nbrackets, right) $+ $chr(3)
}
alias tstmp {
  if (%tstmp == 1) { return $chr(3) $+ %bcp $+ $readini($mircdirsystem/theme.ini, tbrackets, left) $+ $chr(3) $+ $chr(015) $+ $time( $+ %tsform $+ ) $+ $chr(3) $+ %bcp $+ %tright $+ $chr(3) }
}

This is all the code i use.

;---------- Edit

No one that have any suggestions? and add the colors everytime arent bether then the way i use my timestamp..

Last edited by sparta; 18/06/07 07:28 PM.