PR#3
PREFIX /A2OSX.SRC
NEW
INC 1
AUTO 6
*--------------------------------------
* ProDOS Reserved ZP Location 00-1F,56-FF
*--------------------------------------
WNDLFT			.EQ $20 				SCROLL WINDOW LEFT
WNDWDTH			.EQ $21 				SCROLL WINDOW WIDTH
WNDTOP			.EQ $22 				SCROLL WINDOW TOP
WNDBOT			.EQ $23 				SCROLL WINDOW BOTTOM
CH				.EQ $24					CURSOR HORIZONTAL
CV				.EQ $25					CURSOR VERTICAL
GBASL			.EQ $26					LORES BASE LOW
GBASH			.EQ $27					LORES BASE HIGH
BASL			.EQ $28					TEXT BASE LOW
BASH			.EQ $29					TEXT BASE HIGH
BEND			.EQ $2C					LORES RIGHT END H LINE
VBOT			.EQ $2D					LORES BOTTOM OF V LINE
COLOR			.EQ $30					LORES COLOR
INVFLG			.EQ $31					NORMAL/INVERSE /FLASH (FF,7F,3F)
PROMPT			.EQ $33					HOLDS PROMPT SYMBOL
CSWL 			.EQ $36 				OUTPUT CHARACTER HOOK LOW
CSWH			.EQ $37					OUTPUT CHARACTER HOOK HIGH
KSWL			.EQ $38					INPUT CHARACTER HOOOK LOW
KSWH			.EQ $39					INPUT CHARACTER HOOK HIGH
RNDL			.EQ $4E					RANDOM NUMBER LOW
RNDH			.EQ $4F					RANDOM NUMBER HIGH
*--------------------------------------
* Applesoft FP Registers
*--------------------------------------
EXPSGN    		.EQ $9C
FAC            	.EQ $9D    				-> A1, MAIN FLT PT ACCUMULATOR
FAC.SIGN       	.EQ $A2        			HOLDS UNPACKED SIGN
ARG            	.EQ $A5		   			-> A9, SECONDARY FP ACC
ARG.SIGN       	.EQ $AA
SGNCPR         	.EQ $AB        			FLAGS OPP SIGN IN FP ROUT.
FAC.EXTENSION  	.EQ $AC        			FAC EXTENSION BYTE
*--------------------------------------
MAN
SAVE INC/ZP.I
