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

premier commit du printemps

Browse Source
This commit is contained in:
Tonton Th
2025-03-31 03:55:29 +02:00
parent 3c4012945f
commit 363274e273
18 changed files with 221 additions and 79 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
contexte.inc
View File

@@ -25,8 +25,9 @@
#macro RedBase_0 ( T )
difference {
#local R = 2.46;
cylinder { 0, y*0.40, R }
cone { y*0.37, R*0.78, y*0.42, R*0.83 }
cylinder { 0, y*0.40, R }
cylinder { 0, y*0.36, R*0.98 }
cone { y*0.37, R*0.80, y*0.42, R*0.83 }
#for (Foo, 20, 339, 10)
#local Dx = R * sin(radians(Foo));
#local Dz = R * cos(radians(Foo));
@@ -127,15 +128,15 @@ merge {
{
union {
object { HexaBalls
texture { Lightning1 scale 0.33 }
rotate <clock/3, clock/6, clock/9>
translate <2, -1.1+1.01*Cos_010(NormClock), 4>
texture { Lightning1 scale 0.44 }
rotate <clock/3, clock/4, clock/9>
translate <2, 1.11*Cos_010(NormClock), 4>
}
object { HexaBalls
texture { Lightning2 scale 0.56 }
rotate <-clock, clock*0.33333, clock>
translate <5, -1+0.92*Cos_010(NormClock), -3>
translate <4, 1.11*Cos_010(NormClock), -3>
}
}
}
@@ -166,9 +167,12 @@ blob {
#declare UnderHoles = array[6]
/*
* on rempli le tableau avec la place des trous
*/
#fopen Holes "WS/holes.log" write
#for (Idx, 0, 5)
#local Angle = Idx* 1.090;
#local Angle = (Idx + 0.17) * 1.090;
#local Px = sin(Angle) * (SzSol * 1.21);
#local Pz = cos(Angle) * (SzSol * 1.23);
#declare UnderHoles[Idx] = <Px, 0, Pz>;
@@ -187,12 +191,14 @@ difference {
cylinder { -y*5, y*5, 3.4 translate UnderHoles[Foo] }
#end
}
texture { T_Planete_A scale 0.3333 }
/*
texture {
pigment { color Gray20 }
normal { bumps 0.38 scale 2.6 }
finish { phong 0.125 }
}
// translate -y*1.55
*/
}
/* ======================================================= */