Fix service variables

TODO

@@ -1,5 +1,4 b''
 
-* Service variables
 * Save-load game in slots
 * CLI build for Linux
 * CLI build for Windows

examples/txt2gam-game.txt

@@ -1,7 +1,7 b''
 
 # start
 USEHTML=1
-BCOLOR = RGB(200, 200, 200)
+BCOLOR = RGB(250, 250, 200)
 '<center><font size="20" color="#FF0000" face="Times New Roman"><b>Текстовый квест</b></font></center><br>'
 '   <b>Ваша цель</b> - зарабатывать <i>деньги</i>, покупать на них <i>подарки</i> и дарить своим <i>близким</i>.'
 ACT '<b>Начать игру</b>':GOTO 'Дом'

src/api.ps

@@ -384,7 +384,7 b''
                (if (< (length hex) 2)
                    (+ "0" hex)
                    hex))))
-      (+ "#" (rgb-to-hex red) (rgb-to-hex green) (rgb-to-hex red)))))
+      (+ "#" (rgb-to-hex red) (rgb-to-hex green) (rgb-to-hex blue)))))
 
 ;;; Saves
 

src/js-syms.lisp

@@ -33,6 +33,8 b''
  style display src
  page-x page-y
  top left
+ background-image background-color
+ color inner-text font-size font-family font-name
  ;; lib
  *number parse-int
  to-string to-upper-case concat