+ orbite sequence

Makefile

@@ -5,7 +5,8 @@ POVDEP = contexte.inc elements.inc 		\
 		globals.inc datas/hf.png
 
 
-PNG:	essai.png scene.png topview.png passage.png
+PNG:	essai.png scene.png topview.png passage.png	\
+	orbite.png
 
 
 topview.png:		topview.pov Makefile $(POVDEP)
@@ -17,6 +18,9 @@ essai.png:		essai.pov Makefile $(POVDEP)
 passage.png:		passage.pov Makefile $(POVDEP)
 	povray $(POVOPT) -W1280 -H1024 -K340 -i$< -o$@
 
+orbite.png:		orbite.pov Makefile $(POVDEP)
+	povray $(POVOPT) -W1280 -H1024 -K340 -i$< -o$@
+
 CK=175
 scene.png:		scene.pov Makefile $(POVDEP)
 	povray $(POVOPT) -W1280 -H1024 +K${CK} -i$< -o$@

contexte.inc

@@ -3,20 +3,6 @@
  */
 
 
-#declare Rng2 = seed(now*24*60*60);
-#declare foo = rand(Rng2);
-
-#declare  NormClock = clock / 360.0;
-
-/* ------------------------------------------------------------ */
-
-#macro Cos_01( X )
-  (0.5-0.5*cos( 3.141592654 * X))
-#end
-#macro Cos_010( X )
-  (0.5-0.5*cos( 2 * 3.141592654 * X))
-#end
-
 /* ------------------------------------------------------------ */
 
 #declare Rhxba = 0.30;
@@ -36,20 +22,26 @@ merge	{
 	}
 }
 
