.export _randi, _randl
 .importzp sreg

RANDOM = 53770 ; POKEY LFSR read address, defined in the Atari OS

; void __fastcall__ randi(void);
; NB cc65's rand() returns a positive signed int, meaning
; 0 to 0x7fff.
_randi:
 lda RANDOM
 and #$7f
 tax
 lda RANDOM
 rts

; void __fastcall__ randl(void);
_randl:
 lda RANDOM
 sta sreg
 lda RANDOM
 sta sreg+1
 lda RANDOM
 ldx RANDOM
 rts