own versions of some common routines, fillram and movedata equal to memset
and memcpy git-svn-id: svn://svn.cc65.org/cc65/trunk@789 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
20
libsrc/geos/common/rand.s
Normal file
20
libsrc/geos/common/rand.s
Normal file
@@ -0,0 +1,20 @@
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak, 15.07.2001
|
||||
;
|
||||
;
|
||||
; int rand (void);
|
||||
; void srand (unsigned seed);
|
||||
;
|
||||
.export _rand, _srand
|
||||
.include "../inc/jumptab.inc"
|
||||
|
||||
.code
|
||||
|
||||
_rand:
|
||||
jsr GetRandom
|
||||
pha
|
||||
jsr GetRandom
|
||||
tax
|
||||
pla
|
||||
_srand:
|
||||
rts
|
||||
Reference in New Issue
Block a user