Syntax:
call "CBL_SCR_ALLOCATE_VC_COLOR" using table-count
color-attribute
RGB-values
returning status-code
Parameters
-
table-count
- Call prototype (see Key): cblt-x2-compx
- Picture: pic x(2) comp-x.
-
color-attribute
- Call prototype (see Key): cblt-x4-compx occurs ntimes
- Picture: pic x4 occurs ntimes.
-
RGB-values
- Group predefined as cblt-generic-attr-rgb-values containing:
01 cblt-generic-attr-rgb-values typedef.
03 cblte-garv-red-value cblt-x2-compx. *> pic x(2) comp-x.
03 cblte-garv-green-value cblt-x2-compx. *> pic x(2) comp-x.
03 cblte-garv-blue-value cblt-x2-compx. *> pic x(2) comp-x.
03 cblte-garv-filler cblt-x1-compx occurs 2. *> pic x(2).
-
status-code
- See Library Routines - Key.
On Entry:
table-count
|
The number of colors to allocate. |
color-attribute
|
The table of indexes to the locations in the virtual colormap in which to store the specified RGB values. |
RGB-values
|
The table of color(s) to add to the virtual colormap. |
On Exit:
table-count
|
The number of colors successfully allocated. This is normally the number requested but is less if the call was not entirely successful. |
RGB-values
|
The table of RGB values actually used during the search, truncated to suit the environment. |
cblte-garv-filler
|
Unused. |
Comments:
The RGB values can either be specified as a literal or be obtained using a call to the CBL_SCR_NAME_TO_RGB routine.