a new hexacone is born

hexabenz.inc

@@ -0,0 +1,59 @@
+/*
+ *		H E X A C O N E
+ */
+// =======================================================
+
+#declare Benz_Cone_Base = object
+{
+#local RA = 0.125;
+#local RB = 0.001;
+union	{
+	cone { 0, RA, y, RB }
+	// cylinder { 0, -0.08*y, RA*1.25 scale <1, 1, 4> }
+	sphere { 0, RA*1.033 scale <1, 0.7, 6> translate -0.02*y }
+	}
+}
+#declare Benz_Cones = object
+{
+union	{
+	#for (foo, 0, 360, 60)
+	#local E = 0.47;
+	#local Tx = E * sin(radians(foo));
+	#local Ty = E * cos(radians(foo));
+	object { Benz_Cone_Base
+		texture { Soft_Silver scale 16.50 }
+		rotate -z*foo
+		translate <Tx, Ty, 0>
+		}
+	#end
+	}
+}
+
+// ------------------------------------------------------
+
+#declare Benz_Tube = object
+{
+union	{
+	difference {
+		#local RT = 0.30;
+		#local LT = 0.67;
+		cylinder { -z*LT, z*LT, RT }
+		cylinder { -z*2, z*2, RT*0.96 }
+		}
+	sphere { 0, RT*0.39 scale <1, 1, 9> }
+	#for (foo, 0, 360, 20)
+	  cylinder { -z, z, 0.06 }
+	#end
+	}
+texture { Gold_Nugget scale 0.56 }
+}
+
+// ------------------------------------------------------
+
+#declare HexaBenz = object
+{
+union	{
+	object { Benz_Cones }
+	object { Benz_Tube }
+	}
+}

hexabenz.pov

@@ -0,0 +1,35 @@
+/*
+ *	H E X A C O N E   -   H E X A B E N Z
+ */
+
+#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"
+
+object { HexaBenz rotate (clock*0.46)*z }
+
+// =======================================================
+
+light_source { <19, 7,   14>, rgb <0.77, 0.79, 0.80> }
+light_source { <19, 7,  -14>, rgb <0.77, 0.79, 0.80> }
+
+// object { Repere }
+
+camera	{
+	location	<-1.9+(5*NormClock), 0.50, 6.59>
+	look_at		<0.37, 0.0, 0>
+	focal_point	<0.37, 0.0, 0>
+	aperture	0.046
+	blur_samples	30
+	angle		60 - 21 * Cos_01(NormClock)
+	}
+