Advertisement
Guest User

Untitled

a guest
Apr 27th, 2017
67
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.51 KB | None | 0 0
  1. diff -r ad481d9d48fb hedgewars/uGearsRender.pas
  2. --- a/hedgewars/uGearsRender.pas Fri Apr 28 03:02:15 2017 +0200
  3. +++ b/hedgewars/uGearsRender.pas Fri Apr 28 05:22:05 2017 +0300
  4. @@ -820,11 +820,15 @@
  5. 0,
  6. sign,
  7. 0);
  8. - amBaseballBat: DrawHedgehog(sx, sy,
  9. + amBaseballBat:
  10. + begin
  11. + HatVisible:= true;
  12. + DrawHedgehog(sx, sy,
  13. sign,
  14. 0,
  15. 5,
  16. 0);
  17. + end
  18. else
  19. DrawHedgehog(sx, sy,
  20. sign,
  21. @@ -1028,7 +1032,19 @@
  22. amJetpack: DrawSprite(sprJetpack, sx-32, sy-32, 0);
  23. end
  24. end; *)
  25. - if CurAmmoGear <> nil then
  26. + if (CurAmmoGear = nil) then
  27. + begin
  28. + if ((Gear^.State and (gstAttacked or gstAnimation or gstHHJumping)) = 0)
  29. + and (Gear^.Message and (gmLeft or gmRight) = 0) then
  30. + begin
  31. + amt:= CurrentHedgehog^.CurAmmoType;
  32. + case amt of
  33. + amBaseballBat: DrawSpritePivotedF(sprHandBaseball,
  34. + sx + 9 * sign, sy + 2, 0, sign, -8, 1, aangle);
  35. + end;
  36. + end;
  37. + end
  38. + else
  39. begin
  40. aangle:= Gear^.Angle * 180 / cMaxAngle - 90;
  41. case CurAmmoGear^.Kind of
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement