From f9054a1248419ce2a8d4b83858f7010a18c77993 Mon Sep 17 00:00:00 2001
From: Tonton Th <tth@linda.buvette.org>
Date: Thu, 18 Dec 2025 21:53:36 +0100
Subject: [PATCH] add a new seq for the trident

---
 Makefile            |  6 +++++-
 tools/linkfarmer.sh |  3 ++-
 trident.inc         | 29 ++++++++++++++++-------------
 trident.pov         | 10 +++++-----
 4 files changed, 28 insertions(+), 20 deletions(-)

diff --git a/Makefile b/Makefile
index 8cd4dd4..bb98ded 100644
--- a/Makefile
+++ b/Makefile
@@ -4,6 +4,7 @@ DIMS   = -W1600 -H1200
 POVOPT = +q9 +A   Declare=NbFrames=450  -d
 
 POVDEP = contexte.inc hexacone.inc hexabenz.inc		\
+		hexastar.inc				\
 		globals.inc hexawood.inc datas/hf.png	\
 		dynamic.inc trident.inc groundbase.inc	\
 		gadgets.inc xperiment.inc
@@ -18,9 +19,12 @@ PNG:	essai.png scene.png topview.png passage.png	\
 	orbite.png hexabenz.png escadrille.png		\
 	hexacone.png remote.png survol.png cutoff.png	\
 	carto.png hexawood.png bubblecut.png		\
-	circular.png panoramic.png splined.png
+	circular.png panoramic.png splined.png		\
+	trident.png
 	echo "make PNG ck=$(CK) done" >> WS/log
 
+trident.png:		trident.pov Makefile $(POVDEP)
+	povray $(POVOPT) $(DIMS) -K$(CK) -i$< -o$@
 
 splined.png:		splined.pov Makefile $(POVDEP)
 	povray $(POVOPT) $(DIMS) -K$(CK) -i$< -o$@
diff --git a/tools/linkfarmer.sh b/tools/linkfarmer.sh
index fc59fe9..a62fdf2 100755
--- a/tools/linkfarmer.sh
+++ b/tools/linkfarmer.sh
@@ -36,7 +36,7 @@ SRC="frames/$1"
 local INTER="/dev/shm/tmp-intertitre.png"
 tools/plot-timing.sh $1
 
-local NBRE=42
+local NBRE=48
 
 convert "WS/negatif.png"				\
 	-gravity north					\
@@ -150,6 +150,7 @@ linkfarm survol
 linkfarm cutoff
 linkfarm panoramic
 linkfarm topview
+linkfarm trident
 linkfarm passage
 linkfarm scene
 linkfarm carto
diff --git a/trident.inc b/trident.inc
index 936d98c..c0ab22d 100644
--- a/trident.inc
+++ b/trident.inc
@@ -16,7 +16,7 @@ difference {
 	object { Trid_cone translate -y*0.001 }
 	#local Foo = rand(Rng1);
 	#if (Foo < 0.25)	texture { T_Brass_2C }
-	#elseif (Foo < 0.50)	texture { T_Chrome_2C }
+	#elseif (Foo < 0.50)	texture { tPlasticOrange }
 	#elseif (Foo < 0.75)	texture { T_Chrome_3A }
 	#else			texture { GoldDark 	 }
 	#end  // else
@@ -34,8 +34,8 @@ union {
 	#end  // for
 	#undef Tx
 	#undef Tz
-	  torus { E*1.80, 0.02
-		scale <1, 4, 1> translate y*0.05
+	  torus { E*1.51, 0.012
+		scale <1, 3, 1> translate y*0.05
 		texture { T_Chrome_3B } }
 	}
 #end
@@ -45,11 +45,12 @@ union {
 #local R = 0.095;
 merge	{
 	cylinder { <0, -L, 0>, <0, L, 0>, R }
-	sphere { 0, R scale <1, 6, 1> translate y*L }
-	#if (rand(Rng1) < 0.50)
-	  texture { T_Chrome_1C }
-	#else
-	  texture { T_Brass_5E }
+	sphere { 0, R scale <1, 6.11, 1> translate  y*L		}
+	sphere { 0, R scale <1, 0.42, 1> translate -y*L		}
+	#local R = rand(Rng1);
+	#if ( R < 0.333)	texture { T_Chrome_1C		}
+	#elseif ( R < 0.666)	texture { T_Silver_1C		}
+	#else			texture { tPlasticGreen		}
 	#end
 	}
 #undef L
@@ -58,10 +59,12 @@ merge	{
 #macro Trid_A_ailette ()
 union	{
 	#local E = 0.49;
-	object { Trid_A_cone () scale 0.85
-		translate <E, -0.05, 0> }
-	cylinder { 0, x*E, 0.011
-			scale <1, 5, 1> texture { T_Silver_3A } }
+	object { Trid_A_cone () scale 0.85 translate <E, -0.05, 0> }
+	cylinder { 0, x*E, 0.008 scale <1, 5, 1>		   }
+	#local R = rand(Rng1);
+	#if ( R < 0.8 )		texture { T_Silver_3A	}
+	#else			texture { B_Texture	}
+	#end
 	#undef E
 	}
 #end
@@ -77,7 +80,7 @@ union {
 //	------------------------------------------------------
 #macro Trident_A ()
 union	{
-	object { Trid_A_head () translate y*0.85 }
+	object { Trid_A_head () translate y*0.83 }
 	object { Trid_A_body () }
 	object { Trid_A_tail () translate -y*0.6 }
 	// object { Repere translate <0.1, 0, 0.1> }
diff --git a/trident.pov b/trident.pov
index d058d44..f8ba8e8 100644
--- a/trident.pov
+++ b/trident.pov
@@ -21,17 +21,17 @@ object { Le_Decor            }
 
 // object { Repere scale 2 }
 
-#declare CK      = NormClock * 4.20001;
-#declare DX_cam  = 6.9 * sin(CK);
-#declare DZ_cam  = 5.4 * cos(CK);
+#declare CK      = NormClock * 2.78;
+#declare DX_cam  = 6.9 * cos(CK);
+#declare DZ_cam  = 5.4 * sin(CK);
 #declare Loc_cam = <DX_cam, 1.0, DZ_cam> + Pos_RedB_2;
 
 camera	{
 	location	Loc_cam
-	look_at		Pos_RedB_2 + <0, 1.90+NormClock, 0>
+	look_at		Pos_RedB_2 + <0, 1.95+NormClock, 0>
 	// focal_point	<0.37, 0.0, 0>
 	// aperture	0.046
 	// blur_samples	30
-	angle		65 - 14 * Cos_01(NormClock)
+	angle		65 - 7 * Cos_01(NormClock)
 	}