SRL Archive - Help and Support

I want to make a repeat loop, but inside the repeat loop have an increasing variable. And when that variable gets to 10, reset itself to 0 and print a progress report. I dont exactly know how to go about this…

try reading my tut on this, it will show you all you need to know


http://82.92.130.193/forums/showthread.php?t=1287

while(roflcopter>=10) do
Progress;
roflcopter := 0

I did that, should work right? thanks for the awesome tut. I never even thought to use a while loop :(

here ya go, this is a little more complex but same concept, just you dont need prog to stay at 0 or between 10..

[PHP]procedure proggytest;
var prevprog:integer;
begin
repeat
prevprog:=prog;
repeat
prog:=prog+1;
wait(1000);
until(prog>=prevprog+10)
progressreport;
prog:=prevprog;
until(false)
end;[/PHP]

this is how i would do it…

[php]

var I : Integer;
begin
repeat
for I := 1 to 10 do
begin
DoThisStuff;
end;
Report;
until ( not ( LoggedIn ));
end.

[/php]

Here's what I would do:
[php]procedure NewProcedure;
var
countingvar : Integer;
begin
repeat
countingvar:= countingvar+1;
wait(1000);
if(countingvar = 10)then
begin
progressreport;
countingvar:= 0;
end;
until(false)
end;[/php]

Thank you all for your suggestions, i think ill use meerkat's method since its the one i understand :) lol

For would be better. It's a bit cleaner.

procedure NameMe;
var i: Integer;
begin
  repeat
   for i:= 1 to 10 do
     Wait(1000);
    Report;
  until(false);
end;

for i:= 1 to 10 do

This means that the integer will do whatever it's told to do from 1 to 10 times. I've told it to Wait(1000), so it will do this 10 times. :)

From: XxKanexX
For would be better. It's a bit cleaner.

procedure NameMe;
var i: Integer;
begin
  repeat
   for i:= 1 to 10 do
     Wait(1000);
    Report;
  until(false);
end;

This means that the integer will do whatever it's told to do from 1 to 10 times. I've told it to Wait(1000), so it will do this 10 times. :)

He wanted it to reset to 0, remember?

WhiteShadow, the For..To..Do loop may make it 10 until the next time the loop is called, but the reason for resetting it to zero was for the loop anyway (or so I'm assuming) ;)

Well he can change the 1 to a 0 then.. Although that will do it 11 times.