hedgewars/uGearsRender.pas
branchhedgeroid
changeset 5644 4ad07103cfae
parent 5615 104f69e798bb
parent 5612 2638dec1b323
child 5725 e27100a0e2d0
equal deleted inserted replaced
5641:06558ee35f51 5644:4ad07103cfae
   883 var
   883 var
   884     HHGear: PGear;
   884     HHGear: PGear;
   885     i: Longword;
   885     i: Longword;
   886     startX, endX, startY, endY: LongInt;
   886     startX, endX, startY, endY: LongInt;
   887 begin
   887 begin
   888     if Gear^.TargetX <> NoPointX then
   888     if Gear^.Target.X <> NoPointX then
   889         if Gear^.AmmoType = amBee then
   889         if Gear^.AmmoType = amBee then
   890             DrawRotatedF(sprTargetBee, Gear^.TargetX + WorldDx, Gear^.TargetY + WorldDy, 0, 0, (RealTicks shr 3) mod 360)
   890             DrawRotatedF(sprTargetBee, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360)
   891         else
   891         else
   892             DrawRotatedF(sprTargetP, Gear^.TargetX + WorldDx, Gear^.TargetY + WorldDy, 0, 0, (RealTicks shr 3) mod 360);
   892             DrawRotatedF(sprTargetP, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360);
   893 
   893 
   894     case Gear^.Kind of
   894     case Gear^.Kind of
   895           gtGrenade: DrawRotated(sprBomb, x, y, 0, Gear^.DirAngle);
   895           gtGrenade: DrawRotated(sprBomb, x, y, 0, Gear^.DirAngle);
   896       gtSnowball: DrawRotated(sprSnowball, x, y, 0, Gear^.DirAngle);
   896       gtSnowball: DrawRotated(sprSnowball, x, y, 0, Gear^.DirAngle);
   897        gtGasBomb: DrawRotated(sprCheese, x, y, 0, Gear^.DirAngle);
   897        gtGasBomb: DrawRotated(sprCheese, x, y, 0, Gear^.DirAngle);