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

  CLR2NUM()                                                   Color Function
 Purpose..: Return the Clipper color number of a string
-------------------------------------------------------------------------------
 Syntax...: Clr2Num( <cClr> [, 1|2 ] ) --> nClr

 Arguments: <cClr>    = color string.

            [<nPos>]  = 1 represents ForeGround,
                        2 represents Background. The
                        default operation is ForeGround.

 Returns..: <N> nClr is the color attribute number.

 Source...: CLR2NUM.C
-------------------------------------------------------------------------------
 Example..: nFore := Clr2Num( "W+/N", 1 ) // Returns 15
            nBack := Clr2Num( "W+/N", 2 ) // Returns  0