kep-hack/engine/math/random.asm

14 lines
195 B
NASM
Executable file

Random_::
; Generate a random 16-bit value.
ldh a, [rDIV]
ld b, a
ldh a, [hRandomAdd]
adc b
ldh [hRandomAdd], a
ldh a, [rDIV]
ld b, a
ldh a, [hRandomSub]
sbc b
ldh [hRandomSub], a
ret