From d8de01a0ae2881bb22e231c99cc03a540c3308bc Mon Sep 17 00:00:00 2001
From: Tonton Th <tth@linda.buvette.org>
Date: Wed, 15 Jan 2025 21:30:03 +0100
Subject: [PATCH] small tuning

---
 hexabenz.inc | 33 ++++++++++++++++++---------------
 1 file changed, 18 insertions(+), 15 deletions(-)

diff --git a/hexabenz.inc b/hexabenz.inc
index 1b5cca4..aa40c3d 100644
--- a/hexabenz.inc
+++ b/hexabenz.inc
@@ -9,7 +9,7 @@ union	{
 	#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.1> translate -0.02*y }
+	sphere { 0, RA*1.098 scale <1, 0.62, 3.03> translate -0.02*y }
 	}
 // }
 #end
@@ -18,7 +18,7 @@ union	{
 // {
 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 {
@@ -38,14 +38,14 @@ union	{
 
 // ------------------------------------------------------
 
-#local RT = 0.21;
-#local LT = 0.54;
+#local R_Tube = 0.20;
+#local L_Tube = 0.54;
 
 #declare Benz_Tubules = object
 {
 merge	{
-	#local E = 0.167;
-	#local R = 0.010;
+	#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));
@@ -66,13 +66,13 @@ merge	{
 #declare Benz_Fuseau = object
 {
 difference {
-	sphere { 0, RT*0.39  }
-	sphere { 0, RT*0.37  }
-	cylinder { <-1, 0, -1>, < 1, 0, 1>, RT*0.21 } 
-	cylinder { < 1, 0, -1>, <-1, 0, 1>, RT*0.21 } 
+	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 { Gold_Nugget scale 0.56 }
+texture { Shadow_Clouds scale 0.56 }
 }
 
 #declare Benz_Fuseau_Flash = object
@@ -93,11 +93,14 @@ rotate -z*clock*6
 {
 difference	{
 	union {
-		cylinder { z*LT*1.5, -z*LT,  RT }
-		sphere { z*LT*1.4, RT*0.72 scale <1, 0.73, 1>
-					translate y*RT*0.77}
+		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 }
 }