hedgewars/uGearsRender.pas
changeset 15313 01bd0a087163
parent 15242 5c91c5191085
child 15326 ccac4e0472f9
--- a/hedgewars/uGearsRender.pas	Fri Aug 09 23:41:46 2019 +0300
+++ b/hedgewars/uGearsRender.pas	Mon Aug 12 14:56:27 2019 +0300
@@ -1543,6 +1543,12 @@
                     end;
         gtSwitcher: begin
                     setTintAdd(true);
+                    if IsTooDarkToRead(Gear^.Hedgehog^.Team^.Clan^.Color) then
+                        Tint($FFFFFFFF)
+                    else
+                        Tint($000000FF);
+                    DrawSprite(sprSwitchBack, x - 16, y - 56, (RealTicks shr 6) mod 12);
+
                     Tint(Gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF);
                     DrawSprite(sprSwitch, x - 16, y - 56, (RealTicks shr 6) mod 12);
                     untint;