changeset 11479 | 846a3b3a3d1c |
parent 11478 | 8c95d5a4366c |
child 11550 | 881231c1ba46 |
--- a/hedgewars/uGearsUtils.pas Thu Dec 31 15:11:44 2015 -0500 +++ b/hedgewars/uGearsUtils.pas Fri Jan 01 10:49:59 2016 -0500 @@ -940,7 +940,7 @@ begin inc(cnt); x:= leftX+GetRandom(rightX-leftX-32)+16; - y:= topY+GetRandom(LAND_HEIGHT-topY-32)+16; + y:= topY+GetRandom(LAND_HEIGHT-topY-64)+48; if NoGearsToAvoid(x, y, 100 div max(1,cnt div 100), 100 div max(1,cnt div 100)) then begin Gear^.State:= Gear^.State or gsttmpFlag;