1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-14 20:05:05 +00:00
cc65/libsrc/geos-common/system/randomize.s

17 lines
374 B
ArmAsm

;
; Ullrich von Bassewitz, 05.11.2002
;
; void _randomize (void);
; /* Initialize the random number generator */
;
.export __randomize
.import _srand
.include "geossym.inc"
__randomize:
lda random ; get random value from internal generator
ldx random+1
jmp _srand ; and use it as seed