2015-03-14 21:48:35 +00:00
|
|
|
|
PR#3
|
2015-06-03 18:30:57 +00:00
|
|
|
|
PREFIX /A2OSX.SRC
|
2015-03-14 21:48:35 +00:00
|
|
|
|
NEW
|
|
|
|
|
|
INC 1
|
|
|
|
|
|
AUTO 6
|
|
|
|
|
|
*--------------------------------------
|
2015-06-03 18:30:57 +00:00
|
|
|
|
* ProDOS Reserved ZP Location 00-1F,56-FF
|
|
|
|
|
|
*--------------------------------------
|
2015-03-14 21:48:35 +00:00
|
|
|
|
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
|
|
|
|
|
|
*--------------------------------------
|
2015-06-03 18:30:57 +00:00
|
|
|
|
* 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
|
|
|
|
|
|
*--------------------------------------
|
2015-03-14 21:48:35 +00:00
|
|
|
|
MAN
|
|
|
|
|
|
SAVE INC/ZP.I
|
