hedgewars/hwengine.pas
changeset 6986 409dd3851309
parent 6954 a61458a81480
child 7021 0c75512a8920
equal deleted inserted replaced
6985:caa41003f42c 6986:409dd3851309
    66                 DisableSomeWeapons;
    66                 DisableSomeWeapons;
    67             AddClouds;
    67             AddClouds;
    68             AddFlakes;
    68             AddFlakes;
    69             AssignHHCoords;
    69             AssignHHCoords;
    70             AddMiscGears;
    70             AddMiscGears;
    71             StoreLoad;
    71             StoreLoad(false);
    72             InitWorld;
    72             InitWorld;
    73             ResetKbd;
    73             ResetKbd;
    74             SoundLoad;
    74             SoundLoad;
    75             if GameType = gmtSave then
    75             if GameType = gmtSave then
    76                 begin
    76                 begin
   130 ////////////////////
   130 ////////////////////
   131 procedure OnDestroy;
   131 procedure OnDestroy;
   132 begin
   132 begin
   133     WriteLnToConsole('Freeing resources...');
   133     WriteLnToConsole('Freeing resources...');
   134     FreeActionsList();
   134     FreeActionsList();
   135     StoreRelease();
   135     StoreRelease(false);
   136     ControllerClose();
   136     ControllerClose();
   137     CloseIPC();
   137     CloseIPC();
   138     TTF_Quit();
   138     TTF_Quit();
   139 {$IFDEF SDL13}
   139 {$IFDEF SDL13}
   140     SDL_GL_DeleteContext(SDLGLcontext);
   140     SDL_GL_DeleteContext(SDLGLcontext);