Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
turn off sparks for drowning dynamite
authornemo
Tue, 10 May 2016 13:28:37 -0400
changeset 11806 2af936302bab
parent 11805 42c11b73f68e
child 11807 93621207563b
turn off sparks for drowning dynamite
hedgewars/uGearsRender.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uGearsRender.pas	Fri May 06 20:00:55 2016 +0200
+++ b/hedgewars/uGearsRender.pas	Tue May 10 13:28:37 2016 -0400
@@ -1270,7 +1270,7 @@
                     end;
         gtDynamite: begin
                     DrawSprite(sprDynamite, x - 16, y - 25, Gear^.Tag and 1, Gear^.Tag shr 1);
-                    if (random(3) = 0) then
+                    if (random(3) = 0) and ((Gear^.State and gstDrowning) = 0) then
                         begin
                         vg:= AddVisualGear(hwRound(Gear^.X)+12-(Gear^.Tag shr 1), hwRound(Gear^.Y)-16, vgtStraightShot);
                         if vg <> nil then
hedgewars