hedgewars/uGame.pas
branchwebgl
changeset 8446 c18ba8726f5a
parent 8330 aaefa587e277
child 8833 c13ebed437cb
equal deleted inserted replaced
8444:75db7bb8dce8 8446:c18ba8726f5a
    94                         PlayMusic;
    94                         PlayMusic;
    95                         GameType:= gmtLocal;
    95                         GameType:= gmtLocal;
    96                         AddVisualGear(0, 0, vgtTeamHealthSorter);
    96                         AddVisualGear(0, 0, vgtTeamHealthSorter);
    97                         AddVisualGear(0, 0, vgtSmoothWindBar);
    97                         AddVisualGear(0, 0, vgtSmoothWindBar);
    98                         {$IFDEF IPHONEOS}InitIPC;{$ENDIF}
    98                         {$IFDEF IPHONEOS}InitIPC;{$ENDIF}
    99                         with mobileRecord do
    99                         {$IFNDEF PAS2C}with mobileRecord do
   100                             if SaveLoadingEnded <> nil then
   100                             if SaveLoadingEnded <> nil then
   101                                 SaveLoadingEnded();
   101                                 SaveLoadingEnded();
       
   102                         {$ENDIF}
   102                         end;
   103                         end;
   103                 end
   104                 end
   104         else ProcessGears
   105         else ProcessGears
   105         end;
   106         end;
   106     inc(i)
   107     inc(i)