hedgewars/uGearsRender.pas
changeset 15844 4ede5e84278a
parent 15770 ff8bd08f7d98
child 15928 73cdc306888f
--- a/hedgewars/uGearsRender.pas	Sat Oct 16 02:20:15 2021 +0300
+++ b/hedgewars/uGearsRender.pas	Sat Oct 16 02:39:22 2021 +0300
@@ -1748,8 +1748,8 @@
                     else DrawSpriteRotatedF(sprCreeper, x, y, 1, hwRound(SignAs(_1,Gear^.dX)), 0);
             gtSentry: begin
                 DrawSpriteRotated(sprSentry, x, y, hwSign(Gear^.dX), 0);
-                if Gear^.Tag >= 0 then
-                    DrawCircle(x, y, Gear^.Radius, 1, 255, 0, 0, 255);
+                if Gear^.Hedgehog <> nil then
+                    DrawCircle(x, y, Gear^.Radius, 2, Gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF);
             end;
             gtGenericFaller: begin
                              // DEBUG: draw gtGenericFaller