hedgewars/VGSHandlers.inc
branchhedgeroid
changeset 6224 42b256eca362
parent 6179 b529f88d37d0
child 6291 cfd2483b8c97
--- 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);