NEW
  AUTO 3,1
*--------------------------------------
* ProDOS Reserved ZP Location 00-1F,56-FF
*--------------------------------------
ZP.WNDLFT		.EQ $20 				SCROLL WINDOW LEFT
ZP.WNDWDTH		.EQ $21 				SCROLL WINDOW WIDTH
ZP.WNDTOP		.EQ $22 				SCROLL WINDOW TOP
ZP.WNDBOT		.EQ $23 				SCROLL WINDOW BOTTOM
ZP.CH			.EQ $24					CURSOR HORIZONTAL
ZP.CV			.EQ $25					CURSOR VERTICAL
ZP.GBASL		.EQ $26					LORES BASE LOW
ZP.GBASH		.EQ $27					LORES BASE HIGH
ZP.BASL			.EQ $28					TEXT BASE LOW
ZP.BASH			.EQ $29					TEXT BASE HIGH
ZP.BEND			.EQ $2C					LORES RIGHT END H LINE
ZP.VBOT			.EQ $2D					LORES BOTTOM OF V LINE
ZP.COLOR		.EQ $30					LORES COLOR
ZP.INVFLG		.EQ $32					NORMAL/INVERSE /FLASH (FF,7F,3F)
ZP.PROMPT		.EQ $33					HOLDS PROMPT SYMBOL
ZP.CSWL 		.EQ $36 				OUTPUT CHARACTER HOOK LOW
ZP.CSWH			.EQ $37					OUTPUT CHARACTER HOOK HIGH
ZP.KSWL			.EQ $38					INPUT CHARACTER HOOOK LOW
ZP.KSWH			.EQ $39					INPUT CHARACTER HOOK HIGH
ZP.PCL			.EQ $3A
ZP.PCH			.EQ $3B
ZP.A1L			.EQ	$3C
ZP.A1H			.EQ	$3D
ZP.A2L			.EQ	$3E
ZP.A2H			.EQ	$3F
ZP.A3L			.EQ	$40
ZP.A4L			.EQ	$42

ZP.CMDNUM		.EQ $42
ZP.UNITNUM		.EQ $43
ZP.BUFPTR		.EQ $44
ZP.BLKNUM		.EQ $46

ZP.RNDL			.EQ $4E					RANDOM NUMBER LOW
ZP.RNDH			.EQ $4F					RANDOM NUMBER HIGH
*--------------------------------------
MAN
SAVE inc/zp.i