RosettaCodeData/Task/Loops-Do-while/Chipmunk-Basic/loops-do-while.basic

100 rem Loops/Do-while
110 i = 0
120 do
130   i = i+1
140   print i
150 loop until i mod 6 = 0
160 end