; Repeat Example
; --------------

; Vary the dice rolls on every run
SeedRnd MilliSecs()

; Repeat always runs its block at least once - Until tests afterwards
turns=0
Repeat
    turns=turns+1
    roll=Rand(1,6)
    Print "Turn "+turns+": you rolled a "+roll
Until roll=6

Print ""
Print "A six! You escaped the dungeon after "+turns+" turns."

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

End