on the way to a new hexastar
This commit is contained in:
parent
f251fbb825
commit
4e88f481ff
33
hexastar.inc
33
hexastar.inc
@ -10,14 +10,12 @@
|
|||||||
|
|
||||||
#declare HS_radius = 0.407;
|
#declare HS_radius = 0.407;
|
||||||
|
|
||||||
#macro HS_element_a ()
|
#macro HS_element_pointe ()
|
||||||
union {
|
union {
|
||||||
#local R_a = HS_radius * 0.33333;
|
#local R_a = HS_radius * 0.33333;
|
||||||
#local Small = 0.00001;
|
#local Small = 0.00001;
|
||||||
cone { <-1.34, 0, 0>, Small, <-0.6, 0, 0>, R_a }
|
cone { <-1.34, 0, 0>, Small, <-0.6, 0, 0>, R_a }
|
||||||
sphere { 0, R_a scale <0.3, 1, 1> translate <-0.6, 0, 0> }
|
sphere { 0, R_a scale <0.3, 1, 1> translate <-0.6, 0, 0> }
|
||||||
cone { < 1.34, 0, 0>, Small, < 0.6, 0, 0>, R_a }
|
|
||||||
sphere { 0, R_a scale <0.3, 1, 1> translate < 0.6, 0, 0> }
|
|
||||||
#local R = rand(Rng1);
|
#local R = rand(Rng1);
|
||||||
#if ( R < 0.45 ) texture { GoldDark }
|
#if ( R < 0.45 ) texture { GoldDark }
|
||||||
#elseif ( R < 0.60 ) texture { Aluminum }
|
#elseif ( R < 0.60 ) texture { Aluminum }
|
||||||
@ -33,12 +31,12 @@ union {
|
|||||||
{
|
{
|
||||||
union {
|
union {
|
||||||
torus { HS_radius*0.73, 0.0180 }
|
torus { HS_radius*0.73, 0.0180 }
|
||||||
#local L = 0.0035;
|
#local L = 0.0032;
|
||||||
cylinder { -y*L, y*L, 0.059 }
|
cylinder { -y*L, y*L, 0.059 }
|
||||||
sphere { 0, 0.059 translate -y*L }
|
sphere { 0, 0.059 translate -y*L }
|
||||||
sphere { 0, 0.059 translate y*L }
|
sphere { 0, 0.059 translate y*L }
|
||||||
}
|
}
|
||||||
scale <1, 25.90, 1>
|
scale <1, 25.10, 1>
|
||||||
rotate z*90
|
rotate z*90
|
||||||
#local R = rand(Rng1);
|
#local R = rand(Rng1);
|
||||||
#if ( R < 0.33 ) texture { Y_Texture }
|
#if ( R < 0.33 ) texture { Y_Texture }
|
||||||
@ -47,6 +45,26 @@ rotate z*90
|
|||||||
#end
|
#end
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/* ------------------------------------------------------------ */
|
||||||
|
/* nouveau 14 janvier 2026 */
|
||||||
|
#macro HS_element_queue ()
|
||||||
|
union {
|
||||||
|
#local R_a = HS_radius * 0.2222;
|
||||||
|
#local Small = 0.00001;
|
||||||
|
cone { < 0.44, 0, 0>, Small, < 0.88, 0, 0>, R_a }
|
||||||
|
sphere { 0, R_a scale <0.7, 1, 1> translate <0.88, 0, 0> }
|
||||||
|
#local R = rand(Rng1);
|
||||||
|
#if ( R < 0.45 ) texture { C_Texture }
|
||||||
|
#elseif ( R < 0.80 ) texture { Aluminum }
|
||||||
|
#else texture { T_Gold_3C }
|
||||||
|
#end
|
||||||
|
}
|
||||||
|
#end // macro
|
||||||
|
/* ------------------------------------------------------------ */
|
||||||
|
/* nouveau XXX janvier 2026 */
|
||||||
|
|
||||||
|
// UNE ANTENNE ?
|
||||||
|
|
||||||
/* ============================================================ */
|
/* ============================================================ */
|
||||||
/* On regroupe les six élements */
|
/* On regroupe les six élements */
|
||||||
#declare HS_les_elements = object
|
#declare HS_les_elements = object
|
||||||
@ -56,8 +74,9 @@ union {
|
|||||||
#local E = HS_radius;
|
#local E = HS_radius;
|
||||||
#local Ty = E * cos(radians(Foo));
|
#local Ty = E * cos(radians(Foo));
|
||||||
#local Tz = E * sin(radians(Foo));
|
#local Tz = E * sin(radians(Foo));
|
||||||
object {
|
union {
|
||||||
HS_element_a ()
|
object { HS_element_pointe () }
|
||||||
|
object { HS_element_queue () }
|
||||||
translate <0, Ty, Tz>
|
translate <0, Ty, Tz>
|
||||||
}
|
}
|
||||||
#end // end for
|
#end // end for
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user