FUNCTION SATTCOLOR()

  Short:
  ------
  SATTCOLOR() Sets up color vars for color monitor

  Returns:
  --------
  Nil

  Syntax:
  -------
  SATTCOLOR()

  Description:
  ------------
  This sets up the system color and interface variables
  described in SLS_*() for color monitor defaults.

  If  COLORS.DBF is present, the color set named
  "DEFAULT" is retrieved, otherwise a default set is used.

  Examples:
  ---------
   IF ISCOLOR()
     SATTCOLOR()
   ELSE
     SATTMONO()
   ENDIF

  Source:
  -------
  S_ATTRIB.PRG