hedgewars/GSHandlers.inc
changeset 1861 98de5dc5fda7
parent 1849 2a989e5abda6
child 1865 ebc6dfca60d4
equal deleted inserted replaced
1860:ce140b2b928a 1861:98de5dc5fda7
    46 	if _0_6 < Gear^.dY then
    46 	if _0_6 < Gear^.dY then
    47 		PlaySound(sndOw4, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
    47 		PlaySound(sndOw4, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
    48 	else
    48 	else
    49 		PlaySound(sndOw1, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack);
    49 		PlaySound(sndOw1, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack);
    50 
    50 
    51 	dmg:= 1 + hwRound((hwAbs(Gear^.dY) - _0_4) * 70);
    51 	dmg:= modifyDamage(1 + hwRound((hwAbs(Gear^.dY) - _0_4) * 70));
    52 	inc(Gear^.Damage, dmg);
    52 	inc(Gear^.Damage, dmg);
    53 	AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y) + cHHRadius, dmg, PHedgehog(Gear^.Hedgehog)^.Team^.Clan^.Color);
    53 	AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y) + cHHRadius, dmg, PHedgehog(Gear^.Hedgehog)^.Team^.Clan^.Color);
    54 	end
    54 	end
    55 end;
    55 end;
    56 
    56