# HG changeset patch # User nemo # Date 1370630674 14400 # Node ID 78c699d8fdfd8597c5189fbf0ec0c15a4a35eb71 # Parent 0ab57cdf9346377b8d8c48f7d9b4d3d8e27377bd move 0.01 to the end to avoid increase damage fail on small values like fire. thanks to hedgewars wiki for noting this for fire damage. diff -r 0ab57cdf9346 -r 78c699d8fdfd hedgewars/uGearsUtils.pas --- a/hedgewars/uGearsUtils.pas Fri Jun 07 17:37:01 2013 +0200 +++ b/hedgewars/uGearsUtils.pas Fri Jun 07 14:44:34 2013 -0400 @@ -183,9 +183,9 @@ if (CurrentHedgehog <> nil) and CurrentHedgehog^.King then i:= _1_5; if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.King or (Gear^.Hedgehog^.Effects[heFrozen] > 0)) then - ModifyDamage:= hwRound(_0_01 * cDamageModifier * dmg * i * cDamagePercent * _0_5) -else - ModifyDamage:= hwRound(_0_01 * cDamageModifier * dmg * i * cDamagePercent) + ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_5 * _0_01) +else + ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_01) end; procedure ApplyDamage(Gear: PGear; AttackerHog: PHedgehog; Damage: Longword; Source: TDamageSource);