Ensure crates can spawn just below the border on a bordered map.
authornemo
Sat, 25 Aug 2012 13:06:28 -0400
changeset 7599 74db5b16a776
parent 7598 f06d8603097c
child 7600 31a177d2856c
Ensure crates can spawn just below the border on a bordered map.
hedgewars/uGearsUtils.pas
--- a/hedgewars/uGearsUtils.pas	Sat Aug 25 09:17:42 2012 -0400
+++ b/hedgewars/uGearsUtils.pas	Sat Aug 25 13:06:28 2012 -0400
@@ -569,7 +569,9 @@
         repeat
             inc(x, Delta);
             cnt:= 0;
-            y:= min(1024, topY) - 2 * Gear^.Radius;
+            if hasBorder then
+                 y:= min(1024, topY+4)
+            else y:= min(1024, topY) - 2 * Gear^.Radius;
             while y < cWaterLine do
                 begin
                 repeat