diff options
Diffstat (limited to 'rand.s')
-rw-r--r-- | rand.s | 23 |
1 files changed, 23 insertions, 0 deletions
@@ -0,0 +1,23 @@ + + .export _randi, _randl + .importzp sreg + +RANDOM = 53770 ; POKEY LFSR read address, defined in the Atari OS + +; void __fastcall__ randi(void); +_randi: + lda #0 + sta sreg + beq randl1 + +; void __fastcall__ randl(void); +_randl: + lda RANDOM +randl1: + sta sreg + lda RANDOM + sta sreg+1 + lda RANDOM + ldx RANDOM + rts + |