Graphics Function: Returns the current logical write mode, which is used when drawing lines with the LINETO, POLYGON, and RECTANGLE functions.
Module: USE IFQWIN
Syntax
result = GETWRITEMODE( )
Results
The result type is INTEGER(2). The result is the current write mode. Possible return values are:
The default value is $GPSET. These constants are defined in IFQWIN.F90.
The write mode is set with SETWRITEMODE.
Compatibility
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
See Also
SETWRITEMODE, SETLINESTYLE, LINETO, POLYGON, PUTIMAGE, RECTANGLE, SETCOLORRGB, SETFILLMASK, GRSTATUS
Example
! Build as QuickWin or Standard Graphics App.
USE IFQWIN
INTEGER(2) mode
mode = GETWRITEMODE()
END