hedgewars/hwengine.pas
changeset 11482 e425a6eb9da3
parent 11356 b8b208501475
child 11486 caa1e84c3ac2
child 11491 2b30283a402c
equal deleted inserted replaced
11481:c4e1d39acc56 11482:e425a6eb9da3
    78             // wave "clouds" on underwater theme look weird w/ weSea, esp the blended bottom portion
    78             // wave "clouds" on underwater theme look weird w/ weSea, esp the blended bottom portion
    79             if (WorldEdge <> weSea) or (Theme <> 'Underwater') then
    79             if (WorldEdge <> weSea) or (Theme <> 'Underwater') then
    80                 AddClouds;
    80                 AddClouds;
    81             AddFlakes;
    81             AddFlakes;
    82             SetRandomSeed(cSeed, false);
    82             SetRandomSeed(cSeed, false);
       
    83             StoreLoad(false);
    83             AssignHHCoords;
    84             AssignHHCoords;
    84             AddMiscGears;
    85             AddMiscGears;
    85             StoreLoad(false);
       
    86             InitWorld;
    86             InitWorld;
    87             ResetKbd;
    87             ResetKbd;
    88             if GameType = gmtSave then
    88             if GameType = gmtSave then
    89                 SetSound(false);
    89                 SetSound(false);
    90             FinishProgress;
    90             FinishProgress;