cc65/libsrc/cbm610/randomize.s

;
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void __randomize (void);
; /* Initialize the random number generator */
;

        .export         ___randomize
        .import         _srand
        .importzp       time

___randomize:
        ldx     time+2          ; Use 50/60HZ clock
        lda     time+1
        jmp     _srand          ; Initialize generator
New randomize() function for nearly all platforms git-svn-id: svn://svn.cc65.org/cc65/trunk@1487 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-05 10:48:20 +00:00			`;`
Fixed the random-seed generators for the Commodore targets. They use a byte from the time counter; but, it is stored in big-endian order. 2015-09-11 14:03:07 +00:00			`; 2002-11-05, Ullrich von Bassewitz`
			`; 2015-09-11, Greg King`
New randomize() function for nearly all platforms git-svn-id: svn://svn.cc65.org/cc65/trunk@1487 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-05 10:48:20 +00:00			`;`
extra underscores for _randomize and _swap 2022-08-29 18:52:35 +00:00			`; void __randomize (void);`
New randomize() function for nearly all platforms git-svn-id: svn://svn.cc65.org/cc65/trunk@1487 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-05 10:48:20 +00:00			`; /* Initialize the random number generator */`
			`;`

extra underscores for _randomize and _swap 2022-08-29 18:52:35 +00:00			`.export ___randomize`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.import _srand`
New randomize() function for nearly all platforms git-svn-id: svn://svn.cc65.org/cc65/trunk@1487 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-05 10:48:20 +00:00			`.importzp time`

extra underscores for _randomize and _swap 2022-08-29 18:52:35 +00:00			`___randomize:`
Fixed the random-seed generators for the Commodore targets. They use a byte from the time counter; but, it is stored in big-endian order. 2015-09-11 14:03:07 +00:00			`ldx time+2 ; Use 50/60HZ clock`
New randomize() function for nearly all platforms git-svn-id: svn://svn.cc65.org/cc65/trunk@1487 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-05 10:48:20 +00:00			`lda time+1`
			`jmp _srand ; Initialize generator`