grmlgrmlpas2cgrmlgrml
authorsheepluva
Fri, 13 Jun 2014 21:17:50 +0200
changeset 10299 45e3e901b3b9
parent 10298 7d5d93f9a515
child 10300 f70b2fb8acab
grmlgrmlpas2cgrmlgrml
hedgewars/uVisualGearsHandlers.pas
--- a/hedgewars/uVisualGearsHandlers.pas	Fri Jun 13 17:51:55 2014 +0200
+++ b/hedgewars/uVisualGearsHandlers.pas	Fri Jun 13 21:17:50 2014 +0200
@@ -911,7 +911,7 @@
     else
         Gear^.Tint:= $FF000000;
     // fade out alpha
-    Gear^.Tint:= (Gear^.Tint and not $FF) or (255 * Gear^.FrameTicks div 3000);
+    Gear^.Tint:= (Gear^.Tint and (not $FF)) or (255 * Gear^.FrameTicks div 3000);
     end
 end;