reworking the build system

Makefile

@@ -4,11 +4,12 @@ POVOPT = +q9 +a0.02 -d
 POVDEP = contexte.inc elements.inc hexabenz.inc		\
 		globals.inc datas/hf.png
 
-CK=150
+CK=180
 
 
 PNG:	essai.png scene.png topview.png passage.png	\
-	orbite.png hexabenz.png escadrille.png
+	orbite.png hexabenz.png escadrille.png		\
+	hexacone.png
 
 
 topview.png:		topview.pov Makefile $(POVDEP)
@@ -20,6 +21,9 @@ essai.png:		essai.pov Makefile $(POVDEP)
 hexabenz.png:		hexabenz.pov Makefile $(POVDEP)
 	povray $(POVOPT) $(DIMS) +K$(CK) -i$< -o$@
 
+hexacone.png:		hexacone.pov Makefile $(POVDEP)
+	povray $(POVOPT) $(DIMS) +K$(CK) -i$< -o$@
+
 passage.png:		passage.pov Makefile $(POVDEP)
 	povray $(POVOPT) $(DIMS) -K$(CK)  -i$< -o$@
 

contexte.inc

@@ -29,13 +29,13 @@ union	{
 	object	{ HexaBalls
 		texture { Lightning1 scale 0.33 }
 		rotate <clock/3, clock/6, clock/9>
-		translate <3, -1.6+1.01*Cos_010(NormClock), 5>
+		translate <5, -1.2+1.01*Cos_010(NormClock), 7>
 		}
 
 	object	{ HexaBalls
 		texture { Lightning2 scale 0.56 }
 		// rotate <-clock, clock*0.33333, clock>
-		translate <5, -1+0.42*Cos_010(NormClock), -4>
+		translate <7, -1+0.89*Cos_010(NormClock), -6>
 		}
 	}
 }
@@ -68,10 +68,15 @@ height_field {
 	png "datas/hf.png"
 	smooth
 	translate <-.5, 0, -.5>
-	scale <21, 0.88, 21>
+	scale <SzSol, 0.98, SzSol>
 	texture {
-		pigment { color DarkGreen  }
-		normal { bumps 0.035 scale 0.186 }
+		pigment {
+			// color DarkGreen
+			image_map { png "datas/cmap.png" }
+			translate <-.5, 0, -.5>
+			scale <SzSol, 0.98, SzSol>
+			}
+		// normal { bumps 0.035 scale 0.186 }
 		finish  { phong 0.125 }
 		}
 	}
