hedgewars/uGame.pas
changeset 8027 e5ba3dd12531
parent 7837 3e031b3b33e6
child 8204 9a6030d96273
--- a/hedgewars/uGame.pas	Wed Nov 14 22:08:40 2012 -0500
+++ b/hedgewars/uGame.pas	Wed Nov 14 22:27:05 2012 -0500
@@ -50,17 +50,16 @@
 
     if (GameType = gmtDemo) then 
         if isSpeed then
-        begin
+            begin
             i:= RealTicks-SpeedStart;
             if i < 2000 then Lag:= Lag*5
             else if i < 4000 then Lag:= Lag*10
             else if i < 6000 then Lag:= Lag*20
             else if i < 8000 then Lag:= Lag*40
             else Lag:= Lag*80;
-        end
-        else
-            if cOnlyStats then
-                Lag:= High(LongInt);
+            end
+        else if cOnlyStats then
+            Lag:= High(LongInt)
     end;
 PlayNextVoice;
 i:= 1;