REM Loops/Do-while

I = 0
REM first iteration - before the While
I = I + 1
PRINT I
IMod6 = I MOD 6
WHILE IMod6 <> 0
  I = I + 1
  PRINT I
  IMod6 = I MOD 6
WEND

END