-object	{ HexaBalls
-	texture { Lightning1 scale 0.33 }
-	rotate <clock/3, clock/6, clock/9>
-	translate <3, 0.72, 5>
-	}
+#declare Les_Bibelots = object
+{
+union	{
+	object	{ HexaBalls
+		texture { Lightning1 scale 0.33 }
+		rotate <clock/3, clock/6, clock/9>
+		translate <3, -1+1.11*Cos_010(NormClock), 5>
+		}
 
-object	{ HexaBalls
-	texture { Lightning2 scale 0.33 }
-	rotate <-clock, clock*0.62, clock>
-	translate <5, 0.92, -4>
+	object	{ HexaBalls
+		texture { Lightning2 scale 0.56 }
+		// rotate <-clock, clock*0.62, clock>
+		translate <5, -1+0.92*Cos_010(NormClock), -4>
+		}
 	}
-
+}
 /* ------------------------------------------------------------ */
 
+#declare Le_Sol = object
+{
 height_field {
 	png "datas/hf.png"
 	smooth
@@ -61,7 +53,7 @@ height_field {
 		finish  { phong 0.125 }
 		}
 	}
-
+}
 
 #declare Repere = object
 {
@@ -71,41 +63,71 @@ union	{
 	}
 }
 
-#if (1)
-light_source {
-	<0.3, 2.50,  2.8>	color Gray90
-	spotlight
-	radius 14
-	falloff 10
-	tightness 10
-	point_at <0, 0.95, 0.22222222>
-	}
-#end
-
-#if ( (clock>166) & (clock<213) )
-light_source {
-	<2, 0.30, -2>	color Yellow
-	spotlight
-	radius 12
-	falloff 20
-	tightness 10
-	point_at <-0.08, 0.80, 0.17>
-	}
-#end
-
-#if (1)
-light_source {
-	<-5, 5.60, 8>
-	#if ( (clock > 290) & (clock<344) )
-	  #local Couleur = rgb <0.20, 0.20, 0.90>;
-	#else
-	  #local Couleur = rgb <0.80, 0.80, 0.70>;
+#declare Les_Lumieres = object
+{
+union {
+	#if (1)
+	light_source {
+		<0.3, 2.50,  2.8>	color Gray90
+		spotlight
+		radius 14 falloff 10 tightness 10
+		point_at <0, 0.95, 0.22222222>
+		}
 	#end
-	color Couleur
-	spotlight
-	radius 9
-	falloff 10
-	tightness 5
+
+	#if ( (clock>166) & (clock<213) )
+	light_source {
+		<2, 0.30, -2>	color Yellow
+		spotlight
+		radius 12 falloff 20 tightness 10
+		point_at <-0.08, 0.80, 0.17>
+		}
+	#end
+
+	#if (1)
+	light_source {
+		<-5, 5.60, 8>
+		#if ( (clock > 290) & (clock<344) )
+		 #local Couleur = rgb <0.20, 0.20, 0.90>;
+		#else
+		 #local Couleur = rgb <0.80, 0.80, 0.70>;
+		#end
+		color Couleur
+		spotlight
+	radius 9 falloff 10 tightness 5
 	point_at <0, 0.95, -0.22>
+		}
+	#end
 	}
-#end
+}
+
+// #declare Le_Ciel = object
+// {
+sky_sphere {
+	pigment {
+		gradient y
+		color_map {
+			[ 0.5  color Orange*0.7 ]
+			[ 1.0  color Yellow*0.5 ]
+			}
+		turbulence 2.87 + Cos_010(NormClock)
+		scale 0.207
+		translate -1
+		}
+	emission rgb <0.1, 0.1, 0.1>
+	}
+// }
+
+/* ------------------------------------------------------------ */
+/*
+ *	Et on rassemble tous les éléments...
+ */
+#declare Le_Decor = object
+{
+union	{
+	object { Le_Sol }
+	object { Les_Bibelots }
+	object { Les_Lumieres }
+	}
+}
+/* ------------------------------------------------------------ */

elements.inc

@@ -38,9 +38,15 @@ union	{
 	#local xR  = (rand(Rng2)-0.5000) * kR;
 	#local yR  = (rand(Rng2)-0.5000) * kR;
 	#local zR  = (rand(Rng2)-0.5000) * kR;
-	#local Red = abs(sin(NormClock * 35.536));
-	#local Red = Red * rand(Rng2);
-	light_source { <xR, yR, xR>, rgb <Red, 0.03, 0.03>
+	#local Value = sin(NormClock * 25.536);
+	#if (Value < 0)
+	  #local Couleur = rgb <abs(Value), 0, 0>;
+	#else
+	  #local Couleur = rgb <0, abs(Value), 0>;
+	#end
+	#local Couleur = Couleur * rand(Rng2);
+	light_source {
+		<xR, yR, xR>, Couleur
 		fade_distance	0.99
 		fade_power	1.58
 		}

encode.sh

@@ -2,7 +2,13 @@
 
 set -e  ;  set -u
 
+if [ $# == 1 ]
+then
+	srcdir=$1
+else
+	srcdir="essai"
+fi
 
 source ./fonctions.sh
 
-ff_encodage passage wip.mp4
+ff_encodage $srcdir wip.mp4

globals.inc

@@ -4,3 +4,19 @@ global_settings	{
 	ambient_light rgb <0.18, 0.14, 0.17>
 	max_trace_level 15
 	}
+
+#declare Rng2 = seed(now*24*60*60);
+#declare foo = rand(Rng2);
+
+#declare  NormClock = clock / 360.0;
+
+/* ------------------------------------------------------------ */
+
+#macro Cos_01( X )
+  (0.5-0.5*cos( 3.141592654 * X))
+#end
+#macro Cos_010( X )
+  (0.5-0.5*cos( 2 * 3.141592654 * X))
+#end
+
+/* ------------------------------------------------------------ */

linkfarmer.sh

@@ -52,11 +52,21 @@ do
 done
 }
 # -------------------------------------------------------
+faire_la_fin ()
+{
+local NBRE=80
+for foo in $(seq 0 $NBRE)
+do
+	addfile "datas/back.png"
+done
+}
+# -------------------------------------------------------
 
 faire_le_titre
 
 ralentisseur 10
 
+linkfarm orbite
 linkfarm topview
 linkfarm passage
 linkfarm scene

plot-timing.sh

@@ -12,12 +12,13 @@ BEGIN	{							\
 		mini[foo] = 666;				\
 		maxi[foo] = -42;				\
 		}						\
-	}							\
-	{							\
-	accu[$1] += $2;						\
-	count[$1]++;						\
-	if (mini[$1] > $2)	mini[$1] = $2;			\
-	if (maxi[$1] < $2)	maxi[$1] = $2;			\
+	}
+							\
+$1=="orbite"	{							\
+	accu[$2] += $3;						\
+	count[$2]++;						\
+	if (mini[$2] > $3)	mini[$2] = $3;			\
+	if (maxi[$2] < $3)	maxi[$2] = $3;			\
 	}							\
 END	{							\
 	for (foo=0; foo<nbrames; foo++) {				\
@@ -35,7 +36,7 @@ gnuplot	<< __EOC__
 	set output "timing.png"
 	set grid
 	set xrange [:360]
-	set yrange [:240]
+	set yrange [:30]
 	set title "HexaCone : temps de tracé vs. numéro de séquence"
 	set xlabel "numéro de la trame"
 	set ylabel "temps en secondes"