Whether its Spell Color or Colour, this script is for mycolor (custum colors) for a bot that either uses regular colors or the popular $c1 or $c2 By address
To use, just replace any text with color with $c1 or $c2 etc
and type .mycolors color1 color2
Example: .mycolors 3 10
Note, if you just type .mycolors it resets to default 4 14 - also recommended to change to different colors if wanted non red/grey colors :p
if anything is wrong with it please post it
;The Text File
On $*:TEXT:/^.mycolou?rs? \d\d? \d\d?$/Si:#: {
if (!$2) || (!$3) { goto last }
writeini colour.ini colour1 $address($nick,3) $iif($left($2,1) > 1,0 $+ $2,$2)
writeini colour.ini colour2 $address($nick,3) $iif($left($3,1) > 1,0 $+ $3,$3)
$display($1) $logo(Colours) $c2(Your default colours are now:) $c1(this) and $+($c2(this),.)
halt
:last
remini colour.ini colour1 $address($nick,3)
remini colour.ini colour2 $address($nick,3)
$display($1) $logo(Colours) $c2(Your default colours are now:) $c1(this) and $+($c2(this),.)
}
;The alias's that check a color ini settings for your Address's settings
Alias c1 { return $+($chr(3),$iif($readini(colour.ini,colour1,$address($nick,3)),$v1,04),$1,$chr(3)) }
Alias c2 { return $+($chr(3),$iif($readini(colour.ini,colour2,$address($nick,3)),$v1,14),$1,$chr(3))}
;The alias return for if @ msg # if anything else notice
alias display return $iff($left($1-,1) == @,msg #,notice $nick)
;Custum Logo added for the fun of it - Not needed and recommended that you change because of lameness :p
alias logo return $+($chr(3),$chr(52),$chr(164),$chr(91),$chr(3),$1-,$chr(3),$chr(52),$chr(93),$chr(164),$chr(3))