hedgewars/uGearsRender.pas
changeset 15342 ccac4e0472f9
parent 15329 01bd0a087163
child 15343 d93d8b51aaca
--- a/hedgewars/uGearsRender.pas	Thu Aug 15 16:26:36 2019 +0200
+++ b/hedgewars/uGearsRender.pas	Thu Aug 15 18:49:45 2019 +0200
@@ -1547,10 +1547,10 @@
                         Tint($FFFFFFFF)
                     else
                         Tint($000000FF);
-                    DrawSprite(sprSwitchBack, x - 16, y - 56, (RealTicks shr 6) mod 12);
+                    DrawSpriteRotatedF(sprSwitchBack, x, y - 40, 0, 0, (RealTicks shr 2) mod 360);
 
                     Tint(Gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF);
-                    DrawSprite(sprSwitch, x - 16, y - 56, (RealTicks shr 6) mod 12);
+                    DrawSpriteRotatedF(sprSwitch, x, y - 40, 0, 0, (RealTicks shr 2) mod 360);
                     untint;
                     setTintAdd(false);
                     end;