Click above to get retro games delivered to your door ever month!

 __syscolor          System colors array
------------------------------------------------------------------------------
 Declaration
   color.hdr

 Syntax
   byte __syscolor[ 32 ]

 Default
   See table below.

 Description
   The __syscolor[] system array holds color attributes for screen display.
   Array elements are arranged as summarized in the table below.

   --------------------------------------------------------------------------
   Ix Description               Default color    Constant       Variable
   --------------------------------------------------------------------------
    0 standard color            BLACK_LIGHT_GREY CLR_STD        __color_std
    1 enhanced color            WHITE_BLACK      CLR_ENHCD      __color_enhcd
    2 scoreboard color          BLACK_LIGHT_GREY CLR_SCORE      __color_score
    3 inactive items            WHITE_BLACK      CLR_INACT      __color_inact
    4 selected inactive items   WHITE_BLACK      CLR_INACT_SEL
    5 unselected choice letters BLACK_LIGHT_GREY CLR_UNSEL_CH
    6 selected choice letters   WHITE_BLACK      CLR_SEL_CH
    7 editor (standard text)    BLACK_LIGHT_GREY CLR_ED_TXT
    8 editor (marked text)      WHITE_BLACK      CLR_ED_MARKED
    9 non-selected menu prompts BLACK_LIGHT_GREY CLR_PROMPT
   10 selected menu prompt      WHITE_BLACK      CLR_PROMPT_SEL
   11 messages (menu to)        BLACK_LIGHT_GREY CLR_MESSAGE
   12-15 (unused)               BLACK_LIGHT_GREY
   16 monochrome                BLACK_LIGHT_GREY CLR_DBE_MONO
   17 unselected records        BLACK_LIGHT_GREY CLR_DBE_STD
   18 selection bar             BLACK_LIGHT_GREY CLR_DBE_SEL
   19 selected cell             BLACK_LIGHT_GREY CLR_DBE_CELL
   20 marked records            BLACK_LIGHT_GREY CLR_DBE_MARKED
   21 header                    BLACK_LIGHT_GREY CLR_DBE_HEAD
   22-31 (unused)               BLACK_LIGHT_GREY
   --------------------------------------------------------------------------

   The unused elements in __syscolor[] may be used by future Force
   versions. The savecolor()/restcolor() pair of procedures saves/restores
   all 32 elements of the array.

 Example
   #define EXAMPLE_SCREEN
   #include example.hdr

   vardef sfar
      char( 20 ) cName := "Juanita"
      char( 20 ) cCity := "Los Angeles"
   enddef
   
   proc Test_syscolor
   clear
   ? "Hello"
   __syscolor[ CLR_STD   ] := BLACK_LIGHT_CYAN
   __syscolor[ CLR_ENHCD ] := WHITE_RED
   __syscolor[ CLR_SCORE ] := BLACK_LIGHT_GREEN
   __syscolor[ CLR_INACT ] := WHITE_BLUE
   ? "Hello again"
   set scoreboard on
   @ 4, 0 get cName
   @ 6, 0 get cCity
   read
   endproc

   proc main
   Test_syscolor()
   endproc