TEXFONT

Finds the font used to draw text strings

Operating state:

GKOP, SGOP, WSAC, WSOP

Syntax

CALL GASK('TEXFONT', font, return-code-variable);

return-code-variable: numeric variable name; returns the return code of the routine call, which can be 0 or 8. See Return Codes for DSGI Routines and Functions.

The GASK('TEXFONT' . . . ) routine returns the current text font. GASK('TEXFONT', . . . ) searches for the current font in the following order:

the value selected in the GSET('TEXFONT', . . . ) function, if specified
the value of the FTEXT= graphics option, if specified
the device's default device-resident font if the device supports a device-resident font
the SIMULATE font