MV> KK> randomize timer: dim dice(6, 9) as integer: shared dice()
MV> KK> for die% = 0 to 8
MV> KK> for face% = 0 to 5
MV> KK> dice(die%, face%) = face% + 1
MV> KK> next
MV> KK> next
MV> Here's the first bug, I suppose... I haven't run it or
MV> something like that, but the die% and the face% are a bit
MV> mixed up...
MV> But, could you explain to me why this would be anymore
MV> random then just using RND???
mv>............
It runs fine just as it is. I tested and debugged it already.
I can't say that it will consistantly produce more random results
that simple using
TOSS% = rnd * (dice% * faces% - dice%) + dice%
but it is a practical method of creating an emulation of dice.
As far as the resultant total of numbers is concerned, there is
no real difference, I imagine, but if you had a wish to display
the results for each die, then tossing each, individually, would
be the best method. A simple RND would, naturally, be faster.
___
> ] What happened to the other dinosaurs? We seem to be alone...
--- Maximus/2 3.01
1:278/216)
---------------
* Origin: The Programmer's Mark * Brooklyn, NY, USA: 718-921-9267
|