hedgewars/hwengine.pas
changeset 11534 0ead3a2e0309
parent 11532 bf86c6cb9341
child 11544 b69f5f22a3ba
child 11548 45982bda46cc
equal deleted inserted replaced
11533:3189bf281000 11534:0ead3a2e0309
    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             StoreLoad(false);
       
    84             if not allOK then exit;
    84             AssignHHCoords;
    85             AssignHHCoords;
    85             AddMiscGears;
    86             AddMiscGears;
    86             InitWorld;
    87             InitWorld;
    87             ResetKbd;
    88             ResetKbd;
    88             if GameType = gmtSave then
    89             if GameType = gmtSave then