SRL Archive - OSR Help

Ok guys im trying to use the MarkTime function, how do i reset the timer/counter?

Just re-mark it, MarkTimer(int) or set the int to 0.

program ResetTime;

{$i SRL/SRL.simba}

Var Timer: Integer;

begin
  MarkTime(Timer);
  Repeat
    Wait(1000);
    WriteLn('Timer is at ' + IntToStr(TimeFromMark(Timer)) + ' miliseconds');
    If TimeFromMark(Timer) > 5000 Then
    Begin
      Writeln('5 seconds have passed, resetting');
      MarkTime(Timer);
    End;
  Until(False)
end.

:) Example