empathicqubit/cc65
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge pull request #207 from greg-king5/random-seed

Browse source 
Fix the CBM random-seed generators.
This commit is contained in:
Oliver Schmidt 2015-09-11 21:02:40 +02:00
commit 5ff480d6f4
8 changed files with 24 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
libsrc/c128/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -12,6 +13,6 @@
__randomize:
ldx VIC_HLINE ; Use VIC rasterline as high byte
lda TIME ; Use 60HZ clock as low byte
lda TIME+2 ; Use 60HZ clock as low byte
jmp _srand ; Initialize generator

5
libsrc/c16/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -12,6 +13,6 @@
__randomize:
ldx TED_VLINELO ; Use TED rasterline as high byte
lda TIME ; Use 60HZ clock as low byte
lda TIME+2 ; Use 60HZ clock as low byte
jmp _srand ; Initialize generator

5
libsrc/c64/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -12,6 +13,6 @@
__randomize:
ldx VIC_HLINE ; Use VIC rasterline as high byte
lda TIME ; Use 60HZ clock as low byte
lda TIME+2 ; Use 60HZ clock as low byte
jmp _srand ; Initialize generator

5
libsrc/cbm510/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -10,7 +11,7 @@
.importzp time
__randomize:
ldx time ; Use 50/60HZ clock
ldx time+2 ; Use 50/60HZ clock
lda time+1
jmp _srand ; Initialize generator

5
libsrc/cbm610/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -10,7 +11,7 @@
.importzp time
__randomize:
ldx time ; Use 50/60HZ clock
ldx time+2 ; Use 50/60HZ clock
lda time+1
jmp _srand ; Initialize generator

5
libsrc/pet/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -11,7 +12,7 @@
.include "pet.inc"
__randomize:
ldx TIME
ldx TIME+2
lda TIME+1 ; Use 60HZ clock
jmp _srand ; Initialize generator

5
libsrc/plus4/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -12,6 +13,6 @@
__randomize:
ldx TED_VLINELO ; Use TED rasterline as high byte
lda TIME ; Use 60HZ clock as low byte
lda TIME+2 ; Use 60HZ clock as low byte
jmp _srand ; Initialize generator

5
libsrc/vic20/randomize.s
View file

@ -1,5 +1,6 @@
;
; Ullrich von Bassewitz, 05.11.2002
; 2002-11-05, Ullrich von Bassewitz
; 2015-09-11, Greg King
;
; void _randomize (void);
; /* Initialize the random number generator */
@ -16,6 +17,6 @@ __randomize:
lda VIC_HLINE ; Get bit 1-8 of rasterline
rol a ; Use bit 0-7
tax ; Use VIC rasterline as high byte
lda TIME ; Use 60HZ clock as low byte
lda TIME+2 ; Use 60HZ clock as low byte
jmp _srand ; Initialize generator