work on Chose, part 2

contexte.inc

@@ -289,10 +289,21 @@ rotate -19 * y
 #declare Les_Choses = object
 {
 union	{
-	object { Chose translate <-25, 0, -31> }
-	object { Chose translate < 20, 0, -34> }
-	object { Chose translate < 41, 0,  71> }
-	object { Chose translate <-44, 0,  60> }
+	/* a l'interieur du 'circular' */
+	object { Chose () translate <-25, 0, -31> }
+	object { Chose () translate < 20, 0, -32> }
+
+	/* a l'exterieur du 'circular' */
+	#for (foo, 0, 359, 20)
+	  #local CK = radians(foo + (5*rand(Rng1)));
+	  #local DX = 79 * sin(CK);
+	  #local DZ = 83 * cos(CK);
+
+	  // #local Texte = str(CK, 5, 3);
+	  // #debug concat ("Les Choses, CK = ", Texte, "\n")
+
+	  object { Chose () translate < DX, 0, DZ> }
+	#end
 	}
 }
 

gadgets.inc

@@ -9,14 +9,26 @@
  *     une idée à creuser davantage...
  */
 
-#macro Chose ()			//  = object
+//  ------------------------------------------------------ ##
+#macro Chose_le_pied ()
 
+merge {
+	cylinder { 0, y/2,   0.07 }
+	cylinder { 0, y/6, 0.33 }
+	texture { T_WIP_alert }
+	}
+#end 			// macro
+//  ------------------------------------------------------ ##
+/*
+ *  Il doit être possible de dissocier le noyau des tiges */
+
+#macro Chose_le_corps ()			//  = object
 merge {
 	difference {
 		cone { -1.2*y, 0.81, 0.2*y, 1.12 }
 		sphere { 0.2*y 0.73 }
 		}
-	#local CK = NormClock * 8.654;
+	#local CK = NormClock * (9.876+rand(Rng1));
 	#for (Foo, 0, 7)
 	  #local C2X = 3.4 * sin(CK+rand(Rng1)) * sin(CK*3);
 	  #local C2Z = 2.3 * (sin(-CK+rand(Rng1)) * cos(CK*(5+rand(Rng1))));
@@ -25,7 +37,7 @@ merge {
 	  cylinder { 0, <C2X, H, C2Z>, R }
 	  sphere { <C2X, H, C2Z>, R }
 	#end
-	#if (rand(Rng1) < 0.42)
+	#if (rand(Rng1) < 0.52)
 	  texture { tPlasticOrange }
 	#else 
 	  texture { Ruby_Glass }
@@ -33,7 +45,14 @@ merge {
 
 	scale <0.62, 0.5, 0.61>
 	rotate -y*clock
-	translate y*1.10
+	translate y*1.05
+	}
+#end				// macro
+//  ------------------------------------------------------ ##
+#macro Chose ()
+union	{
+	Chose_le_pied ()
+	Chose_le_corps ()
 	}
 #end			// macro
 

tools/build-gif89a.sh

@@ -18,8 +18,8 @@ echo "seq $SEQ -> $GIF" | tee -a WS/log
 convert						\
 	-delay 10 -dither none			\
 	-resize 40%				\
-	-colorspace gray -equalize		\
-	-colors 15				\
+	-colorspace gray -normalize		\
+	-colors 14				\
 	frames/$SEQ/?[012]*[369].png		\
 	$GIF