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

adjustements MUST be tested

Browse Source
This commit is contained in:
Tonton Th 2025-09-16 14:21:20 +02:00
parent 7d6e50cb7d
commit 55a174f4f2
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
dynamic.inc
View File

@ -18,7 +18,7 @@ union {
object { HexaBenz () translate < K, 1.71, 0> }
}
}
object { BiBenz rotate -y*(clock*0.19) translate Pos_RedB_0 }
object { BiBenz rotate -y*(clock*0.21) translate Pos_RedB_0 }
#declare BiCone = object
{
@ -47,7 +47,7 @@ object { HexaCone () rotate y*((12*NormClock)+80) translate P }
#for (Foo, 0, 5)
#declare Dy = rand(Rng1)-3+(11*NormClock);
#declare Tr = UnderHoles[Foo] + <0, Dy, 0>;
#declare Ry = ((rand(Rng1)-NormClock)*77);
#declare Ry = ((rand(Rng1)-NormClock)*87);
#write (Trid, Foo, " ", NormClock, " ", Dy, " ",
Ry, " ", Tr, "\n")
object { Trident_A () rotate y*Ry translate Tr }
@ -55,6 +55,7 @@ object { HexaCone () rotate y*((12*NormClock)+80) translate P }
#fclose Trid
/*
* ----------------------------
* echange hexacone et hexabenz
*/
#declare HC_A = <0.03, 2.18, 0.17>;
@ -62,17 +63,19 @@ object { HexaCone () rotate y*((12*NormClock)+80) translate P }
#declare HC_P = Interpolate(HC_A, HC_B, Cos_01(NormClock));
#declare RX = -9+(NormClock*11);
#declare RY = 122 * (exp(NormClock) - 1.0);
#declare RZ = 33 * cos(NormClock*7.65);
object { HexaCone ()
rotate <RX, RY, -4>
rotate <RX, RY, RZ>
translate HC_P
}
#declare HB_A = <-5.00, 10.0, 6.33>;
#declare HB_B = < 0.03, 2.32, -0.37>;
#declare HB_P = Interpolate(HB_A, HB_B, Cos_01(NormClock));
#declare RX = Cos_01(NormClock);
#declare RY = -75 * (exp(NormClock*1.8) - 1.0);
#declare RZ = -7+(7*NormClock);
#declare RZ = abs(33 * sin(NormClock*7.65));
object { HexaBenz ()
rotate <6, RY, RZ> translate HB_P }
rotate <RX, RY, RZ> translate HB_P }
/*
* passage d'un hexawood près de la base
@ -80,7 +83,7 @@ object { HexaBenz ()
#declare A = <-25, 0.4, (SzSol/2)+4>;
#declare B = < 29, 0.5, (SzSol/2)+1>;
#declare P = Interpolate(A, B, NormClock);
#local K = NormClock*36;
#local K = NormClock*31;
#local R = 16.64 * cos(K);
#local H = 0.52 * pow(sin(K), 3);
#declare P_hexawood = P + <0, 0.26+H, 0>;