remove hardcoded shotgun val
authornemo
Wed, 30 Dec 2015 23:20:57 -0500
changeset 11472 c55b3e09a04e
parent 11471 458d90012c22
child 11473 023db094b22d
remove hardcoded shotgun val
hedgewars/uGearsUtils.pas
--- a/hedgewars/uGearsUtils.pas	Wed Dec 30 15:26:25 2015 -0500
+++ b/hedgewars/uGearsUtils.pas	Wed Dec 30 23:20:57 2015 -0500
@@ -1074,7 +1074,7 @@
                     if r-hwRound(dx+dy) > 0 then
                         begin
                         dist:= hwRound(Distance(dx, dy));
-                        dmg:= ModifyDamage(min(r - dist, 25), t);
+                        dmg:= ModifyDamage(min(r - dist, Gear^.Boom), t);
                         end;
                     if dmg > 0 then
                         begin
@@ -1102,7 +1102,7 @@
                     if r-hwRound(dx+dy) > 0 then
                         begin
                         dist:= hwRound(Distance(dx, dy));
-                        dmg:= ModifyDamage(min(r - dist, 25), t);
+                        dmg:= ModifyDamage(min(r - dist, Gear^.Boom), t);
                         end;
                     if dmg > 0 then
                         begin