ReC98/th03/math/randring_fill.asm

17 lines
234 B
NASM

public @randring_fill$qv
@randring_fill$qv proc near
push si
mov si, RANDRING_SIZE - 1
@@loop:
call IRand
mov _randring[si], al
dec si
jge short @@loop
if GAME ge 4
mov _randring_p, 0
endif
pop si
ret
@randring_fill$qv endp