hedgewars/uGame.pas
branchexperimental3D
changeset 4004 b1c2c2f6fc5e
parent 3935 5ca27a0e9a63
child 4048 f94d04498031
--- a/hedgewars/uGame.pas	Thu Aug 26 23:59:18 2010 +0200
+++ b/hedgewars/uGame.pas	Wed Oct 27 14:02:20 2010 +0200
@@ -26,7 +26,7 @@
 ////////////////////
    implementation
 ////////////////////
-uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript;
+uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript, uSound, uMobile;
 
 procedure DoGameTick(Lag: LongInt);
 var i: LongInt;
@@ -65,7 +65,10 @@
                         SetBinds(CurrentTeam^.Binds);
                         //CurrentHedgehog^.Gear^.Message:= 0; <- produces bugs with further save restoring and demos
                         isSoundEnabled:= isSEBackup;
-                        GameType:= gmtLocal
+                        if isSoundEnabled then playMusic;
+                        GameType:= gmtLocal;
+                        InitIPC;
+                        perfExt_SaveFinishedSynching();
                         end;
                end
           else ProcessGears