hedgewars/GSHandlers.inc
changeset 5348 0bc81de36e08
parent 5342 1868c2dc0284
child 5354 e121d0d6823b
--- a/hedgewars/GSHandlers.inc	Wed Jun 29 17:32:05 2011 +0400
+++ b/hedgewars/GSHandlers.inc	Thu Jun 30 13:59:57 2011 +0400
@@ -605,6 +605,7 @@
     begin
     with Gear^ do
         begin
+        State:= State and not gstInvisible;
         X:= X + cWindSpeed * 1600 + dX;
         Y:= Y + dY + cGravity * vobFallSpeed * 8;  // using same value as flakes to try and get similar results
         xx:= hwRound(X);
@@ -725,15 +726,14 @@
         end;
 
 if move then
-    begin
     if gun then
+        DeleteGear(Gear)
+    else
         begin
-        DeleteGear(Gear);
-        exit
-        end;
-    Gear^.X:= int2hwFloat(GetRandom(LAND_WIDTH+1024)-512);
-    Gear^.Y:= int2hwFloat(750+(GetRandom(50)-25))
-    end
+        Gear^.X:= int2hwFloat(GetRandom(LAND_WIDTH+1024)-512);
+        Gear^.Y:= int2hwFloat(750+(GetRandom(50)-25));
+        Gear^.State:= Gear^.State or gstInvisible;
+        end
 end;
 
 ////////////////////////////////////////////////////////////////////////////////