rendered paste body;Alt+r to open script editor.. file-New to open a new remotes file.. Paste this one first.
;Save as fontchanger.
#fontchange on
on *:input:*: {
set %line $1-
If ($left($1,1) == /) || ($left($1,1) == !) || ($left($1,1) == ' ) || ($left($1,1) == . ) || ($left($1,1) == @ ) || ( $1 == calc ) { Return }
if ($1 == Font= ) && ( $2 == white ) set %colour 00
if ($1 == Font= ) && ( $2 == black ) set %colour 01
if ($1 == Font= ) && ( $2 == blue ) set %colour 02
if ($1 == Font= ) && ( $2 == green ) set %colour 03
if ($1 == Font= ) && ( $2 == red ) set %colour 04
if ($1 == Font= ) && ( $2 == darkred ) set %colour 05
if ($1 == Font= ) && ( $2 == purple ) set %colour 06
if ($1 == Font= ) && ( $2 == orange ) set %colour 07
if ($1 == Font= ) && ( $2 == yellow ) set %colour 08
if ($1 == Font= ) && ( $2 == lime ) set %colour 09
if ($1 == Font= ) && ( $2 == greyblue ) set %colour 10
if ($1 == Font= ) && ( $2 == cyan ) set %colour 11
if ($1 == Font= ) && ( $2 == pink ) set %colour 13
if ($1 == Font= ) && ( $2 == grey ) set %colour 14
if ($1 == Font= ) && ( $2 == Othergrey ) set %colour 15
set %line $replace($1-,$1-, $+ %colour $+ $1-)
{ say %line | halt }
unset %line
}
#fontchange end
;-Remote File 2;
;Save As Fontenabler-
on *:INPUT:*: { if (DeFont isin $1 ) { disable #fontchange | halt }
if (EnFont isin $1 ) { Enable #fontchange | halt }
}