duplicate the ammoshove block into the falling fire area - this will make falling flames take out hogs in saucers, on rope, etc. no more dodging your own napalm strike by taking to the skies...
authornemo
Sat, 29 Nov 2014 14:00:40 -0500
changeset 10578 814acf1511be
parent 10577 5e075da5e0a4
child 10579 2effda40c3b2
duplicate the ammoshove block into the falling fire area - this will make falling flames take out hogs in saucers, on rope, etc. no more dodging your own napalm strike by taking to the skies...
hedgewars/uGearsHandlersMess.pas
--- a/hedgewars/uGearsHandlersMess.pas	Sat Nov 29 18:56:42 2014 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Sat Nov 29 14:00:40 2014 -0500
@@ -2139,6 +2139,21 @@
         begin
         AllInactive := false;
 
+        if GameTicks and $F = 0 then
+            begin
+            Gear^.Radius := 7;
+            tdX:= Gear^.dX;
+            tdY:= Gear^.dY;
+            Gear^.dX.QWordValue:= 120000000;
+            Gear^.dY.QWordValue:= 429496730;
+            Gear^.dX.isNegative:= getrandom(2)<>1;
+            Gear^.dY.isNegative:= true;
+            AmmoShove(Gear, 2, 125);
+            Gear^.dX:= tdX;
+            Gear^.dY:= tdY;
+            Gear^.Radius := 1
+	    end;
+
         if ((GameTicks mod 100) = 0) then
             begin
             vgt:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtFire, gstTmpFlag);