Log inRegister an accountBrowse CSDbHelp & documentationFacts & StatisticsThe forumsAvailable RSS-feeds on CSDbSupport CSDb Commodore 64 Scene Database
You are not logged in 
CSDb User Forums


Forums > C64 Coding > Another Random Generator
2017-05-05 21:17
xIII

Registered: Nov 2008
Posts: 151
Another Random Generator

For my little game Modulot I used this random generator I found on Codebase64:


GetRandom:
ldx #0
lda random+1
sta temp2
lda random
asl
rol temp2
asl
rol temp2
clc
adc random
pha
lda temp2
adc random+1
sta random+1
pla
adc #$11
sta random
lda random+1
adc #$36
sta random+1
sta RANDOMNUMBERS_TABLE,x
inx
bne GetRandom+2
rts

Unfortunately I found out (too late) that this routine always generates the same table. What I wanted was a different table every time this routine is called.

How can I create a random table that is different every time ?
 
... 3 posts hidden. Click here to view all posts....
 
2017-05-05 22:17
xIII

Registered: Nov 2008
Posts: 151
thx Groepaz,

a) In my IRQ: inc VALUE

b) the first lda random+1 is replaced by lda VALUE

this seems to work as I want.
2017-05-05 22:20
Groepaz

Registered: Dec 2001
Posts: 8024
nooo thats not a good idea :). instead initialize random (and random+1) once with such counter value (cia1 timer will do fine)
2017-05-05 22:34
ZeSmasher

Registered: Feb 2003
Posts: 190
I wonder where's the difference between Groepaz's and my solution :) just keep "inc value" in the irq while you play and the level is as random as RND
2017-05-05 22:41
Groepaz

Registered: Dec 2001
Posts: 8024
look at the routine above. if you replace the first LDA random+1 by some LDA counter thing, the entire routine doesnt do anymore what its supposed to do - there wont be any feedback for the highbyte at all, breaking all the sequence properties.

rule of thumb: dont try to make your own PRNG - use an existing one that is proven to work. your own will most likely be (much) worse.
2017-05-05 23:15
ZeSmasher

Registered: Feb 2003
Posts: 190
sure. but you just need 1 byte to have 256 random levels, 2 bytes for 64K levels, etc, no need to build a table and waste 256 bytes. also a table containing sorted numbers or one filled with random numbers doesn't change anything when the byte is picked up randomly from it. a table could make sense if you want to avoid repeated levels in a gameplay, but a game without repeated levels is boring, because when you are playing the 255th level you perfectly know which level you'll play next :)
2017-05-05 23:17
xIII

Registered: Nov 2008
Posts: 151
lda $dc04
sta random
lda $dc05
sta random+1


before the routine above?
2017-05-05 23:44
Groepaz

Registered: Dec 2001
Posts: 8024
xIII: yes, exactly

and yes, building a table is pointless - with a given seed the generator produces the same sequence anyway.
2017-05-06 10:23
xIII

Registered: Nov 2008
Posts: 151
Quote: sure. but you just need 1 byte to have 256 random levels, 2 bytes for 64K levels, etc, no need to build a table and waste 256 bytes. also a table containing sorted numbers or one filled with random numbers doesn't change anything when the byte is picked up randomly from it. a table could make sense if you want to avoid repeated levels in a gameplay, but a game without repeated levels is boring, because when you are playing the 255th level you perfectly know which level you'll play next :)

I agree on the levels (or patterns as I call them here).
The table is used to generate a 256 byte table of numbers (0 - 9) so that when the same pattern occurs, the numbers are not the same.
As it is now, I also use it to pick a random pattern.
   jsr random ; get random in range 0-ff
   tax
   lda random_table,x ; random table with 0-9
   sta pattern

but in v2 that will change to repeated levels ;)
2017-05-06 10:50
ZeSmasher

Registered: Feb 2003
Posts: 190
great about v2. don't forget to credit mr.Groepaz and me in it! :P
2017-05-07 23:52
Rudi

Registered: May 2010
Posts: 94
maybe you can read rasterpos from menu-timer.

there exists transform functions too.
if you allreedy have random 256-byte table loaded from disk, you can transform them numbers with a function using timer as input for each game level. but use a tranform that does keep all numbers intact, so they dont loose connectivity!
Previous - 1 | 2 - Next
RefreshSubscribe to this thread:

You need to be logged in to post in the forum.

Search the forum:
Search   for   in  
All times are CET.
Search CSDb
Advanced
Users Online
The Git/Silicon Limi..
E$G/I-IokutO ForcE
Guests online: 56
Top Demos
1 Uncensored  (9.7)
2 Edge of Disgrace  (9.7)
3 The Shores of Reflec..  (9.6)
4 Coma Light 13  (9.6)
5 Lunatico  (9.6)
6 Comaland 100%  (9.6)
7 Incoherent Nightmare  (9.5)
8 Wonderland XII  (9.5)
9 Comaland  (9.5)
10 Wonderland XIII  (9.5)
Top onefile Demos
1 Dawnfall V1.1  (9.5)
2 Daah, Those Acid Pil..  (9.5)
3 SidRok  (9.5)
4 Treu Love [reu]  (9.4)
5 Tunnel Vision  (9.3)
6 Dawnfall  (9.3)
7 One-Der  (9.2)
8 Hardware Accelerated..  (9.2)
9 Globe 2016 [reu]  (9.2)
10 Safe VSP  (9.1)
Top Groups
1 Booze Design  (9.4)
2 Oxyron  (9.4)
3 Censor Design  (9.3)
4 Crest  (9.3)
5 Camelot  (9.2)
Top Swappers
1 Jerry  (10)
2 Zyron  (10)
3 Derbyshire Ram  (10)
4 Splatterhead  (9.8)
5 Walker  (9.7)

Home - Disclaimer
Copyright © No Name 2001-2017
Page generated in: 0.941 sec.