From 90894f8008ca3c78983239e302c57e69404085e5 Mon Sep 17 00:00:00 2001
From: Tonton Th <tth@linda.buvette.org>
Date: Sun, 4 Jan 2026 04:16:52 +0100
Subject: [PATCH] explorations

---
 essai.pov    | 44 +++++++++++++++++++++++++++++++-------------
 hexastar.inc |  8 ++++----
 2 files changed, 35 insertions(+), 17 deletions(-)

diff --git a/essai.pov b/essai.pov
index 799c6d6..89d0391 100644
--- a/essai.pov
+++ b/essai.pov
@@ -6,11 +6,9 @@
 #version 3.7;
 
 #include  "globals.inc"
-
+#declare NO_DYNAMIC = 1;
 #include  "all.inc"
 
-//		XXX
-//		XXX
 // =======================================================
 //	nouveau du dernier jour 2025
 
@@ -22,17 +20,36 @@ object { HexaStar translate y*3 }
 }
 
 // =======================================================
+//	nouveau du 3 janvier 2026
+#local Horloge2 = object
+{
+object { Horloge scale <1, 0.12, 1> rotate -x*90	}
+}
+#declare HorlogeDouble = object
+{
+union {
+	box { <-3, 0, -0.01>, <3, 1.55, 0.01>
+			pigment { color Gray50 }	}
+	#local EC = 0.22;
+	object { Horloge2 rotate y*180 translate  z*EC	}
+	object { Horloge2              translate -z*EC	}
+	}
+scale 0.8
+translate y*2
+}
+
 // =======================================================
 /*
  *	new Thu Dec 18 01:14:19 AM UTC 2025
  */
-
 #macro Le_ConeStack ()
 union	{
-	#local Hcs = 0.50;
-	#local Rco = R_basecone * 1.95;
+	#local Hcs = 0.550;
+	#local Rco = R_basecone * 3.333;
 	#for (Foo, 0, 5)
-	  #local Dy = Foo * 0.580;
+	  #local Dx = 0.3 * sin(Foo);
+	  #local Dy = Foo * (Hcs + 0.0333);
+	  #local Dz = 0.3 * cos(Foo);
 	  union {
 		cone { 0, Rco, <0, Hcs, 0>, 0.001
 		#if (rand(Rng1) < 0.50)   texture { Y_Texture }
@@ -44,7 +61,7 @@ union	{
 		#else			  texture { G_Texture }
 		#end			// if rand
 		}
-		translate y * Dy
+		translate <Dx, Dy, Dz>
 		}
 	#end		// for Foo
 	}
@@ -216,8 +233,9 @@ union	{
 	object { Chose () translate < 2.2, 0,  2.32>		}
 	object { Chose () translate <-2.9, 0,  3.91>		}
 	object { Chose () translate < 2.9, 0, -4.07>		}
-	object { Chose () translate <-3.4, 0, -(3+NormClock)>	}
-	object { Repere scale <3, 4, 3> translate 0.05*y }
+	object { Chose () translate <-3.1, 0, -(3+NormClock)>	}
+	object { Chose () translate <-4.5, 0, -4>		}
+	object { Repere scale 2 translate 0.05*y }
 	}
 }
 // =======================================================
@@ -268,12 +286,13 @@ object { Gyros }
 	object { Le_ConeStack ()   translate y*0.20 }
   #break
   #case (3)
-	object { BasicTextures rotate -y*(3*clock) }
+	object { HorlogeDouble /* rotate -y*(5*clock) */ }
+	object { Repere translate y*1 }
   #break
   #case (4)
 	object { Trident_A()
 		scale 1.8
-		rotate <20, 0, 10> translate 2.2*y
+		rotate <28, 0, 12> translate 2.2*y
 		rotate -y*clock }
   #break
   #case (5)
@@ -289,7 +308,6 @@ object { Gyros }
 
 #end     	// switch selector
 
-
 plane {
 	y, 0
 	texture { Ground_Texture  }
diff --git a/hexastar.inc b/hexastar.inc
index 31b554f..38400b0 100644
--- a/hexastar.inc
+++ b/hexastar.inc
@@ -27,8 +27,8 @@ difference {
 #declare HS_element = object
 {
 union	{ 
-	object { HS_element_a texture { GoldDark 	} }
-	object { HS_element_b texture { G_Texture 	} }
+	object { HS_element_a texture { GoldDark }	}
+	object { HS_element_b texture { G_Texture }	}
 	}
 }
 /* ============================================================ */
@@ -36,11 +36,11 @@ union	{
 #declare HS_les_elements = object
 {
 union	{
-	#for (Foo, 0, 60, 359)
+	#for (Foo, 0, 360, 60)
 	  #local E = 0.31;
 	  #local Tx = E * sin(radians(Foo));
 	  #local Ty = E * cos(radians(Foo));
-	object { 
+	  object { 
 		HS_element
 		rotate -z*foo
 		translate <Tx, Ty, 0>