big revamping, part 1

dynamic.inc

@@ -1,12 +1,38 @@
 /*
  */
 
+// =======================================================
+//		rajout d'une patrouille en vol
+//		2 janvier 2026
+
+#local CK = clock / 150;		// en radians
+#local RD = 63;				// rayon deplacement
+#local Xp = RD * sin(CK);
+#local Zp = RD * cos(CK);
+
+object	{
+	#local L2 = 10;
+	#if (0)
+	union	{
+		cylinder { <-L2, 0, 0>, <L2, 0, 0>, 0.4	}
+		cylinder { -y*3, y*3, 0.4 }
+		texture	{ Y_Texture }
+		}
+	#else object { Patrouille rotate 90*y }
+	#end
+
+	rotate		y*degrees(CK)
+	translate	<Xp, 36, Zp>
+	translate	<-30, 0, 0>
+	}
+
+
 // =======================================================
 //	on va tenter de placer quelques trucs
 //	qui bougent sur le rail circulaire
 
 #for (foo, 0, 5)
-#local CK = (NormClock+(foo*0.0197)) * 4.02;	// radians
+#local CK = (NormClock+(foo*0.0204)) * 4.02;	// radians
 #declare Xpos = R_circular * sin(CK);
 #declare Zpos = R_circular * cos(CK);
 #declare AR   = degrees(CK);
@@ -58,7 +84,7 @@ union	{
 	}
 }
 object { BiTrident 	
-			rotate y*(570*Cos_01(NormClock))
+			rotate y*(670*Cos_01(NormClock))
 			translate Pos_RedB_2 + (y*2)
 	}
 
@@ -119,6 +145,8 @@ object { HexaBenz ()
 #local   R = 16.64 * cos(K);
 #local   H =  0.52 * pow(sin(K), 3);
 #declare P_hexawood = P + <0, 0.26+H, 0>;
+#debug "+++++++++++++ P_hexawood defined\n"
+
 object { HexaWood rotate z*R translate P_hexawood }
 
 /*