alias c1 { return $iif(%mycolor1 [ $+ [ $nick ] ],$chr(3) $+ %mycolor1 [ $+ [ $nick ] ] $+ $1-,$chr(03) $+ 07 $1-) }
alias c2 { return $iif(%mycolor2 [ $+ [ $nick ] ],$chr(3) $+ %mycolor2 [ $+ [ $nick ] ] $+ $1-,$chr(03) $+ 14 $1-) }
alias c3 { return $iif(%mycolor3 [ $+ [ $nick ] ],$chr(3) $+ %mycolor3 [ $+ [ $nick ] ] $+ $1-,$chr(03) $+ 04 $1-) }
on *:TEXT:!mycolor*:#:{
  if (!$4) { notice $nick Wrong syntax: !mycolor 07 14 04 }
  if ($2 isnum 1-15) { set %mycolor1 [ $+ [ $nick ] ] $2 }
  if ($2 isnum 1-9 && $left($2,1) != 0) { set %mycolor1 [ $+ [ $nick ] ] 0 $+ $2 }
  if ($3 isnum 1-15) { set %mycolor2 [ $+ [ $nick ] ] $3 }
  if ($3 isnum 1-9 && $left($3,1) != 0) { set %mycolor2 [ $+ [ $nick ] ] 0 $+ $3 }
  if ($4 isnum 1-15) { set %mycolor3 [ $+ [ $nick ] ] $4
    if ($4 isnum 1-9 && $left($4,1) != 0) { set %mycolor3 [ $+ [ $nick ] ] 0 $+ $4 }
    notice $nick You set your colors as $chr(3) $+ %mycolor1 [ $+ [ $nick ] ] This $chr(3) $+ %mycolor2 [ $+ [ $nick ] ] This $chr(3) $+ %mycolor3 [ $+ [ $nick ] ] This
  }
}