; Rand Example
; ------------

; Rand returns a random INTEGER between two values, both inclusive.
; With one argument the low value defaults to 1.

; Seed with the clock so each run rolls differently
SeedRnd MilliSecs()

Print "Rolling two six-sided dice five times:"
For roll=1 To 5
    die1=Rand(1,6)
    die2=Rand(1,6)
    Print "Roll "+roll+": "+die1+" + "+die2+" = "+(die1+die2)
Next

Print ""
Print "Rand(100) uses the default low value of 1: "+Rand(100)
Print ""
Print "(Need random fractions instead? See Rnd.)"

Print ""
Print "Press any key to close the example"
WaitKey

End