hedgewars/uGearsRender.pas
changeset 10441 d2f599997b54
parent 10390 13bfbade06a5
child 10443 42dadeb6e8ae
--- a/hedgewars/uGearsRender.pas	Mon Oct 20 19:50:46 2014 +0200
+++ b/hedgewars/uGearsRender.pas	Sat Oct 25 10:42:30 2014 -0400
@@ -810,24 +810,13 @@
         begin
         if defaultPos then
             begin
-            if HH^.Team^.hasGone then
-                 Tint($FFFFFF80)
-            else if HH^.Effects[hePoisoned] <> 0 then
-                 Tint($B7FFBCFF)
-            else Tint(HH^.Gear^.Tint);
+            if HH^.Team^.hasGone then Tint($FFFFFF80);
             DrawSpriteRotatedF(sprHHIdle,
                 sx,
                 sy,
                 (RealTicks div 128 + Gear^.Pos) mod 19,
                 sign,
                 0);
-            untint;
-            DrawSpriteRotatedF(sprHHIdle,
-                sx,
-                sy,
-                (RealTicks div 128 + Gear^.Pos) mod 19 + 32,
-                sign,
-                0);
             HatVisible:= true;
             end;