Just a colour thing type /cr and it will bring a dialog put in the colours Using a then when uve put in both the colours and click ok you will type in the colours you put in :)
dialog cr {
title "COLOUR SCRIPT"
size -1 -1 200 60
text "Pick 2 Colours for Coloured Text! :D" 1, 2 1 200 100
text "And" 2, 65 20 35 20
edit "" 3, 20 17 35 20
edit "" 4, 100 17 35 20
button "Ok" 5, 65 40 60 20
button "Close" 6, 2 40 60 20
button "Off" 7, 125 40 60 20
}
on *:dialog:cr:*:*: {
if ($devent == sclick) {
if ($did == 5) {
set %colourscript on
$iif($did(cr,3) == $null, halt, set %colour1 $did(cr,3))
$iif($did(cr,4) == $null, halt, set %colour2 $did(cr,4))
dialog -x cr cr
}
if ($did == 6) {
dialog -x cr cr
}
if ($did == 7) {
unset %colour*
dialog -x cr cr
}
}
if ($devent == init) {
$iif(%colour1 != $null, did -a cr 3 %colour1)
$iif(%colour2 != $null, did -a cr 4 %colour2)
}
}
alias cr {
dialog -m cr cr
}
on *:input:*: {
if ($left($1,1) != $chr(47)) && (%colourscript == on) {
set %ntxt %colour1 $+ * $+ %colour2 $+ * $+
set %none ""
set %txt $replace($1-,$chr(32),)
set %p 1
set %i 1
while ($mid(%txt,%i,1) != $null) {
if ($gettok(%ntxt,%p,42) == $null) { set %p 1 }
set %none %none $+ $+ $gettok(%ntxt,%p,42) $+ $mid(%txt,%i,1)
inc %p 1
inc %i 1
}
set %ptext $replace(%none,,$chr(32))
say %ptext | unset %none | unset %ptext | unset %txt | unset %p | unset %i | unset %ntxt
halt
}
}