;**	Z-100 GENERAL DATA PORT DEFINITIONS
;
;	HARDWARE IS A 6821
;

	NOLIST
;
;		  RESTRICTED RIGHTS LEGEND
;		  ------------------------
;
;	     "Use, duplication, or disclosure by the
;	government is subject to restrictions as set forth
;	in paragraph (b) (3) (B) of the Rights in Technical
;	Data and Computer Software clause in DAR
;	7-104.9(a).  Contractor/manufacturer is Zenith
;	Data Systems Corporation of Hilltop Road, St.
;	Joseph, Michigan 49085.
;
	LIST

;	PORT ASSIGNMENTS

GDPDATA	EQU	ZGDP+PIADATA		;DATA PORT A
GDPDDRA	EQU	ZGDP+PIADDRA		;DATA DIRECTION PORT A
GDPCTLA	EQU	ZGDP+PIACTLA		;CONTROL PORT A
GDPDATB	EQU	ZGDP+PIADATB		;DATA PORT B
GDPDDRB	EQU	ZGDP+PIADDRB		;DATA DIRECTION PORT B
GDPCTLB	EQU	ZGDP+PIACTLB		;CONTROL PORT B

;	CONTROL PORT A ASSIGNMENTS

GDPCAV	EQU	PIAC12+PIAC23+PIADDAC	;INITIALIZATION VALUE
LPENSI	EQU	PIAIRQ1			;CA1 = LIGHT PEN STROBE
					;      INTERRUPT ON 0->1
VSYNCI	EQU	PIAIRQ2			;CA2 = VERTICAL SYNC
					;      INTERRUPT ON 0->1

;	DATA DIRECTION PORT A ASSIGNMENTS

GDPDDAV	EQU	10101111B

;	DATA PORT A ASSIGNMENTS

PPRTM10	EQU	00000011B		;PRINTER D1-D0 MASK
PPRTSTB	EQU	00000100B		;PRINTER STROBE (OUTPUT ACTIVE LOW)
PPRTPRM	EQU	00001000B		;PRINTER PRIME (OUTPUT ACTIVE LOW)
VSYNC	EQU	00010000B		;VERTICAL SYNC (INPUT ACTIVE HIGH)
VSYNCE	EQU	00100000B		;VERT SYNC TO CA2 (0=DISABLE, 1=ENABLE)
LPEN	EQU	01000000B		;LIGHT PEN SWITCH (INPUT ACTIVE HIGH)
LPENSE	EQU	10000000B	;LIGHT PEN STROBE TO CA1 (0=DISABLE, 1=ENABLE)

;	CONTROL PORT B ASSIGNMENTS

GDPCBV	EQU	PIAC12+PIAC20+PIADDAC	;INITIALIZATION VALUE
PRTACKI	EQU	PIAIRQ1			;CB1 = PRINTER ACKNOWLEDGE
					;      NO INTERRUPT ON 0->1
PRTBSYI	EQU	PIAIRQ2			;CB2 = PRINTER BUSY
					;      NO INTERRUPT ON 1->0

;	DATA DIRECTION PORT B ASSIGNMENTS

GDPBDDV	EQU	11111100B

;	DATA PORT B ASSIGNMENTS

PPRTBSY	EQU	00000001B		;PRINTER BUSY (INPUT ACTIVE HIGH)
PPRTFLT	EQU	00000010B		;PRINTER FAULT (INPUT ACTIVE LOW)
PPRTM72	EQU	11111100B		;PRINTER D7-D2 MASK