hedgewars/GSHandlers.inc
changeset 2730 f56592281526
parent 2726 a84fc5113d01
child 2735 f2008d0ce3f8
equal deleted inserted replaced
2729:c216de4d0c93 2730:f56592281526
    91 var dmg: Longword;
    91 var dmg: Longword;
    92 begin
    92 begin
    93 if(Gear^.Invulnerable) then exit;
    93 if(Gear^.Invulnerable) then exit;
    94 if _0_4 < Gear^.dY then
    94 if _0_4 < Gear^.dY then
    95 	begin
    95 	begin
       
    96 	dmg:= ModifyDamage(1 + hwRound((hwAbs(Gear^.dY) - _0_4) * 70), Gear);
       
    97     if dmg < 1 then exit;
       
    98 
    96 	if _0_6 < Gear^.dY then
    99 	if _0_6 < Gear^.dY then
    97 		PlaySound(sndOw4, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
   100 		PlaySound(sndOw4, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
    98 	else
   101 	else
    99 		PlaySound(sndOw1, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack);
   102 		PlaySound(sndOw1, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack);
   100 
   103 
   101 	dmg:= ModifyDamage(1 + hwRound((hwAbs(Gear^.dY) - _0_4) * 70), Gear);
       
   102     ApplyDamage(Gear, dmg);
   104     ApplyDamage(Gear, dmg);
   103 	end
   105 	end
   104 end;
   106 end;
   105 
   107 
   106 ////////////////////////////////////////////////////////////////////////////////
   108 ////////////////////////////////////////////////////////////////////////////////