h06051
s 00038/00000/00000
d D 1.1 83/03/24 15:18:09 lib 1 0
c date and time created 83/03/24 15:18:09 by lib
e
u
4
U
t
T
I 1

# DEVICE DRIVER COMMON FUNCTION COMMON AREA

#       ndclrf                  current fill area color
#       ndclrl                  current line color
#       ndclrm                  current marker color
#       ndclrp                  current pen station in use
#       ndclrt                  current text color
#       ndflpt                  current fill area pattern
#       ndfstl                  current fill interior style
#       ndlntp                  current line type (style)
#       ndmktp                  current marker type (style)
#       ndmkht                  current marker height 
#       ndotkt                  prompted output buffer counter
#       ndpnpr                  plotter pen prompt level (1=no, 2=yes)
#       ndtxrt                  current text rotation
#       ndtxsz                  current text x size for continuous devices
#       ndtysz                  current text y size for continuous devices
#       ndxpos                  last x coordinate
#       ndypos                  last y coordinate
#       ndlcmd                  current locator input mode (1=request,2=sample)
#       ndvlmd                  current valuator input mode(1=request,2=sample)
#       ndchmd                  current choice input mode  (1=request,2=sample)
#       ndstmd                  current string input mode  (1=request,2=sample)

integer ndclrf, ndclrl, ndclrm, ndclrp, ndclrt, ndflpt, 
	ndfstl, ndlntp, ndmktp, ndmkht, ndotkt, ndpnpr, ndtxrt,
	ndtxsz, ndtysz, ndxpos, ndypos, ndlcmd, ndvlmd, ndchmd, ndstmd
 
#
# COMMON DECLARATIONS
#

common /gssdev/ ndclrf, ndclrl, ndclrm, ndclrp, ndclrt, ndflpt, 
	        ndfstl, ndlntp, ndmktp, ndmkht, ndotkt, ndpnpr, ndtxrt,
	        ndtxsz, ndtysz, ndxpos, ndypos, ndlcmd, ndvlmd, ndchmd,
		ndstmd

E 1
