My first 'Post New Topic', ok I will quit it with the 'firsts' 
I re-ran the rndtest script and this is the results after 397873 runs:
1=132926, 2=132511, 3=132425, 4=11, other=0
This is supposed to return a random number between 1 and 3 inclusive. 11 4's have occured in almost 400 thousand RND()s, that's about 0.00275% error.
rndtest.KiX
code:
break on cls
srnd(val(substr(@time, 7, 2)))
$other="" $four=0
:again
$c=rnd(2)+1
$total=$total+1
select
case $c=1 $one=$one+1
case $c=2 $two=$two+1
case $c=3 $three=$three+1
case $c=4 $four=$four+1
case 1 $other=$other + "$c, "
endselect
at(0,0)
"1=$one, 2=$two, 3=$three, 4=$four, other=$other, total=$total "
goto again
cj
------------------
For more scripts goto my website and click the hammer and spanner icon.
chrismat@ozemail.com.au
