X"A7" function 25

Returns the current screen type as recognized by the run-time system.

Syntax:
call x"A7" using function-code
                 parameter
Parameters:
Using call prototype (see Library Routines - Key) Picture (32-bit systems)
function-code cblt-x1-compx pic x comp-x.
parameter cblt-x1-compx pic x comp-x.
On Entry:
function-code Value 25
On Exit:
parameter Bit settings indicating the type of screen as follows:
bit 0 unset = monochrome screen
bit 1 reserved
bit 2 reserved
bit 3 set = EGA-type screen
bit 4 set = VGA-type screen
bit 5 reserved
bit 6 reserved
bit 7 reserved
See Also: