camera change

contexte.inc

@@ -250,7 +250,7 @@ texture {
 #declare Repere = object
 {
 union	{
-	#local R = 0.008;
+	#local R = 0.010;
 	cylinder { 0, <1, 0, 0>, R pigment { color Red   } }
 	cylinder { 0, <0, 1, 0>, R pigment { color Green } }
 	cylinder { 0, <0, 0, 1>, R pigment { color Blue  } }
@@ -296,8 +296,8 @@ union	{
 	/* 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 DX = 77 * sin(CK);
+	  #local DZ = 81 * cos(CK);
 
 	  // #local Texte = str(CK, 5, 3);
 	  // #debug concat ("Les Choses, CK = ", Texte, "\n")
@@ -316,7 +316,7 @@ union {
 	light_source {
 		<2.3, 5.50,  2.8>	color Gray70
 		spotlight
-		radius 14 falloff 10 tightness 10
+		radius 14 falloff 10 tightness 8
 		point_at <0, 0.95, 0.22222222>
 		}
 	#end
@@ -356,9 +356,9 @@ sky_sphere {
 		gradient y
 		color_map {
 			[ 0.2  color Gray20		]
-			[ 0.4  color rgb <.7, .3, .5>	]
+			[ 0.4  color rgb <.5, .3, .5>	]
 			[ 0.7  color Gray30		]
-			[ 0.9  color rgb <.9, .6, .5>	]
+			[ 0.9  color rgb <.5, .6, .5>	]
 			[ 1.0  color Gray20		]
 			}
 		turbulence 3.14159 + 0.84 * Cos_010(NormClock)
@@ -374,7 +374,7 @@ sky_sphere {
 
 	/* XXX       XXX */
 	light_source {
-		<-4, 54, -17>
+		<-4, 54, -27>
 		colour Gray40
 		parallel
 		point_at	0

gadgets.inc

@@ -15,7 +15,12 @@
 merge {
 	cylinder { 0, y/2,   0.07 }
 	cylinder { 0, y/6, 0.33 }
+	#local R = rand(Rng1);
+	#if ( R < 0.52)
 	  texture { T_WIP_alert }
+	#else
+	  texture { WIP_color   }
+	#end
 	}
 #end 			// macro
 //  ------------------------------------------------------ ##

globals.inc

@@ -16,7 +16,7 @@ global_settings	{
 #declare Rng2 = seed(now*24*60*60);
 #declare bar  = rand(Rng2);
 
-#declare  NormClock = clock / NbFrames;
+#declare  NormClock = clock / (NbFrames - 1);
 
 /* ------------------------------------------------------------ */
 /*

remote.pov

@@ -35,8 +35,8 @@ object { Le_Decor }
 
 // object { Repere scale 3 translate <SzSol, 2, SzSol> }
 
-#local DistCam = 290;
-#local CK = 0.333 + (0.33 * NormClock);
+#local DistCam = 297;
+#local CK = -0.111 + (0.222 * NormClock);
 #declare CamX = DistCam * sin(CK);
 #declare CamY = 28;
 #declare CamZ = DistCam * cos(CK);
@@ -47,5 +47,5 @@ camera	{
 	// focal_point	<2, 1, 12>
 	// aperture	0.046
 	// blur_samples	30
-	angle		8
+	angle		7
 	}

tools/README.md

@@ -6,12 +6,10 @@ Build system and utilities.
 
 Un argument pour construire la séquence entière ou deux pour démarrer au milieu, c'est pratique quand le disjoncteur fait un *beu-beu*. Exemples :
 
-
 ```
   $ tools/mkloop.sh survol
   $ tools/mkloop.sh survol 133
 ```
-
 ## Linkfarming
 
 C'est le directeur de la production, le grand
@@ -29,4 +27,10 @@ Le fichier de sortie s'appelle *wip.mp4* dans tous les cas.
 
 ## Plot the timing
 
+On peut visualiser le temps de calcul d'une séquence avec la
+commande [plot-timing.sh](./plot-timing.sh) qui génère un fichier
+PNG. C'est un script basé sur *Awk* et *Gnuplot*.
 
+```
+$ tools/plot-timing.sh essai && d timing.png
+```

tools/config.sh

@@ -4,7 +4,7 @@ Img_Width=1024
 Img_Height=720
 
 # for imagemagick
-TEXTCOL="Red"
-STROKOL="OliveDrab"
+TEXTCOL="Gray70"
+STROKOL="DarkOliveGreen"
 
 NBFRAMES=450