hedgewars/hwengine.pas
changeset 11539 0ead3a2e0309
parent 11537 bf86c6cb9341
child 11549 b69f5f22a3ba
child 11553 45982bda46cc
equal deleted inserted replaced
11538:3189bf281000 11539: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