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

17 lines
377 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