!*** MODULE $LPDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! +
 !  LINE PRINTER CHARACTERISTICS DEFINITIONS
 ! -
	PARAMETER LP$M_CR = '00000001'X
	PARAMETER LP$M_MECHFORM = '00000002'X
	PARAMETER LP$M_PRINTALL = '00000004'X
	PARAMETER LP$M_DAVFU = '00000008'X
	PARAMETER LP$M_WRAP = '00000010'X
	PARAMETER LP$M_TRUNCATE = '00000020'X
	PARAMETER LP$M_TAB = '00000040'X
	PARAMETER LP$M_LOWER = '00000080'X
	PARAMETER LP$M_PASSALL = '00000100'X
	PARAMETER LP$M_FALLBACK = '00000200'X
	PARAMETER LP$M_SIXELS = '00000400'X
	PARAMETER LP$M_BITMAPPED = '00000800'X
	PARAMETER LP$M_POLLED = '00001000'X
	PARAMETER LP$M_BIDIRECTIONAL = '00002000'X
	PARAMETER LP$M_PAGE_L = 'FF000000'X
	PARAMETER LP$_LP11 = '00000001'X
	PARAMETER LP$_LA11 = '00000002'X
	PARAMETER LP$_LA180 = '00000003'X
	PARAMETER LP$_PC_PRINTER = '00000008'X
	STRUCTURE /LPDEF/
	UNION
	    MAP
	        PARAMETER LP$S_CR = 1
	        PARAMETER LP$V_CR = 0			 !  CARRIAGE RETURN NEEDED 
	        PARAMETER LP$S_MECHFORM = 1
	        PARAMETER LP$V_MECHFORM = 1		 !  MECHANICAL FORM FEED 
	        PARAMETER LP$S_PRINTALL = 1
	        PARAMETER LP$V_PRINTALL = 2		 !  NON PRINTABLE CHAR. ACCEPT(DMF-32) 
	        PARAMETER LP$S_DAVFU = 1
	        PARAMETER LP$V_DAVFU = 3		 !  DAVFU AVAIL. 
	        PARAMETER LP$S_WRAP = 1
	        PARAMETER LP$V_WRAP = 4			 !  CHAR. WRAP MODE 
	        PARAMETER LP$S_TRUNCATE = 1
	        PARAMETER LP$V_TRUNCATE = 5		 !  TRUNCATE output at carriage width
	        PARAMETER LP$S_TAB = 1
	        PARAMETER LP$V_TAB = 6			 !  TAB needed
	        PARAMETER LP$S_LOWER = 1
	        PARAMETER LP$V_LOWER = 7		 !  PRINTER HAS LOWER CASE 
	        PARAMETER LP$S_PASSALL = 1
	        PARAMETER LP$V_PASSALL = 8		 !  PASSALL MODE 
	        PARAMETER LP$S_FALLBACK = 1
	        PARAMETER LP$V_FALLBACK = 9		 !  FALLBACK MODE
	        PARAMETER LP$S_SIXELS = 1
	        PARAMETER LP$V_SIXELS = 10		 !  HANDLES SIXELS
	        PARAMETER LP$S_BITMAPPED = 1
	        PARAMETER LP$V_BITMAPPED = 11		 !  HANDLES BIT MAPS
	        PARAMETER LP$S_POLLED = 1
	        PARAMETER LP$V_POLLED = 12		 !  Printer will poll device 
	        PARAMETER LP$S_BIDIRECTIONAL = 1
	        PARAMETER LP$V_BIDIRECTIONAL = 13	 !  Bidirectional USB printer
	        PARAMETER LP$S_PAGE_L = 8
	        PARAMETER LP$V_PAGE_L = 24
	        BYTE %FILL (3)				 !  PAGE LENGTH 
	    END MAP
	END UNION
	END STRUCTURE	! LPDEF
!DEC$ END OPTIONS