hedgewars/uGearsRender.pas
changeset 10528 17eb01474f42
parent 10526 b43d175d1577
child 10547 cc439790ebae
equal deleted inserted replaced
10527:285b428f391c 10528:17eb01474f42
   805                     Gear^.DirAngle);
   805                     Gear^.DirAngle);
   806             if AprilOne and (curhat <> nil) then
   806             if AprilOne and (curhat <> nil) then
   807                 DrawTextureRotatedF(curhat, 1.0, -1.0, 0, sx, sy, 18, sign, 32, 32,
   807                 DrawTextureRotatedF(curhat, 1.0, -1.0, 0, sx, sy, 18, sign, 32, 32,
   808                     sign*Gear^.DirAngle)
   808                     sign*Gear^.DirAngle)
   809             end;
   809             end;
   810             
   810 
   811 
   811 
   812         if ((Gear^.State and gstHHJumping) <> 0) then
   812         if ((Gear^.State and gstHHJumping) <> 0) then
   813             begin
   813             begin
   814             DrawHedgehog(sx, sy,
   814             DrawHedgehog(sx, sy,
   815                 sign*m,
   815                 sign*m,