--- a/hedgewars/uGame.pas	Sat Dec 01 12:38:15 2007 +0000
+++ b/hedgewars/uGame.pas	Sun Dec 02 17:29:20 2007 +0000
@@ -46,6 +46,7 @@
    end;
 if Lag > 100 then Lag:= 100
 else if GameType = gmtSave then Lag:= 2500;
+if (GameType = gmtDemo) and isSpeed then Lag:= Lag * 10;
 
 i:= 1;
 while (GameState <> gsExit) and (i <= Lag) do