Here's one way to do it, with a button-script:
(B
(Bon mouseUp
(B  repeat
(B    if the number of lines in tResult > 5 then exit repeat
(B    put random(10) into tRand
(B    if tRand is not among the lines of tResult then
(B      put tRand & cr after tResult
(B    end if
(B  end repeat
(B  delete the last char of tResult
(B  replace cr with comma in tResult
(B  put tResult into field "fNumbers"
(Bend mouseUp
(B
(BCheers,
(BNicolas Cueto
(Bniconiko language school
(B(Japan)
(B_______________________________________________
(Buse-revolution mailing list
(Buse-revolution@lists.runrev.com
(Bhttp://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to