-
Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
... updated code:
[CODE]
rnd ld hl,0xA280 ; xz -> ... ; yw -> zt
ld (rnd+1),de ; x = y, z ... ,a ; w = t
ld (rnd+4),hl
ret
Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
... /> [CODE]
10 PLOT RND*128,RND*128
20 GOTO 10 ... />
LET a=1+INT (RND*10)
Many thanks ...Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
Auto generated spritesLooking around for some graphics I came across [url]http://blog.disktree.net/?p=19[/url] , one of several such pages. Need the odd 8x8 UDG or two (…
... you like to alter the RND seed...
[QUOTE]Isn ...Spectaculator Version 7.51 No GamesHello, I am a fully registered user of Spectaculator and a few months ago I re-imaged my PC. I installed the new version (7.51) and found the games…
[QUOTE=RND;584379]Maybe because their owners ...Earth twin foundWow, interesting. [url]http://www.bbc.co.uk/news/science-environment-16040655[/url]
[QUOTE=RND;585069]A planet where the ...Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
Hi Patrik,
Sorry to bother you again but I have noticed a "funny" issue. Now I fully accept it might be down to me and the way I altered the machine code or a bug in BASin. When I run the attached program for the first time in BASin the ...Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
I agree TomD - an excellent routine and very timely as I was struggling to generate decent results with the BASIC RANDOMIZE/RND combo.
Well done Patrik and thank you.
Merry Christmas
PaddyXor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
Thanks Philip. Mofied program now looks like:
[CODE]100 REM Fast
110 REM
120 REM Create MCODE
130 REM
140 CLEAR 63793
150 RESTORE 620: LET a=63798
160 READ v: IF v255-(256-42*INT (256/42)) THEN GO TO 340< ...Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
... , something like INT( ( rnd * 256 + rnd ) * n / 65536 ), where rnd is the USR ...Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
... does):
[code]
call rnd ; 0..255 in L
[code]
loop call rnd ; 0..255 in A
Xor-shift random number generator for Z80[QUOTE=Patrik Rak;320244]Come on, people, [URL="http://www.jstatsoft.org/v08/i14/paper"]xor-shift generators[/URL] devised by Marsaglia, that's the w…
... , something like INT( ( rnd * 256 + rnd ) * n / 65536 ), where rnd is the USR ...Procrustean PrintingHere's a short routine to manage printing of text with command tokens, to avoid messing up the screen when they are expanded. It just prints as many …
... ascending order):
[code]
RND, INKEY$, PI - no spaces either ... /> EXLIST: defb $a5,$a6,$a7 ;RND,INKEY$,PI
defb $c7 ...Calculating percentage..or even calculating percentage. Maths and asm I find verryyy tricky. Can anyone suggest the easiest/best way to calculate a percentage from two 1…
... LET divisor=INT (RND*1000): LET dividend=INT (RND*500)
40 ...2012Next year is the 30th anniversary of our old speccy chum. Is there anything planned to mark this great occasion? Maybe we should have a wos party wi…
[QUOTE=RND;590001]End of the world![/QUOTE]
Better get yersel' a can o' that Lynx 2012 then ;)problem with RND (or maybe INT)I'm using this statement: LET m=(INT (RND*sn)+k1)*k2-k1 to give a pointer m to a 2-byte segment of a string l$. Items k1 & k2 are integer constants…
Noob needs helpSorry gents but decided to have a play with basic...see if I could knock up a shonky as hell space invader type game I seem to have gotten myself co…
[QUOTE=Arjun;593743]A variation on the Chuntey effect perhaps? Who knows... post some code if you need help! ;)[/QUOTE]
the whatawhosis?
I decided to scrub the space invaders for now and tweaked it into a rubbish survival type ...RND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
RANDOMIZE takes an INT value, therefore (as RND is alwaysRND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
... ?
[/QUOTE]
The rnd function doesn't create truly ...RND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
... switched to the machine code RND from Patrik is because the ... BASIC RANDOMIZE/RND would not work in the ...RND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
... of random numbers from RANDOMIZE/RND either. I moved the location ...RND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
... ...I then went with RND*8 instead of RND*4, the original ... the returned value from an RND*8 thing and it's ...RND CommandsExactly how random are they? Reason I ask is I'm using 4 of them to generate a random number, the value of which then assigns movement commands to f…
The expression [QUOTE]INT (RND * 8 )[/QUOTE] will give you ... />
Try using [QUOTE]INT (RND *8 ) + 1[/QUOTE] That will ...
