--- a/hedgewars/uGears.pas	Thu Dec 30 20:55:22 2010 +0100
+++ b/hedgewars/uGears.pas	Thu Dec 30 22:20:17 2010 +0100
@@ -477,7 +477,8 @@
                 gear^.nImpactSounds:= 1;
                 gear^.AdvBounce:= 0;
                 gear^.Radius:= 16;
-                gear^.Tag:= 0;
+                // set color
+                gear^.Tag:= 2 * gear^.Timer;
                 gear^.Timer:= 15000;
                 gear^.RenderTimer:= false;
                 gear^.Health:= 100;