RosettaCodeData/Task/Loops-Downward-for/FutureBasic/loops-downward-for.basic

window 1, @"Countdown", ( 0, 0, 400, 300 )

NSInteger i

for i = 10 to 0 step -1
print i
next

HandleEvents