Hi Dwayne,
put GenerateRandom(6,10) -- the right parameters in your case
function GenerateRandom pHowMuchNumbers,pRange
local tRangeList
-----
repeat until the number of lines of tRangeList = pHowMuchNumbers
set the randomSeed to random(100000)
put random(pRange) into pNum
if pNum is not among the lines of tRangeList then put pNum & cr after tRangeList
end repeat
delete char -1 of tRangeList
return tRangeList
end GenerateRandom
Hope this helps.
Le 27 janv. 05, à 11:34, "D.Rothe" <[EMAIL PROTECTED]> a écrit :
Hi All, I am using the following code to generate a field of 6 random numbers.
repeat 5 times --generate list of 5 random numbers between 1-10 put random(10) & "," after tRnum end repeat delete last char of tRnum --delete last comma put tRnum into fld "numbers"
this works fine but some numbers are repeated in the field, e.g (1,2,3,1,5)
How can I include only unique numbers?
Cheers......Dwayne
Amicalement,
Éric Chatonet 24, Boulevard de Port-Royal 75005 Paris
Fixe : 33 1 43 31 77 62 Mobile : 33 6 20 74 50 89 _______________________________________________ use-revolution mailing list use-revolution@lists.runrev.com http://lists.runrev.com/mailman/listinfo/use-revolution
