diff --git a/hexawood.inc b/hexawood.inc
index ec9c010..dd53fd0 100644
--- a/hexawood.inc
+++ b/hexawood.inc
@@ -132,8 +132,8 @@ translate y*0.32
 union	{
 	object { HW_Chassis () }
 	object { HW_les_pattes }
-	#if (mod(clock, 10) < 6)
-	  light_source { 0.20*y rgb <0, 0.20, 0.95> }
+	#if (mod(clock, 8) < 5)
+	  light_source { 0.20*y rgb <0, 0.20, 0.99> }
 	#end
 	object { HW_Cones () translate y*0.15 }
 	object { HW_Anneau0 }