@@ -90,7 +95,7 @@ union	{
 union {
 	#if (1)
 	light_source {
-		<0.3, 2.50,  2.8>	color Gray90
+		<0.3, 3.50,  2.8>	color Gray90
 		spotlight
 		radius 14 falloff 10 tightness 10
 		point_at <0, 0.95, 0.22222222>
@@ -99,7 +104,7 @@ union {
 
 	#if ( (clock>166) & (clock<213) )
 	light_source {
-		<2, 0.30, -2>	color Yellow
+		<2, 10.30, -2>	color Yellow
 		spotlight
 		radius 12 falloff 20 tightness 10
 		point_at <-0.08, 0.80, 0.17>
@@ -116,7 +121,7 @@ union {
 		#end
 		color Couleur
 		spotlight
-	radius 9 falloff 10 tightness 5
+		radius 12 falloff 10 tightness 5
 		point_at <0, 0.95, -0.22>
 		}
 	#end
@@ -139,7 +144,7 @@ sky_sphere {
 		scale 1.804
 		// translate -1
 		}
-	#local Kem = 0.15;
+	#local Kem = 0.09;
 	emission rgb <Kem, Kem, Kem>
 	}
 // }

elements.inc

@@ -2,22 +2,24 @@
  *   nouveau projet Thu Dec  5 11:37:05 AM UTC 2024
  */
 
+#declare   RA = R_basecone;
+// #declare   RB = 0.001;
+
 #declare HexaCone_shape = object
 {
-#local RA = 0.125;
-#local RB = 0.001;
 union	{
-	cone { 0, RA, <-1,  0,  0>, RB }
-	cone { 0, RA, < 1,  0,  0>, RB }
-	cone { 0, RA, < 0,  0,  1>, RB }
-	cone { 0, RA, < 0,  0, -1>, RB }
-	cone { 0, RA, < 0,  1,  0>, RB }
-	cone { 0, RA, < 0, -1,  0>, RB }
+	cone { 0, RA, <-1,  0,  0>, 0.0001 }
+	cone { 0, RA, < 1,  0,  0>, 0.0001 }
+	cone { 0, RA, < 0,  0,  1>, 0.0001 }
+	cone { 0, RA, < 0,  0, -1>, 0.0001 }
+	cone { 0, RA, < 0,  1,  0>, 0.0001 }
+	cone { 0, RA, < 0, -1,  0>, 0.0001 }
 	}
 }
 
-#declare HexaCone_body = object
-{
+#macro HexaCone_Body ()
+// #declare HexaCone_body = object
+// {
 union	{
 	difference {
 		object { HexaCone_shape }
@@ -27,18 +29,18 @@ union	{
 					RA*0.40 }
 		}
 	difference {
-		sphere {0, 0.20 }
-		sphere {0, 0.18 }
-		cylinder {-x, x, 0.10 }
-		cylinder {-y, y, 0.10 }
-		cylinder {-z, z, 0.10 }
+		sphere {0, 0.21 }
+		sphere {0, 0.19 }
+		cylinder {-x, x, 0.11 }
+		cylinder {-y, y, 0.11 }
+		cylinder {-z, z, 0.11 }
 		}
 	// clignotement de la lumiere \o/
-	#local kR  = 0.073;
+	#local kR  = 0.065;
 	#local xR  = (rand(Rng2)-0.5000) * kR;
 	#local yR  = (rand(Rng2)-0.5000) * kR;
 	#local zR  = (rand(Rng2)-0.5000) * kR;
-	#local Value = sin(NormClock * 26.536);
+	#local Value = sin( (NormClock * 26.536) + (3.14*rand(Rng1)) );
 	#if (Value < 0)
 	  #local Couleur = rgb <abs(Value), 0, 0>;
 	#else
@@ -52,8 +54,8 @@ union	{
 		}
 	}
 texture { New_Penny }
-}
-
+// }
+#end
 /*
  *
  */
@@ -72,7 +74,8 @@ merge	{
 		}
 	}
 }
-#declare HexaCone_radar = object
+
+#declare HexaCone_radar_A = object
 {
 union	{
 #for (foo, 0, 360, 60)
@@ -83,13 +86,30 @@ union	{
 		rotate y*(foo-90)
 		translate <PX, 0, PZ>
 		}
-	#local R2  = 0.08;
 #end
-	torus { R2, 0.0034 translate -0.08*y }
+	torus { 0.08, 0.0034 translate -0.08*y }
 	}
 texture { Soft_Silver scale 6.50 }
 }
 
+#declare HexaCone_radar_B = object
+{
+union	{
+#for (foo, 0, 360, 60)
+	#local RR = 0.12;
+	#local PX = RR * sin(radians(foo));
+	#local PZ = RR * cos(radians(foo));
+	object { Branche_radar  scale 2
+		rotate y*(foo-90)
+		translate <PX, 0, PZ>
+		}
+	#local R2  = 0.11;
+#end
+	torus { R2, 0.0039 translate -0.08*y }
+	}
+texture { T_Brass_1C scale 6.50 }
+}
+
 /*	---------------------------------------------------------
  * new Mon Dec 16 12:44:44 PM UTC 2024
  */
@@ -115,21 +135,25 @@ union	{
 	}
 }
 
+#declare DTa = 0.278;
+#declare DTb = 0.030;
+
 #declare HexaCone_head = object
 {
-#local DTa = 0.278;
-#local DTb = 0.030;
-
 merge	{
 	difference {
 		torus { DTa, DTb }
-		#local TB = 0.50;
+		#local TB = 0.60;
 		box { <-TB, -TB, TB>, <TB, TB, 0> }
 		}
-	sphere { 0, DTb*1.55 translate -DTa*x }
-	sphere { 0, DTb*1.55 translate  DTa*x }
+	sphere { 0, DTb*1.65 translate -DTa*x }
+	sphere { 0, DTb*1.65 translate  DTa*x }
 	}
-texture { Orange_Glass }
+#if (rand(Rng1) < 0.8)
+  texture { Orange_Glass }
+#else
+  texture { Dark_Green_Glass }
+#end
 }
 
 /*	------------------------------------------
@@ -155,7 +179,7 @@ union {
 	#for (foo, -9, 9)
 		object  { Une_Ailettte
 			translate -0.004*z
-			rotate     z*19
+			rotate     z*21
 			rotate (foo*35)*x
 			translate (foo*0.013)*x }
 	#end
@@ -194,7 +218,7 @@ merge	{
 #end
 
 	cylinder { y*Rtuy, y*(Rtuy+0.08), 0.011 scale <2.95, 1, 1> }
-	sphere { 0, 0.017 scale <4.5, 1, 0.717>
+	sphere { 0, 0.017 scale <4.8, 1, 0.717>
 				translate z*(Rtuy+Etuy/3) }
 	}
 texture { T_Brass_1C }
@@ -221,14 +245,20 @@ rotate -y*90
 
 // ###########################################################""
 
-#declare HexaCone = object
-{
+#macro HexaCone ()
+// #declare HexaCone = object
+// {
 union	{
-	object { HexaCone_body }
+	object { HexaCone_Body () }
 	#local T = 0.55;
 	object { HexaCone_head    translate <0, 0, T+DTa>	}
-	object { HexaCone_radar   translate <0, T+0.18, 0>	}
+	#if ( (rand(Rng1) > 0.27) )
+	  object { HexaCone_radar_A   translate <0, T+0.18, 0>	}
+	#else
+	  object { HexaCone_radar_B   translate <0, T+0.18, 0>	}
+	#end
 	object { HexaCone_derives translate <0, 0, -0.67>	}
 	object { Les_Reacteurs      translate -0.18*y 		}
 	}
-}
+// }
+#end    // macro

escadrille.pov

@@ -8,45 +8,45 @@
 
 #include  "globals.inc"
 
-#include  "colors.inc"
-#include  "metals.inc"
-#include  "textures.inc"
-#include  "stones.inc"
-
-#declare  NormClock = clock / 360.0;
 #include  "contexte.inc"
 #include  "elements.inc"
 #include  "hexabenz.inc"
 
 // =======================================================
 
-#for (idX, 0, 3)
-  #for (idZ, 0, 3)
+#for (idX, 0, 4)
+  #for (idZ, 0, 4)
 
-    #local posX = (idX * 4.56) - 4.7;
-    #local posY = 1.8 * (rand(Rng1)-0.5);
-    #local posZ = (idZ * 4.64) - 9.1;
+    #local posX = (idX * 4.56) - 6.5;
+    #local posY = 1.3 * (rand(Rng1)-0.5);
+    #local posZ = (idZ * 4.24) - 8.9;
     #local Ry   = (rand(Rng1) - 0.5) * 16;
-    #if (rand(Rng1) < 0.25)
-      object { HexaCone rotate y*Ry translate <posX, posY, posZ> }
+    #if (rand(Rng1) < 0.515)
+      object { HexaCone ()
+			rotate y*Ry translate <posX, posY, posZ> }
     #else
-      object { HexaBenz rotate y*Ry translate <posX, posY, posZ> }
+      object { HexaBenz () 
+			rotate y*Ry translate <posX, posY, posZ> }
     #end
   #end
 #end
 
 // =======================================================
 
-light_source { <-8, 7, -9>, rgb <0.81, 0.65, NormClock> }
-light_source { < 11, 7,  4>, rgb <1-NormClock, 0.28, 0.80> }
-object { Repere scale 5 }
+#if (NormClock < 0.08)
+  light_source { <-8, 7, -9>, rgb <0.81, 0.65, NormClock> }
+#end
 
-#local CamX = -17.7+(2.6*NormClock);
-#local CamY = 11.81+(3.3*Cos_01(NormClock));
-#local CamZ = 16.06+Cos_010(NormClock);
+light_source { < 11, 7,  4>, rgb <NormClock, 0.48, 0.80> }
+
+// object { Repere scale 5 }
+
+#local CamX = -8.7+(6.6*NormClock);
+#local CamY = -5+(11.9*Cos_01(NormClock));
+#local CamZ = 15.06+(2.9*Cos_010(NormClock));
 
 camera	{
-	location	<CamX, CamY, 16.09>
+	location	<CamX, CamY, CamZ>
 	look_at		<0.0, 0.0, 0>
-	angle		48
+	angle		53 - (3.57 * NormClock)
 	}

essai.pov

@@ -7,30 +7,65 @@
 
 #include  "globals.inc"
 
-#include  "colors.inc"
-#include  "metals.inc"
-#include  "textures.inc"
-#include  "stones.inc"
-
-#declare  NormClock = clock / 360.0;
 #include  "contexte.inc"
 #include  "elements.inc"
 #include  "hexabenz.inc"
 
 // =======================================================
 
+#macro GyroPhare_mat ()
+cylinder {
+	0, y*H_gyro, R_gyro
+	#if (rand(Rng1) < 0.5)
+	  texture { T_Stone25 scale 1+rand(Rng1) }
+	#else
+	  texture { T_Stone6 }
+	#end
+	}
+#end // macro
+
+#macro GyroPhare_lampe ()
+union	{
+	difference {
+		cylinder { 0, y*0.20,    R_gyro }
+		cylinder { y*0.01, y*0.19, R_gyro*0.97 }
+		#local WB = 0.015;
+		box { <-1, 0.03, -WB>, <1, 0.18, WB> }
+		box { <-WB, 0.03, -1>, <WB, 0.18, 1> }
+		#undef WB
+		pigment { color White }
+		rotate y*(0.5-rand(Rng1))*clock
+		}
+	light_source { y*0.10 rgb <0.8, 0.9, 0.999999999> }
+	}
+#end // macro
+
+#macro GyroPhare ()
+union	{
+	object { GyroPhare_mat () }
+	object { GyroPhare_lampe ()
+			// rotate y*rand(Rng1)*clock
+			translate y*(H_gyro+0.02) }
+	}
+#end // macro
+// =======================================================
+
 #macro Bubble ()
 sphere {
-	0, 0.10
-	#if ( rand(Rng1) < 0.5 )	pigment { color Cyan }
-	#else				pigment { color Magenta }
+	0, 0.06
+	#if   ( rand(Rng1) < 0.333 )
+	  texture { Ruby_Glass }
+	#elseif ( rand(Rng1) < 0.666 )
+	  texture { Orange_Glass }
+	#else
+	  texture { Gold_Nugget }
 	#end
 	}
 #end
 
 #macro Un_Machin ()
 union	{
-	#for (Y, -8, 8, 2)
+	#for (Y, 1, 8, 1)
 	    object { Bubble() translate y*Y*0.1 }
 	#end
 	}
@@ -39,23 +74,36 @@ union	{
 #declare Les_Machins = object
 {
 union	{
-	#for (X, -7, 7)
-	    object { Un_Machin() translate x*X*0.6 }
+	#local Rk = 4.95;
+	#for (foo, 0, 360, 15)
+		#local Xpos = Rk * sin(radians(foo));
+		#local Zpos = Rk * cos(radians(foo));
+		#if ( rand(Rng1) < 0.40 )
+		  object { GyroPhare () translate <Xpos, 0, Zpos> }
+		#else
+		  object { Un_Machin () translate <Xpos, 0.33, Zpos> }
 		#end
+		
+	#end
+	
+	#undef Rk
 	}
 }
 
-object { Les_Machins }
+object { Les_Machins translate y*0.01}
 
+object { Le_Sol }
 // object { Repere }
 
 // =======================================================
 
-light_source { <-8, 7, -9>, rgb <0.81, 0.65, NormClock> }
-light_source { < 11, 7,  4>, rgb <1-NormClock, 0.28, 0.80> }
+// light_source { <-8, 7, -9>, rgb <0.81, 0.65, NormClock> }
+// light_source { < 11, 7,  4>, rgb <1-NormClock, 0.28, 0.80> }
 
+#local CamX = -12.7 + (5.8*NormClock);
+#local CamY = 8.81  + (14*sqrt(NormClock));
 camera	{
-	location	<-10.7+4*NormClock, 2.81, 8.09>
-	look_at		<0.0, 0.0, 0>
-	angle		44
+	location	<CamX, CamY, 9.99>
+	look_at		<0, 0, 0>
+	angle		42 + 8*Cos_01(NormClock)
 	}

frames/README.md

@@ -7,6 +7,9 @@ Avant tout, il faut créer ces répertoires :
     ├── orbite
     ├── passage
     ├── scene
-    ├── Spool
+    ├── scene
+    ├── orbite
+    ├── escadrille
     └── topview
-```
+
+

globals.inc

@@ -1,19 +1,39 @@
 
 global_settings	{
 	assumed_gamma  1.0
-	ambient_light rgb <0.17, 0.14, 0.17>
+	ambient_light rgb <0.18, 0.18, 0.21>
 	max_trace_level 15
 	}
 
+#include  "colors.inc"
+#include  "metals.inc"
+#include  "textures.inc"
+#include  "stones.inc"
+
 #declare Rng1 = seed(1337);
 #declare foo = rand(Rng1);
 #declare Rng2 = seed(now*24*60*60);
-#declare foo = rand(Rng2);
+#declare bar = rand(Rng2);
 
 #declare  NormClock = clock / 360.0;
 
 /* ------------------------------------------------------------ */
+/*
+ *	Some constants...
+ */
 
+#declare SzSol      = 30;
+
+#declare R_basecone = 0.117;
+#declare H_cone     = 0.97;
+
+#declare R_gyro     = 0.10;
+#declare H_gyro     = 1.20;
+
+/* ------------------------------------------------------------ */
+/*
+ *	Usefull macros
+ */
 #macro Cos_01( X )
   (0.5-0.5*cos( 3.141592654 * X))
 #end

hexabenz.inc

@@ -1,28 +1,30 @@
 /*
- *		H E X A C O N E
+ *		H E X A B E N Z
  */
 // =======================================================
 
-#declare Benz_Cone_Base = object
-{
-#local RA = 0.120;
-#local RB = 0.001;
+#macro Benz_Cone_Base ()		//  = object
+// {
 union	{
-	cone { 0, RA, y, RB }
-	sphere { 0, RA*1.098 scale <1, 0.62, 3.2> translate -0.02*y }
+	#local RA = R_basecone;
+	#local RB = 0.001;
+	cone { 0, RA, y*0.89, 0.0001 }
+	sphere { 0, RA*1.098 scale <1, 0.62, 3.03> translate -0.02*y }
 	}
-}
+// }
+#end
 
 #macro Benz_Cones ()		// = object
 // {
 union	{
 	#for (foo, 0, 360, 60)
-	#local E = 0.40;
+	#local E = 0.38;
 	#local Tx = E * sin(radians(foo));
 	#local Ty = E * cos(radians(foo));
-	object { Benz_Cone_Base
+	object {
+		Benz_Cone_Base ()
 		#if ( rand(Rng1) < 0.5 )
-		  texture { Soft_Silver scale 16.50 }
+		  texture { T_Silver_2C scale 11.50 }
 		#else
 		  texture { T_Brass_2C   scale 13.50 }
 		#end
@@ -36,21 +38,22 @@ union	{
 
 // ------------------------------------------------------
 
-#local RT = 0.24;
-#local LT = 0.61;
+#local R_Tube = 0.20;
+#local L_Tube = 0.54;
 
 #declare Benz_Tubules = object
 {
-union	{
-	#local E = 0.17;
-	#local R = 0.010;
+merge	{
+	#local E = R_Tube * 0.0910;
+	#local R = 0.01;
 	#for (foo, 0, 360, 20)
 	  #local Tx = E * sin(radians(foo));
 	  #local Ty = E * cos(radians(foo));
-	  #local Dz = z * 1.09;
-	  cylinder { -Dz, Dz, R translate <Tx, Ty, 0> }
-	  sphere { -Dz, R       translate <Tx, Ty, 0> }
-	  sphere {  Dz, R       translate <Tx, Ty, 0> }
+	  #local Dza = z * 0.20;
+	  #local Dzb = z * 0.90;
+	  cylinder { -Dza, Dzb, R  translate <Tx, Ty, 0> }
+	  sphere { -Dza, R*1.8     translate <Tx, Ty, 0> }
+	  sphere {  Dzb, R*1.8     translate <Tx, Ty, 0> }
 	#end
 	}
 #if ( rand(Rng1) < 0.333)
@@ -62,38 +65,67 @@ union	{
 
 #declare Benz_Fuseau = object
 {
-sphere { 0, RT*0.39 scale <1, 1, 9> }
-texture { Gold_Nugget scale 0.56 }
+difference {
+	sphere { 0, R_Tube*0.39  }
+	sphere { 0, R_Tube*0.37  }
+	cylinder { <-1, 0, -1>, < 1, 0, 1>, R_Tube*0.21 } 
+	cylinder { < 1, 0, -1>, <-1, 0, 1>, R_Tube*0.21 } 
+	}
+scale <1, 1, 4.4>
+texture { Shadow_Clouds scale 0.56 }
+}
+
+#declare Benz_Fuseau_Flash = object
+{
+union	{
+	object { Benz_Fuseau }
+	light_source { 0,
+		rgb <rand(Rng2), rand(Rng2), rand(Rng2)>
+		fade_distance	0.96
+		fade_power	1.95
+
+		}
+	}
+rotate -z*clock*6
 }
 
 #declare Benz_Cylindre = object
 {
 difference	{
 	union {
-		cylinder { z*LT*1.6, -z*LT,  RT }
-		sphere { z*LT*1.5, RT*0.72 translate y*RT*0.87}
+		cylinder { z*L_Tube*1.5, -z*L_Tube,  R_Tube }
+		/* cette sphere devrait devenir
+		     un vrai cockpit ? */
+		sphere { z*L_Tube*1.18, R_Tube*0.72
+				scale <1, 0.73, 1>
+				translate y*R_Tube*0.87}
 		}
-	cylinder { z*4,      -z*4,   RT*0.95 }
+	cylinder { z*4,      -z*4,   R_Tube*0.95 }
 	}
 texture { Soft_Silver scale 6.0 }
 }
 
-#declare Benz_Tube = object
-{
+#macro Benz_Tube ()
+// #declare Benz_Tube = object
+// {
 union	{
 	object { Benz_Tubules }
-	object { Benz_Fuseau }
+	object { Benz_Fuseau_Flash translate z*0.40 }
 	object { Benz_Cylindre }
 	}
-}
+// }
+#end
 
 // ------------------------------------------------------
 
-#declare HexaBenz = object
-{
+#macro HexaBenz ()
+// #declare HexaBenz = object
+// {
 union	{
-	#local Rk = rand(Rng1) * 666.666;
+	#local Rk = (rand(Rng1)-0.5) * 1024;
 	object { Benz_Cones () rotate z*NormClock*Rk}
-	object { Benz_Tube }
+	object { Benz_Tube () }
 	}
-}
+// }
+#end
+

hexabenz.pov

@@ -17,13 +17,13 @@
 
 
 #local K = 1.48;
-object { HexaBenz rotate y*90	translate -x*K }
-object { HexaBenz		translate  x*K }
+object { HexaBenz () rotate y*90	translate -x*K }
+object { HexaBenz ()		translate  x*K }
 
 // =======================================================
 
 light_source { <19, 7,   14>, rgb <0.77, 0.79, 0.80> }
-light_source { <19, 7,  -14>, rgb <0.77, 0.79, 0.80> }
+light_source { <19, 9,  -14>, rgb <0.87, 0.79, 0.70> }
 
 // object { Repere scale 2 }
 
@@ -33,6 +33,6 @@ camera	{
 	focal_point	<0.37, 0.0, 0>
 	aperture	0.046
 	blur_samples	30
-	angle		60 - 22 * Cos_01(NormClock)
+	angle		60 - 28 * Cos_01(NormClock)
 	}
 

hexacone.pov

@@ -0,0 +1,46 @@
+/*
+ *	H E X A C O N E   -   H E X A C O N E
+ */
+
+#version 3.7;
+
+#include  "globals.inc"
+
+#include  "colors.inc"
+#include  "metals.inc"
+#include  "textures.inc"
+#include  "stones.inc"
+
+#include  "contexte.inc"
+#include  "elements.inc"
+#include  "hexabenz.inc"
+
+
+#declare Cone_Repere = object
+{
+union	{
+	object { HexaCone () }
+	object { Repere translate <-0.4, -0.2, -0.5> }
+	}
+}
+
+#local K = 1.48;
+object { Cone_Repere rotate y*90	translate -x*K }
+object { Cone_Repere			translate  x*K }
+
+// =======================================================
+
+light_source { <19, 7,   14>, rgb <0.77, 0.79, 0.80> }
+light_source { <19, 9,  -14>, rgb <0.87, 0.79, 0.70> }
+
+// object { Repere scale 2 }
+
+camera	{
+	location	<-1.9+(8*NormClock), 0.70, 7.59-NormClock>
+	look_at		<0.37, 0.0, 0>
+	focal_point	<0.37, 0.0, 0>
+	aperture	0.046
+	blur_samples	30
+	angle		55 - 28 * Cos_01(NormClock)
+	}
+

orbite.pov

@@ -6,16 +6,12 @@
 
 #include  "globals.inc"
 
-#include  "colors.inc"
-#include  "metals.inc"
-#include  "textures.inc"
-#include  "stones.inc"
-
 #include  "contexte.inc"
 #include  "elements.inc"
+#include  "hexabenz.inc"
 
 // =======================================================
-#declare R_planete = 2.1;
+#declare R_planete = 1.42;
 
 #declare Croute = object
 {
@@ -32,7 +28,8 @@ difference {
 	box { <-BN, -BN, -HC>, <BN, BN, HC> }
 	}
 texture {
-	pigment { color Gray10 }
+	pigment { color rgb <0.20, 0.40, 0.10>  }
+	finish { reflection 0.25 }
 	}
 }
 
@@ -40,8 +37,8 @@ texture {
 {
 sphere { 0, R_planete }
 texture {
-	pigment { color Gray80 }
-	finish { reflection 0.500 }
+	pigment { rgb <0.70, 0.50, 0.70> }
+	finish { reflection 0.25 }
 	}
 }
 
@@ -54,23 +51,31 @@ union	{
 }
 // =======================================================
 
-#local RO = 4.10;
+#local RO = 4.15;
 #local CK = NormClock * 7.87;
 
 #declare PosX = RO * sin(CK);
 #declare PosY = 0;
 #declare PosZ = RO * cos(CK);
-
-object { HexaCone
-	rotate -y*CK translate <PosX, PosY, PosZ>
+object { HexaBenz ()
+	rotate -y*CK*2.333 translate <PosX, PosY, PosZ>
+	}
+#declare PosX = RO * sin(CK+2.12);
+#declare PosY = 0;
+#declare PosZ = RO * cos(CK+2.23);
+object { HexaCone ()
+	rotate  y*CK*3.222 translate <PosX, PosY, PosZ>
 	}
 
 object { Planete rotate (-clock*0.21)*y }
-light_source { <19, 7,  14>, rgb <0.77, 0.79, 0.80> }
+light_source { <19, 6,  15>, rgb <0.77, 0.79, 0.80> }
 
 camera	{
-	location	<3, 2.01, 7.59>
+	location	<3, 1.50, 7.59>
 	look_at		<0.0, 0.0, 0>
-	angle		58
+	focal_point	<0.07, 0.0, 0>
+	aperture	0.046
+	blur_samples	30
+	angle		62
 	}
 

passage.pov

@@ -13,18 +13,21 @@
 
 #include  "contexte.inc"
 #include  "elements.inc"
+#include  "hexabenz.inc"
 
 // ---------------------------------------
 
 object { Le_Decor }
 
 #declare PosX = 0.333;
-#declare PosY = 1.20 + (NormClock*0.22);
-#declare PosZ = (NormClock-0.5) * 34.22;
+#declare PosY = 1.10 + (NormClock*0.24);
+#declare PosZ = (NormClock-0.5) * 53.27;
 
-object { HexaCone translate <PosX, PosY, PosZ> }
+object { HexaBenz () translate <PosX, PosY, PosZ> }
+object { HexaCone () translate <PosX+1.96, PosY+1.42, PosZ-11.5> }
+object { HexaCone () translate <PosX-1.96, PosY+2.42, PosZ-17.5> }
 
-#if ( (clock < 111) )
+#if ( (clock < 141) )
 light_source {
 	<3, 0.30, -8>	color Blue
 	spotlight
@@ -35,23 +38,23 @@ light_source {
 	}
 #end
 
-#if ( (clock > 230) )
+#if ( (clock > 230) & (clock < 300) )
 light_source {
 	<2, 0.30, -2>	color White
 	spotlight
 	radius .044
 	falloff 2
 	tightness 3
-	point_at <PosX, PosY, PosZ>
+	point_at <PosX, PosY-0.30, PosZ>
 	}
 #end
 
 camera	{
-	location	<-1.56, 1.03, 9.76>
-	look_at		<PosX, PosY, PosZ>
+	location	<-1.76, 1.03, 9.76>
+	look_at		<PosX+0.08, PosY, PosZ>
 	// focal_point	<0, 1, 0>
 	// aperture	0.046
 	// blur_samples	30
-	angle		36
+	angle		34
 	}
 

scene.pov

@@ -14,14 +14,18 @@
 #declare  NormClock = clock / 360.0;
 #include  "contexte.inc"
 #include  "elements.inc"
+#include  "hexabenz.inc"
 
 object { Le_Decor }
-object { HexaCone
-	rotate < 3, 0, -4>
-	rotate y*17 translate y*1.11 }
 
-#declare CK = 56 + (clock * 1);
-#declare Dcam = 2.14;
+object { HexaCone ()
+		rotate < 3, 0, -4> rotate y*17 translate y*1.11 }
+
+object { HexaBenz ()
+		rotate <6, 40, -7> translate <-8, 3, 7> }
+
+#declare CK = 96 + (clock * 1);
+#declare Dcam = 2.22;
 #declare CamX = Dcam *        sin(radians(CK));
 #declare CamZ = Dcam * 1.20 * cos(radians(CK));
 #declare CamZ = CamZ - 0.11;

tools/README.md

@@ -2,3 +2,10 @@
 
 Build system and utilities.
 
+## Linkfarming
+
+## Encoding
+
+## Plot the timing
+
+

tools/fonctions.sh

@@ -2,6 +2,17 @@
 set -eu
 
 #   --------------------------------------------------------------
+visual_sleep ()
+{
+for foo in $(seq 0 $1) ; do
+	printf '*'
+	sleep 1
+done
+echo
+}
+#   --------------------------------------------------------------
+#		un essai qui semble un echec.
+#
 ralentisseur ()
 {
 temps=$1
@@ -14,7 +25,6 @@ if [ $load -gt 10 ] ; then
 	sleep $attente
 fi
 }
-
 #   --------------------------------------------------------------
 
 ff_encodage()
@@ -35,7 +45,9 @@ ffmpeg  -nostdin                                        	\
 # wc -c $FILMNAME | tee -a WS/log
 }
 #   --------------------------------------------------------------
-
+#
+#		celui-ci n'est pas terminé !
+#
 mp_encodage()
 {
 #

tools/linkfarmer.sh

@@ -6,7 +6,9 @@ IDX=0
 SPOOL="frames/Spool"
 SEQNAME="none"
 TMP="WS/tmp.png"
-FONTE="Palatino-Bold"
+FONTE="Helvetica-Bold"
+TEXTCOL="yellow"
+STROKOL="darkblue"
 
 source tools/fonctions.sh
 
@@ -15,7 +17,7 @@ source tools/fonctions.sh
 #			file to the spool dir, so 
 #			you can use it for tmp pics.
 #
-addfile ()
+copy_a_file ()
 {
 src="$1"
 dstname=$(printf "%s/%05d.png" $SPOOL $IDX)
@@ -25,25 +27,33 @@ cp -f $src $dstname
 IDX=$(( IDX + 1 ))
 }
 # -------------------------------------------------------
+
 linkfarm ()
 {
 SRC="frames/$1"
 echo "linkfarm $SRC" | tee -a WS/log
+tools/plot-timing.sh $1
+
+local NBRE=60
 
-local NBRE=30
 for foo in $(seq 0 $NBRE)
 do
-	addfile "$SRC/00000.png"
+	copy_a_file "WS/negatif.png"
+done
+
+for foo in $(seq 0 $NBRE)
+do
+	copy_a_file "$SRC/00000.png"
 done
 
 for src in "$SRC"/*
 do
-	addfile $src
+	copy_a_file $src
 done
 
 for foo in $(seq 0 $NBRE)
 do
-	addfile "$SRC/00359.png"
+	copy_a_file "$SRC/00359.png"
 done
 }
 # -------------------------------------------------------
@@ -51,71 +61,87 @@ faire_le_titre ()
 {
 echo "faire le titre"
 
-local NBRE=190
+local NBRE=180
+local SRC="frames/passage/00059.png"
+local GRAY="/dev/shm/tmp-titre.png"
+
+convert -colorspace gray -colors 27 $SRC $GRAY
+
 for foo in $(seq 0 $NBRE)
 do
-	Ypos=$(( 210 - ( foo / 2 ) ))
-	convert	 "WS/negatif.png"			\
+	Ypos=$(( -175 + foo  ))
+	convert	 ${GRAY}						\
 		-gravity north					\
 		-font $FONTE					\
 		-pointsize 172					\
-		-fill black				\
-		-strokewidth 2  -stroke gray90			\
+		-kerning 6					\
+		-fill $TEXTCOL					\
+		-strokewidth 3  -stroke $STROKOL		\
 		-annotate +0+${Ypos} "HexaCone"	\
 		${TMP}
 	# identify ${TMP}
-	addfile ${TMP}
+	copy_a_file ${TMP}
+	printf "."
 done
+echo
 }
 # -------------------------------------------------------
 faire_la_fin ()
 {
-local NBRE=120
-datetime=$(LANG=fr date -u)
+local NBRE=180
+datetime=$(LANG=fr date -u +"%Y/%m/%d")
 echo $datetime | tee -a WS/log
 
 for foo in $(seq 0 $NBRE)
 do
-	Ypos=$(( foo + 100 ))
+	Ypos=$(( foo + 20 ))
 	convert	 "WS/negatif.png"				\
 		-gravity north					\
 		-font $FONTE					\
 		-pointsize 86					\
-		-fill Black					\
-		-strokewidth 2  -stroke gray90			\
-		-annotate +0+${Ypos} "tTh des Bourtoulots"	\
+		-kerning 6					\
+		-fill $TEXTCOL					\
+		-strokewidth 2  -stroke $STROKOL		\
+		-annotate +0+${Ypos} \
+			"un film de\ntTh des Bourtoulots"	\
 		-pointsize 48					\
 		-strokewidth 1					\
 		-gravity south					\
 		-annotate +0+170 "${datetime}"		\
 		${TMP}
 	# identify ${TMP}
-	addfile ${TMP}
+	copy_a_file ${TMP}
+	printf "."
 done
+echo
 }
 # -------------------------------------------------------
 
 figlet "Link farmer"
 
-rm frames/Spool/*.png
+rm -f frames/Spool/*.png
 
-tools/plot-timing.sh 
+# tools/plot-timing.sh 
 faire_le_titre
 
 linkfarm hexabenz
+linkfarm hexacone
 linkfarm escadrille
 linkfarm topview
 linkfarm passage
 linkfarm scene
 linkfarm orbite
 
-# linkfarm essai
+linkfarm essai
 
 tools/plot-timing.sh 
 faire_la_fin
 
 ff_encodage Spool full.mp4
 
+nb=$(( $IDX - 1 ))
+echo "linkfarmed $nb files" | tee -a WS/log
+
 
 
 

tools/mkloop.sh

@@ -1,30 +1,22 @@
 #!/bin/bash
 
-source fonctions.sh
-
 set -e ; set -u
+source tools/fonctions.sh
 
-TYPE="mp4"
 SEQNAME="$1"
 NBFRAMES=360
 
-case $TYPE in
-	"gif89a")	DIMS="-W640 -H480"	;;
-	"mp4")		DIMS="-W1024 -H768"	;;
-esac
 
-echo "Running $0 $TYPE $SEQNAME" >> WS/log
+echo "Running $0 $SEQNAME" >> WS/log
 
-POVOPT="+q9 +a0.01 -d ${DIMS} -WT6"
+DIMS="-W1024 -H768"
+POVOPT="+q9 -a     -d ${DIMS} -WT6"
 echo $POVOPT ; echo ; sleep 2
 
 TMPIMG=/dev/shm/${SEQNAME}-tmp.png
 
 for frame in $(seq   0 $((NBFRAMES-1)))
 do
-	# figlet -k $frame  ;  sleep 1
-
-	ralentisseur 25
 
 	img=$(printf "frames/%s/%05d.png" $SEQNAME $frame)
 	debut=$(date +%s)
@@ -34,33 +26,29 @@ do
 	if [ $err != 0 ] ; then
 		echo "$SEQNAME fail $frame" >> WS/log
 		mogrify -colorspace gray $img
-		sleep 6
+		visual_sleep 12
 		continue
 	fi
 	set -e
-	txt=$(printf "%s  %03d" ${SEQNAME} $frame)
+	txt=$(printf "%s  %03d" ${SEQNAME} $frame | tr '0' 'o')
 	# echo $frame $img $txt
 	convert    ${TMPIMG}			\
 		-font Courier-Bold		\
-		-pointsize 16			\
-		-fill turquoise			\
+		-pointsize 18			\
+		-fill Gray80			\
 		-gravity south			\
 		-annotate +0+5 "$txt"		\
 		${img}
 	fin=$(date +%s)
-	echo ; sleep 1
+	echo
 	echo ${SEQNAME} $frame $(( fin - debut )) | 	\
 		tee -a WS/mp4.timing
-	echo ; sleep 1
+	echo ; sleep 3
 done
 
 echo 
 
-case $TYPE in
-	"gif89a")	convert -delay 8 -dither none	\
-			-colors 102 frames/* foo.gif		;;
-	"mp4")		ff_encodage $SEQNAME wip-${SEQNAME}.mp4				;;
-esac
+ff_encodage $SEQNAME wip-${SEQNAME}.mp4
 
 echo "+------- build of $SEQNAME done"
 

tools/plot-timing.sh

@@ -5,10 +5,17 @@ set -ue
 TMPFILE="/dev/shm/plot-timing.tmp"
 IMAGE="timing.png"
 
-echo ; figlet "plot timing" ; echo
-wc WS/mp4.timing | tee -a WS/log
+if [ $# == 1 ]
+then
+	sequence=$1
+else
+	sequence="escadrille"
+fi
 
-grep "passage" WS/mp4.timing | awk '				\
+echo "plot timing $sequence" | tee -a WS/log
+# wc WS/mp4.timing | tee -a WS/log
+
+grep $sequence WS/mp4.timing | tail -3600 | awk '		\
 BEGIN	{							\
 	nbrames=360;						\
 	for (foo=0; foo<nbrames; foo++) {			\
@@ -44,13 +51,13 @@ gnuplot	<< __EOC__
 	set grid
 	set xrange [:360]
 	set yrange [0:]
-	set title "HexaCone : temps de rendu"
+	set title "Séquence '${sequence}'"
 	set xlabel "numéro de la trame"
 	set ylabel "temps en secondes"
-	plot "/dev/shm/plot-timing.tmp" u 1:4 w l t "maximum",	\
-	     "/dev/shm/plot-timing.tmp" u 1:3 w l t "minimum",	\
-	     "/dev/shm/plot-timing.tmp" u 1:2 w l t "moyenne",
+	plot "/dev/shm/plot-timing.tmp" u 1:4 w l lc "#ff0000" t "maximum",	\
+	     "/dev/shm/plot-timing.tmp" u 1:3 w l lc "#0000ff" t "minimum",	\
+	     "/dev/shm/plot-timing.tmp" u 1:2 w l lc "#000000" t "moyenne",
 __EOC__
 
-convert -negate $IMAGE WS/negatif.png
+convert -negate -colorspace gray -level -33% $IMAGE WS/negatif.png
 

topview.pov

@@ -13,18 +13,23 @@
 
 #include  "contexte.inc"
 #include  "elements.inc"
+#include  "hexabenz.inc"
 
 object { Le_Decor }
 
-light_source { <-16, 17, -24>, rgb <0.51, 0.65, 0.40> }
 
-#declare TrX = 1.34 * sqrt(NormClock);
+
+#declare TrX = 1.84 * sqrt(NormClock);
 #declare TrY = 0.90 + (3.5 * Cos_01(NormClock));
 #declare TrZ = 9.999 * sqrt(NormClock);
 #declare TrH = <TrX, TrY, TrZ>;
-#declare RrY = 57 * sqrt(NormClock);
+#declare RrY = 97 * sqrt(NormClock);
+object { HexaCone () rotate y*RrY translate TrH }
 
-object { HexaCone rotate y*RrY translate TrH }
+object { HexaCone () rotate z*9.1 translate <5, 3, -8>  }
+object { HexaBenz () translate <-4, 2, -6> }
+
+light_source { <-16, 17, -24>, rgb <0.51, 0.65, 0.40> }
 // object { Repere scale 2 }
 
 #declare CamY = 19 - (4.5*NormClock);