%% Index=i
%% Start=0
%% Stop=N
%% Step=1
%Index%:=%Start%;
while (%Index%<%Stop%) do begin
 %Index%:=%Index%+%Step%;
end;

