; Until Example
; -------------

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

turns=0
Repeat
    turns=turns+1
    roll=Rand(1,6)
    Print "Turn "+turns+": you rolled a "+roll
; Until ends the loop once its condition becomes true - tested AFTER each pass
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