--- a/hedgewars/VGSHandlers.inc Fri Oct 28 17:41:39 2011 +0200
+++ b/hedgewars/VGSHandlers.inc Fri Oct 28 18:26:17 2011 +0200
@@ -79,7 +79,7 @@
if round(X) < cLeftScreenBorder then X:= X + cScreenSpace else
if round(X) > cRightScreenBorder then X:= X - cScreenSpace;
// if round(Y) < (LAND_HEIGHT - 1024 - 75) then Y:= Y + 25.0; // For if flag is set for flakes rising upwards?
- if round(Y) - 75 > LAND_HEIGHT then Y:= Y - (1024 + 150); // TODO - configure in theme (jellies for example could use limited range)
+ if round(Y) - 225 > LAND_HEIGHT then Y:= Y - (1024 + 300); // TODO - configure in theme (jellies for example could use limited range)
Timer:= 0;
tdX:= 0;
tdY:= 0
@@ -172,7 +172,10 @@
Gear^.Angle:= round(Gear^.Angle + Steps) mod cMaxAngle;
if Gear^.FrameTicks <= Steps then
- DeleteVisualGear(Gear)
+ begin
+ DeleteVisualGear(Gear);
+ exit
+ end
else
dec(Gear^.FrameTicks, Steps);