changeset 4389 | d1c65b60cd68 |
parent 4376 | 9654205a9424 |
child 4393 | 883b979697e4 |
4388:b14e24444bca | 4389:d1c65b60cd68 |
---|---|
54 if not isPaused then inc(RealTicks, Lag); |
54 if not isPaused then inc(RealTicks, Lag); |
55 |
55 |
56 case GameState of |
56 case GameState of |
57 gsLandGen: begin |
57 gsLandGen: begin |
58 GenMap; |
58 GenMap; |
59 ParseCommand('sendlanddigest', true); |
|
59 GameState:= gsStart; |
60 GameState:= gsStart; |
60 end; |
61 end; |
61 gsStart: begin |
62 gsStart: begin |
62 if HasBorder then DisableSomeWeapons; |
63 if HasBorder then DisableSomeWeapons; |
63 AddClouds; |
64 AddClouds; |