cc65/libsrc/geos-common/system/randomize.s

;
; 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
added _randomize() implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1499 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-10 15:48:57 +00:00			`;`
			`; Ullrich von Bassewitz, 05.11.2002`
			`;`
			`; void _randomize (void);`
			`; /* Initialize the random number generator */`
			`;`

Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.export __randomize`
			`.import _srand`
added _randomize() implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1499 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-10 15:48:57 +00:00
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.include "geossym.inc"`
added _randomize() implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1499 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-11-10 15:48:57 +00:00
			`__randomize:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`lda random ; get random value from internal generator`
			`ldx random+1`
			`jmp _srand ; and use it as seed`