diff --git a/contexte.inc b/contexte.inc
index c6ad325..5cc02a0 100644
--- a/contexte.inc
+++ b/contexte.inc
@@ -118,7 +118,7 @@ union	{
 
 union	{
 	#for (Ang, 0, 359, 15)
-	  #local E = (SzSol * 1.40) + (6*rand(Rng1));
+	  #local E = (SzSol * 1.40) + (8*rand(Rng1));
 	  #local Ra = radians(Ang);
 	  #local Xp = E * cos(Ra);
 	  #local Zp = E * sin(Ra);
diff --git a/essai.pov b/essai.pov
index 8458146..6ffe205 100644
--- a/essai.pov
+++ b/essai.pov
@@ -39,8 +39,6 @@ translate <-4.5, 0.02, 0>
 #debug " ACTION !!!\n"
 
 //  ------------------------------------------------------ ##
-
-
 //  ------------------------------------------------------ ##
 
 #declare Tridents = object
@@ -82,7 +80,7 @@ object { Gyros }
 	#debug "    Cabane+Compteur !!!\n"
   #break
   #case (1)
-	object { HexaPole () }
+	object { HexaPole  }
 	#debug "    Hexapole !!!\n"
   #break
   #case (2)
@@ -124,6 +122,7 @@ object { Repere  translate y*0.6 }
 #local CamZ = CamZ * K;
 
 camera	{
+	orthographic
 	location	<CamX, CamY, CamZ>
 	look_at		<0, 1.4, 0>
 	angle		26 - 3*Cos_01(NormClock)
diff --git a/gadgets.inc b/gadgets.inc
index fd16bdf..bab54f1 100644
--- a/gadgets.inc
+++ b/gadgets.inc
@@ -3,12 +3,29 @@
  *   nouveau projet du Thu Dec  5 11:37:05 AM UTC 2024
  */
 
-#version 3.7;
-
 // =======================================================
-#macro HexaPole ()
+
+#macro Base_hexapole ()
+prism {
+	linear_sweep
+	linear_spline
+	0, // sweep the following shape from here ...
+	1, // ... up through here
+	7, // the number of points making up the shape ...
+    <3,5>, <-3,5>, <-5,0>, <-3,-5>, <3, -5>, <5,0>, <3,5>
+	#if (rand(Rng1) < 0.5)
+	  texture { T_Beton_1 }
+	#else
+	  texture { T_Beton_2 }
+	#end  // if
+  }
+#end   // macro
+
+//  ------------------------------------------------------ ##
+
+#macro HexaPole_tubes ()
 #local R = 0.06;
-#local E = 0.61;
+#local E = 0.666666;
 #local H = H_cone*4;
 union {
 	#for (A, 0, 359, 60)
@@ -37,6 +54,17 @@ union {
 #undef H
 #undef R
 #end
+
+//  ------------------------------------------------------ ##
+
+#macro HexaPole ()
+union	{
+	object { Base_hexapole () scale <0.33, 0.2, 0.33> }
+	object { HexaPole_tubes () translate y*0.2 }
+	rotate y*(33*rand(Rng1))
+	}
+#end   // macro
+
 // =======================================================
 #declare OpenBox = object
 {