SetPullColor()
 Set or get the PULLDOWN and PULLOUT colors.
------------------------------------------------------------------------------

 Syntax:

     SetPullColor( [<aNewPullColors>] ) --> <aPullColors>

     OR

     SetPullColor( <nColor> ) --> <cColor>

     OR

     SetPullColor( <cNewPullColors> ) --> <cFullColorStr>

     OR

     SetPullColor( <lWhen> ) --> <cPairColorStr>

 Arguments:

     <aNewPullColors> is an optional array containing the five color pairs
     used by the MENU system for PULLDOWNs and PULLOUTs.

     <aPullColors> is an array containing the current five color pairs used
     by the MENU system for PULLDOWNs and PULLOUTs.

     <nColor> is numeric expression from 1 to 5 representing the
     corresponding current color pair of the MENU system for PULLDOWNs and
     PULLOUTs.

     <cColor> is character string representing a requested color pair.

     <cNewPullColors> is a character string containing the five color pairs
     used by the MENU system for PULLDOWNs and PULLOUTs.

     <cFullColorStr> is a character string containing the five color pairs
     used by the MENU system for PULLDOWNs and PULLOUTs.

     <lWhen> is a logical representing a passed or failed WHEN codeblock.

     <cPairColorStr> is a character string containing two color pairs.  The
     first color pair represents the color when the PULLDOWN choice is not in
     focus and the second is when it is in focus.  Depending on the value of
     <lWhen> the first color pair will contain the color for an available
     PULLDOWN choice or an unavailable PULLDOWN choice.

 Description:

     The PULLDOWNs and PULLOUTs in the MENU system require 5 color pairs
     to operate:
        1 - accessible choice color
        2 - highlighted choice color
        3 - unaccessible choice color
        4 - hot character in accessible choice
        5 - highlighted unaccessible prompt color

     The MENU system displays all PULLDOWN and PULLOUT choices in an
     accessible color with the Hot key displayed in the hot character color
     unless the WHEN codeblock of a choice fails, then the choice is
     displayed in the unaccessible color only.  When the highlight bar lands
     on a choice the choice is then displayed in the highlighted choice color.

 Example:

     The follow example will set the PULLDOWN/PULLOUT colors to white on
     black for available choices, bright white on black for the hot key,
     black on white (reverse) for the highlighted choice, and grey on black
     for nonaccessable (failed WHEN) choices.  In addition the old colors are
     saved to be restored at the end of the module.

     LOCAL aOldPullColor := SetPullColor( "W/N,N/W,N+/N,W+/N,N+/W" )
     .
     .
     .
     SetPullColor( aOldPullColor )


 Files:  Library is CUACLIP.LIB.