(AdiIRC) Colorize Nickname Prefix On Channel Messages for valek

adi_channel_prefix_color.mrc

ON *:INPUT:#: {
  if (!$inpaste) && (!$ctrlenter) && ($comchar !== $left($1,1)) {
    .msg $chan $1-

    echo -t $chan < $+ $col_prefix($nick($chan,$me).cmode) $+ $me $+ >: $1-

    halt
  }
}

ON ^*:TEXT:*:#: { 
  haltdef

  window -g1 $chan

  echo -t $chan < $+ $col_prefix($nick($chan,$nick).cmode) $+ $nick $+ >: $1-
}

alias -l col_prefix {
  if (!$1) { return }

  if ($1 == ~) { var %c = $rgb( [ $readini($adiircini,n,colors,color_96) ] ).hex | return $+($chr(4),%c,~,$chr(4)) } ; color_96
  if ($1 == &) { var %c = $rgb( [ $readini($adiircini,n,colors,color_95) ] ).hex | return $+($chr(4),%c,&,$chr(4)) } ; color_95
  if ($1 == @) { var %c = $rgb( [ $readini($adiircini,n,colors,color_40) ] ).hex | return $+($chr(4),%c,@,$chr(4)) } ; color_40
  if ($1 == %) { var %c = $rgb( [ $readini($adiircini,n,colors,color_41) ] ).hex | return $+($chr(4),%c,%,$chr(4)) } ; color_41
  if ($1 == +) { var %c = $rgb( [ $readini($adiircini,n,colors,color_42) ] ).hex | return $+($chr(4),%c,+,$chr(4)) } ; color_42
}