AppleIIAsm-Collection/disks/disk3_math8_math16/T.RAND8.MIN
nathanriggs 1b182844cc Math Routines 0.2.0 update
- fixed a plethora of bugs
- overhauled demo
- integrated shared required library and macros
- began early planning of floating-point routines and macros
- created minified, no-comment versions of every routine
2018-12-21 16:47:01 -05:00

19 lines
276 B
Plaintext

** RAND8
*
LDX #8
LDA RNDL+0
:A
ASL
ROL RNDL+1
BCC :B
EOR #$2D
:B
DEX
BNE :A
STA RNDL+0
STA RETURN
LDY #1
STY RETLEN
CMP #0
RTS