commit for rabbit

essai.pov

@@ -5,6 +5,8 @@
 
 #version 3.7;
 
+#declare DEBUG_LEVEL = 1;		// un nouveau test ?
+
 #include  "globals.inc"
 #declare NO_DYNAMIC = 1;
 #include  "all.inc"
@@ -39,8 +41,16 @@ translate y*2.35
 // =======================================================
 /*
  *	new Thu Dec 18 01:14:19 AM UTC 2025
+ *	14 janvier 2026, j'ajoute un truc pour {enfin} gérer
+ *	un DEBUG_LEVEL correct.
  */
 #macro Le_ConeStack ()
+
+#ifdef (DEBUG_LEVEL)
+#debug "Cone Stack : DEBUG_LEVEL activated\n"
+#fopen Log "WS/log.essai" write
+#end		// debug level
+
 union	{
 	#local Hcs = 0.550;
 	#local Rco = R_basecone * 3.333;
@@ -48,6 +58,12 @@ union	{
 	  #local Dx = 0.385 * sin(Foo+NormClock);
 	  #local Dy = Foo * (Hcs + 0.0333);
 	  #local Dz = 0.385 * cos(Foo+NormClock);
+	  #local DV = <Dx, Dy, Dz>;
+
+#ifdef (DEBUG_LEVEL)
+#write (Log, Foo, "   ", DV, "\n")
+#end
+
 	  union {
 		cone { 0, Rco, <0, Hcs, 0>, 0.001
 		#if (rand(Rng1) < 0.50)   texture { Y_Texture }
@@ -59,11 +75,17 @@ union	{
 		#else			  texture { G_Texture }
 		#end			// if rand
 		}
-		translate <Dx, Dy, Dz>
+		translate DV
 		}
 	#end		// for Foo
 	}
+
+#ifdef (DEBUG_LEVEL)
+#fclose Log
+#end			// debug level
+
 #end			// macro
+
  
 // =======================================================
 /* nouveau du 20 octobre 2025
@@ -92,7 +114,7 @@ sphere {
 	#elseif (R < 0.666)	texture { M_Texture }
 	#else			texture { Y_Texture }
 	#end
-	finish { specular 0.6 }
+	finish { phong 0.7 specular 0.3 }
 	}
 #end		// macro
 
@@ -308,10 +330,10 @@ union	{
 	// object { Repere translate y*1 }
   #break
   #case (4)
-	object { Trident_A()
+	object { Trident_A ()
 		scale 1.8
-		rotate <28, 0, 12> translate 2.2*y
-		rotate -y*clock }
+		rotate <35, 0, 12> translate 2.2*y
+		rotate -y*(clock*2) }
   #break
   #case (5)
 	object { Les_Boules translate y*0.8  }