mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-04 19:05:42 +00:00
43 lines
1.5 KiB
Plaintext
43 lines
1.5 KiB
Plaintext
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
|