hedgewars/hwengine.pas
changeset 10302 ea0b0e2efd95
parent 10273 99032c5be7ba
child 10304 7e40820b7ed6
equal deleted inserted replaced
10301:6a225b469eef 10302:ea0b0e2efd95
    84             ResetKbd;
    84             ResetKbd;
    85             if GameType = gmtSave then
    85             if GameType = gmtSave then
    86                 SetSound(false);
    86                 SetSound(false);
    87             FinishProgress;
    87             FinishProgress;
    88             PlayMusic;
    88             PlayMusic;
    89             SetScale(zoom);
    89             InitZoom(zoom);
    90             updateViewLimits;
       
    91             ScriptCall('onGameStart');
    90             ScriptCall('onGameStart');
    92             GameState:= gsGame;
    91             GameState:= gsGame;
    93             end;
    92             end;
    94         gsConfirm, gsGame, gsChat:
    93         gsConfirm, gsGame, gsChat:
    95             begin
    94             begin
   274             ParseCommand('fullscr '+intToStr(LongInt(cFullScreen)), true);
   273             ParseCommand('fullscr '+intToStr(LongInt(cFullScreen)), true);
   275             WriteLnToConsole('window resize: ' + IntToStr(cScreenWidth) + ' x ' + IntToStr(cScreenHeight));
   274             WriteLnToConsole('window resize: ' + IntToStr(cScreenWidth) + ' x ' + IntToStr(cScreenHeight));
   276             ScriptOnScreenResize();
   275             ScriptOnScreenResize();
   277             InitCameraBorders();
   276             InitCameraBorders();
   278             InitTouchInterface();
   277             InitTouchInterface();
   279             updateViewLimits();
   278             InitZoom(zoomValue);
   280             SendIPC('W' + IntToStr(cScreenWidth) + 'x' + IntToStr(cScreenHeight));
   279             SendIPC('W' + IntToStr(cScreenWidth) + 'x' + IntToStr(cScreenHeight));
   281         end;
   280         end;
   282 
   281 
   283         CurrTime:= SDL_GetTicks();
   282         CurrTime:= SDL_GetTicks();
   284         if PrevTime + longword(cTimerInterval) <= CurrTime then
   283         if PrevTime + longword(cTimerInterval) <= CurrTime then