@Code Dim i=0 Do While i < 5 i += 1 @
Line @i
Loop End Code