diff -r 5f56c6979496 -r aeb2ac1878dc hedgewars/uGame.pas --- a/hedgewars/uGame.pas Wed Jun 28 18:27:42 2006 +0000 +++ b/hedgewars/uGame.pas Thu Jun 29 18:27:53 2006 +0000 @@ -41,7 +41,7 @@ //////////////////// implementation //////////////////// -uses uMisc, uConsts, uWorld, uKeys, uTeams, uIO, uAI, uGears; +uses uMisc, uConsts, uWorld, uKeys, uTeams, uIO, uAI, uGears, uConsole; procedure DoGameTick(Lag: integer); const SendEmptyPacketTicks: LongWord = 0; @@ -63,7 +63,8 @@ inc(SendEmptyPacketTicks, Lag) end; -if Lag > 100 then Lag:= 100; +if Lag > 100 then Lag:= 100 +else if GameType = gmtSave then Lag:= 1000; for i:= 1 to Lag do if not CurrentTeam.ExtDriven then @@ -78,10 +79,15 @@ case GameType of gmtNet: break; gmtDemo: begin - SendIPC('q'); + ParseCommand('/quit'); GameState:= gsExit; exit - end + end; + gmtSave: begin + RestoreTeamsFromSave; + isSoundEnabled:= isSEBackup; + GameType:= gmtLocal + end; end else ProcessGears end;