hedgewars/uGearsUtils.pas
changeset 10010 2a1483d91977
parent 9998 736015b847e3
child 10011 ead5e4b21671
equal deleted inserted replaced
10009:88929358d2e1 10010:2a1483d91977
   197    King check should be in here instead of ApplyDamage since Tiy wants them kicked less
   197    King check should be in here instead of ApplyDamage since Tiy wants them kicked less
   198 *)
   198 *)
   199 i:= _1;
   199 i:= _1;
   200 if (CurrentHedgehog <> nil) and CurrentHedgehog^.King then
   200 if (CurrentHedgehog <> nil) and CurrentHedgehog^.King then
   201     i:= _1_5;
   201     i:= _1_5;
   202 if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.King or (Gear^.Hedgehog^.Effects[heFrozen] > 0)) then
   202 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog <> nil) and 
       
   203    (Gear^.Hedgehog^.King or (Gear^.Hedgehog^.Effects[heFrozen] > 0)) then
   203     ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_5 * _0_01)
   204     ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_5 * _0_01)
   204 else
   205 else
   205     ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_01)
   206     ModifyDamage:= hwRound(cDamageModifier * dmg * i * cDamagePercent * _0_01)
   206 end;
   207 end;
   207 
   208