Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsUtils.pas
changeset 12048 475a1289f940
parent 11867 f6d33710baff
child 12150 bbefbd1a3b0a 
--- a/hedgewars/uGearsUtils.pas	Wed Nov 23 19:43:40 2016 +0100
+++ b/hedgewars/uGearsUtils.pas	Wed Nov 23 20:25:44 2016 +0100
@@ -282,7 +282,7 @@
                     RenderHealth(CurrentHedgehog^);
                     RecountTeamHealth(CurrentHedgehog^.Team);
                     i:= 0;
-                    while i < vampDmg do
+                    while (i < vampDmg) and (i < 1000) do
                         begin
                         vg:= AddVisualGear(hwRound(CurrentHedgehog^.Gear^.X), hwRound(CurrentHedgehog^.Gear^.Y), vgtStraightShot);
                         if vg <> nil then
hedgewars