tTh/HexaCone
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

release of the official "full-v2" video

Browse Source
This commit is contained in:
Tonton Th
2025-02-14 19:47:29 +01:00
parent 14a03b78eb
commit cd65855f2c
18 changed files with 137 additions and 62 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
hexawood.inc
View File

@@ -3,6 +3,10 @@
*/
// =======================================================
#declare Hc_ep = 0.42; // epaisseur chassis
#declare Hc_rad = 0.70; // rayon du chassis
#declare Hc_elo = 1.85; // elongation sur x
// -------------------------------------------------------
#macro HW_Un_Cone ()
@@ -17,9 +21,9 @@ merge {
#macro HW_Cones ()
union {
#for (foo, 0, 360, 60)
#local E = 0.58;
#local Tx = 1.414 * E * sin(radians(foo));
#local Tz = E * cos(radians(foo));
#local E = Hc_rad * 0.85;
#local Tx = Hc_elo * E * sin(radians(foo));
#local Tz = E * cos(radians(foo));
object {
HW_Un_Cone ()
#if ( rand(Rng1) < 0.5 )
@@ -30,7 +34,7 @@ union {
// texture { T_WIP_alert }
#end
// rotate -z*foo
translate <Tx, 0.20, Tz>
translate <Tx, Hc_ep - 0.22, Tz>
}
#end // end for
}
@@ -39,35 +43,42 @@ union {
#macro HW_Chassis ()
difference {
#local El = 1.414;
#local El = Hc_elo;
merge {
torus { 0.70, 0.20 translate y*0.20 }
cylinder { 0, y*0.40, 0.70 }
torus { Hc_rad, 0.20 translate y*0.20 }
cylinder { 0, y*0.40, Hc_rad }
scale <El, 0.5, 1>
}
/* trou pour mettre une lampe */
cylinder { -1*y, 0.12*y, 0.08 }
torus { Hc_rad*0.30, 0.18 scale <1, 1.45, 1>
translate y*0.39 }
#for (foo, 0, 360, 60)
#local E = 0.58;
#local E = Hc_rad * 0.85;
#local Tx = El * E * sin(radians(foo));
#local Tz = E * cos(radians(foo));
sphere { 0, 0.17 translate <Tx, 0.20, Tz> }
#end
#for (foo, 0, 360, 60)
#local E = 0.84;
#local E = Hc_rad * 1.14;
#local Tx = El * E * sin(radians(foo+30));
#local Tz = E * cos(radians(foo+30));
cylinder { -y, y, 0.05 translate <Tx, 0, Tz> }
#end
translate y*0.10
texture { T_Wood17 scale 0.92 }
texture { T_Wood17 scale 0.82 }
}
#end
#macro HW_une_patte ()
merge {
sphere { 0, 0.02 scale <1, 0.24, 1> translate 0.30*y }
cylinder { 0, 0.30*y, 0.02 }
sphere { 0, 0.07 scale <1, 0.27, 1> }
sphere { 0, 0.07 scale <1, 0.29, 1> }
}
#if ( rand(Rng1) < 0.3 )
texture { Tinny_Brass }
@@ -79,8 +90,8 @@ merge {
#declare HW_les_pattes = object
{
union {
#local E = 0.84;
#local El = 1.414;
#local E = Hc_rad * 1.14;
#local El = Hc_elo;
#for (foo, 0, 360, 60)
#local Tx = El * E * sin(radians(foo+30));
#local Tz = E * cos(radians(foo+30));
@@ -94,7 +105,9 @@ union {
union {
object { HW_Chassis () }
object { HW_les_pattes }
light_source { 0.20*y rgb <0, 0.20, 0.95> }
#if (mod(clock, 10) < 6)
light_source { 0.20*y rgb <0, 0.20, 0.95> }
#end
object { HW_Cones () translate y*0.15 }
}
}