mirror of
https://github.com/pret/pokered.git
synced 2026-09-28 05:48:12 -04:00
U-Fish-PC\Daniel
14 lines
217 B
NASM
Executable File
14 lines
217 B
NASM
Executable File
GenRandom_: ; 13a8f (4:7a8f)
|
|
; generate a random 16-bit integer and store it at $FFD3,$FFD4
|
|
ld a,[rDIV]
|
|
ld b,a
|
|
ld a,[H_RAND1]
|
|
adc b
|
|
ld [H_RAND1],a
|
|
ld a,[rDIV]
|
|
ld b,a
|
|
ld a,[H_RAND2]
|
|
sbc b
|
|
ld [H_RAND2],a
|
|
ret
|