a lot of minor changes

carto.pov

@@ -14,7 +14,7 @@
 #include  "hexabenz.inc"
 #include  "hexawood.inc"
 #include  "trident.inc"
-
+#include  "xperiment.inc"
 #include  "dynamic.inc"
 
 // ---------------------------------------------------------
@@ -27,6 +27,8 @@
 
 // ---------------------------------------------------------
 
+// ---------------------------------------------------------
+
 object { Repere scale 10 translate y*7 }
 object { Le_Decor }
 

circular.pov

@@ -31,7 +31,7 @@ object { Le_Decor }
 #declare AV = 0.06;
 #declare LatX = R_circ * 0.98 * cos(CK + AV);
 #declare LatY = 3;
-#declare LatZ = R_circ * 0.99 * sin(CK + AV);
+#declare LatZ = R_circ * 0.97 * sin(CK + AV);
 
 camera	{
 	location	<CamX, CamY, CamZ>

essai.pov

@@ -104,6 +104,15 @@ union	{
 }
 // =======================================================
 
+#declare Des_Choses = object
+{
+union	{
+	object { Chose () translate -<-1.7, 0, 0.8>  }
+	object { Chose () translate -< 1.5, 0, 1.2> rotate -y*clock }
+	}
+}
+// =======================================================
+
 #declare Gyros = object
 {
 // #debug "    Les gyros !!!\n"
@@ -139,7 +148,7 @@ object { Gyros }
 	object { HexaWood rotate -y*(clock*0.38) translate y }
   #break
   #case (3)
-	object { Chose () translate y*0.34 rotate -y*clock }
+	object { Des_Choses }
   #break
   #case (4)
 	object { HexaBenz () scale 2 translate 2.7*y rotate -y*clock }

gadgets.inc

@@ -17,9 +17,9 @@ merge {
 	cylinder { 0, y/6, 0.33 }
 	#local R = rand(Rng1);
 	#if ( R < 0.52)
-	  texture { T_WIP_alert }
+	  texture { T_Beton_1 }
 	#else
-	  texture { M_Texture   }
+	  texture { T_Beton_2   }
 	#end
 	}
 #end 			// macro
@@ -45,7 +45,7 @@ merge {
 	#if (rand(Rng1) < 0.52)
 	  texture { tPlasticOrange }
 	#else 
-	  texture { Ruby_Glass }
+	  texture { tPlasticGreen }
 	#end	// if
 
 	scale <0.62, 0.5, 0.61>

globals.inc

@@ -11,7 +11,7 @@ global_settings	{
 #include  "stones.inc"
 #include  "woods.inc"
 
-#declare Rng1 = seed(1234);
+#declare Rng1 = seed(999);
 #declare foo  = rand(Rng1);
 #declare Rng2 = seed(now*24*60*60);
 #declare bar  = rand(Rng2);

groundbase.inc

@@ -148,7 +148,7 @@ union	{
 			translate Dz + y*H_base }
 	#undef Dz
 	}
-translate y*(H_sol+H_base)
+translate y*(H_sol+H_base)		// XXX Why ?
 }
 
 /* ======================================================= */

panoramic.pov

@@ -13,6 +13,7 @@
 #include  "hexabenz.inc"
 #include  "hexawood.inc"
 #include  "trident.inc"
+#include  "xperiment.inc"
 
 // =======================================================
 object { Le_Decor            }

remote.pov

@@ -36,7 +36,7 @@ object { Le_Decor }
 // object { Repere scale 3 translate <SzSol, 2, SzSol> }
 
 #local DistCam = 299;
-#local CK = -0.101 + (0.201 * NormClock);
+#local CK = -1.101 + (0.201 * NormClock);
 #declare CamX = DistCam * sin(CK);
 #declare CamY = 28;
 #declare CamZ = DistCam * cos(CK);

splined.pov

@@ -21,7 +21,7 @@ object { Le_Decor            }
 // =======================================================
 #declare Spline_1 =
   spline {
-   natural_spline
+   cubic_spline
   -0.2, <-2, 1.0, -2>,		// control point
 
    0.0, < 0, 1.3, -2>,		// start point
@@ -39,8 +39,8 @@ object { Le_Decor            }
 #declare ViewSpline = object
 {
 union {
- 	#for (CK, 0.00, 1.00, 0.0024) 
-	sphere { <0,0,0>, 0.028
+ 	#for (CK, 0.00, 1.00, 0.0017) 
+	sphere { <0,0,0>, 0.022
      		texture{
 			pigment {color rgb <0.20, 0.14, 0.14> }
 			finish {ambient 0.15 diffuse 0.85 phong  0.6 }
@@ -98,7 +98,7 @@ union	{
 
 /*	P1 and P2 are computed in AllTheSpline object		*/
 #local P1B = (P1 * 10) + <0, 2, 0>;
-#local P2B = (P2 * 10) + <0, 2, 0>;
+#local P2B = (P2 *  8) + <0, 2, 0>;
 #if ( Flag )
   #declare Loc_cam = <87-(12*NormClock), 29-NormClock, 4-(9*exp(NormClock))>;
   #declare Lat_tmp = Interpolate(P1, P2, 0.50);
@@ -106,7 +106,7 @@ union	{
   #declare Ang_cam = 105;
 #else
   #declare Loc_cam = P1B;
-  #declare Lat_cam = P2B * 0.85;
+  #declare Lat_cam = P2B;	// XXX  * 0.85;
   #declare Ang_cam = 52;
 #end