equal
deleted
inserted
replaced
613 begin |
613 begin |
614 tdx:= hwSign(Gear^.dX) * Sin(Gear^.Angle * Pi / cMaxAngle); |
614 tdx:= hwSign(Gear^.dX) * Sin(Gear^.Angle * Pi / cMaxAngle); |
615 tdy:= - Cos(Gear^.Angle * Pi / cMaxAngle); |
615 tdy:= - Cos(Gear^.Angle * Pi / cMaxAngle); |
616 for i:= (Gear^.Power * 24) div cPowerDivisor downto 0 do |
616 for i:= (Gear^.Power * 24) div cPowerDivisor downto 0 do |
617 DrawSprite(sprPower, |
617 DrawSprite(sprPower, |
618 hwRound(Gear^.X) + GetLaunchX(CurAmmoType, hwSign(Gear^.dX), Gear^.Angle) + round(WorldDx + tdx * (24 + i * 2)) - 16, |
618 int64(hwRound(Gear^.X)) + GetLaunchX(CurAmmoType, hwSign(Gear^.dX), Gear^.Angle) + round(WorldDx + tdx * (24 + i * 2)) - 16, |
619 hwRound(Gear^.Y) + GetLaunchY(CurAmmoType, Gear^.Angle) + round(WorldDy + tdy * (24 + i * 2)) - 16, |
619 int64(hwRound(Gear^.Y)) + GetLaunchY(CurAmmoType, Gear^.Angle) + round(WorldDy + tdy * (24 + i * 2)) - 16, |
620 i) |
620 i) |
621 end |
621 end |
622 end; |
622 end; |
623 |
623 |
624 DrawVisualGears(1); |
624 DrawVisualGears(1); |