hedgewars/HHHandlers.inc
changeset 519 981df6f6e2a9
parent 518 d48d8c0a546d
child 520 e83dfb7ffead
equal deleted inserted replaced
518:d48d8c0a546d 519:981df6f6e2a9
    46         if (Ammo^[CurSlot, CurAmmo].Propz and ammoprop_Power) <> 0 then
    46         if (Ammo^[CurSlot, CurAmmo].Propz and ammoprop_Power) <> 0 then
    47            begin
    47            begin
    48            StopSound(sndThrowPowerUp);
    48            StopSound(sndThrowPowerUp);
    49            PlaySound(sndThrowRelease, false);
    49            PlaySound(sndThrowRelease, false);
    50            end;
    50            end;
    51         xx:= AngleSin(Angle);
    51         xx:= SignAs(AngleSin(Angle), dX);
    52         xx.isNegative:= dX.isNegative;
       
    53         yy:= -AngleCos(Angle);
    52         yy:= -AngleCos(Angle);
    54              case Ammo^[CurSlot, CurAmmo].AmmoType of
    53              case Ammo^[CurSlot, CurAmmo].AmmoType of
    55                       amGrenade: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtAmmo_Bomb,    0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, Ammo^[CurSlot, CurAmmo].Timer);
    54                       amGrenade: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtAmmo_Bomb,    0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, Ammo^[CurSlot, CurAmmo].Timer);
    56                   amClusterBomb: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtClusterBomb,  0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, Ammo^[CurSlot, CurAmmo].Timer);
    55                   amClusterBomb: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtClusterBomb,  0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, Ammo^[CurSlot, CurAmmo].Timer);
    57                       amBazooka: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtAmmo_Grenade, 0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, 0);
    56                       amBazooka: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtAmmo_Grenade, 0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, 0);