AppleIIAsm-Collection/source/d2_stdio/T.MIN.SUB.TRECTF
nathanriggs 9f35f32f67 Revision 0.5.0
- massive overhaul of architecture
- first round of optimizations
- first draft of the technical manual for the entire library
- reorganization of directory structure
2019-09-27 16:57:34 -04:00

32 lines
674 B
Plaintext

]X1 EQU WPAR1
]X2 EQU WPAR1+1
]Y1 EQU WPAR2
]Y2 EQU WPAR2+1
]F EQU BPAR1
]XC EQU VARTAB
]YC EQU VARTAB+1
TRECTF
LDA ]X1
STA ]XC
LDA ]Y1
STA ]YC
:LP1
LDA ]YC
LDY ]XC
JSR GBCALC
LDA ]F
STA (GBPSH),Y
LDA ]YC
INY
STY ]XC
CPY ]X2
BNE :LP1
LDA ]X1
STA ]XC
INC ]YC
LDA ]YC
CMP ]Y2
BNE :LP1
:EXIT
RTS