From 3ce1994e970f3563f2d8627efa5013fdfe46c0d3 Mon Sep 17 00:00:00 2001
From: Tonton Th <tth@linda.buvette.org>
Date: Fri, 9 May 2025 20:06:14 +0200
Subject: [PATCH] moving "Horloge" to a better place

---
 essai.pov   | 14 --------------
 gadgets.inc | 30 +++++++++++++++++++++++-------
 2 files changed, 23 insertions(+), 21 deletions(-)

diff --git a/essai.pov b/essai.pov
index c83d855..80b1d92 100644
--- a/essai.pov
+++ b/essai.pov
@@ -17,20 +17,6 @@
 
 // =======================================================
 // #include  "dynamic.inc"
-/* ======================================================= */
-#declare Horloge = object
-{
-#local Texte = str(NormClock, 6, 4);
-#debug concat("Texte horloge ", Texte, "\n\n")
-
-text 	{
-	ttf "datas/DSEG7Classic-Regular.ttf" Texte 0.1, 0
-	texture { T_WIP_alert }
-	}
-scale 3.00   
-rotate 90*x
-translate <-4.5, 0.02, 0> 
-}
 
 // =======================================================
 
diff --git a/gadgets.inc b/gadgets.inc
index bab54f1..0973adf 100644
--- a/gadgets.inc
+++ b/gadgets.inc
@@ -3,6 +3,21 @@
  *   nouveau projet du Thu Dec  5 11:37:05 AM UTC 2024
  */
 
+/* ======================================================= */
+#declare Horloge = object
+{
+#local Texte = str(NormClock, 6, 4);
+#debug concat("Texte horloge ", Texte, "\n\n")
+
+text 	{
+	ttf "datas/DSEG7Classic-Regular.ttf" Texte 0.1, 0
+	texture { T_WIP_alert }
+	}
+scale 3.00   
+rotate 90*x
+translate <-4.5, 0.02, 0> 
+}
+
 // =======================================================
 
 #macro Base_hexapole ()
@@ -26,21 +41,22 @@ prism {
 #macro HexaPole_tubes ()
 #local R = 0.06;
 #local E = 0.666666;
-#local H = H_cone*4;
+#local H = H_cone*3;
 union {
 	#for (A, 0, 359, 60)
 	  #local Xp = E * cos(radians(A));
 	  #local Zp = E * sin(radians(A));
-	  #local Ha = rand(Rng1);
 	union {
-		cylinder { 0, y*H, R }
+		#local H2 = H + rand(Rng1) + rand(Rng1);
+		cylinder { 0, y*H2, R }
 		sphere { 0, R*2 scale <1, 0.666, 1> }
-		sphere { 0, R*2 scale <1, 0.666, 1> translate y*H }
-		#if (Ha < 0.30)
+		sphere { 0, R*2 scale <1, 0.666, 1> translate y*H2 }
+		  #local Ra = rand(Rng1);
+		#if (Ra < 0.30)
 		  texture { T_Chrome_1A }
-		#elseif (Ha < 0.60)
+		#elseif (Ra < 0.60)
 		  texture { T_Chrome_4D }
-		#elseif (Ha < 0.90)
+		#elseif (Ra < 0.90)
 		  texture { T_Brass_2C }
 		#else
 		  texture { Soft_Silver }