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

commit big mess before refactoring

Browse Source
This commit is contained in:
Tonton Th
2025-03-07 10:51:57 +01:00
parent f417711da3
commit c65090e4a2
18 changed files with 233 additions and 100 deletions
Download Patch File Download Diff File Expand all files Collapse all files

50
dynamic.inc
View File

@@ -1,10 +1,43 @@
/*
*/
object { Les_Bibelots rotate y*clock translate <28, -1, -32> }
/*
* on fait passer un hexatruc dans le ciel
*/
#declare A = <-SzSol, 22, -10>;
#declare B = < SzSol+4, 18, -11>;
#declare P = Interpolate(A, B, NormClock);
object { HexaCone () rotate y*((12*NormClock)+80) translate P }
#declare HC_A = <0.03, 1.18, 0.17>;
#declare HC_B = <2.0, 5.0, 9.0>;
/*
* le vaisseau "trident" passe a travers les
* trous de l'underground
*/
#declare Truc = object
{
cylinder { -y, y, 0.8 }
pigment { color Red }
}
#fopen Trid "WS/tridents.log" write
#for (Foo, 0, 5)
#declare Dy = -3+(11*NormClock);
#declare Tr = UnderHoles[Foo] + <0, Dy, 0>;
#write (Trid, Foo, " ", NormClock, " ", Dy, " ",
UnderHoles[Foo], " ", Tr, "\n")
object { Trident_A () translate Tr }
#end
#fclose Trid
/*
* echange hexacone et hexabenz
*/
#declare HC_A = <0.03, 2.18, 0.17>;
#declare HC_B = <3.00, 11.07, 11.09>;
#declare HC_P = Interpolate(HC_A, HC_B, Cos_01(NormClock));
#declare RX = -9+(NormClock*11);
#declare RY = 122 * (exp(NormClock) - 1.0);
@@ -12,19 +45,18 @@ object { HexaCone ()
rotate <RX, RY, -4>
translate HC_P
}
#declare HB_A = <-4.0, 7.0, 5.0>;
#declare HB_B = <0.03, 1.22, 0.17>;
#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 RY = -75 * (exp(NormClock*2) - 1.0);
#declare RY = -75 * (exp(NormClock*1.8) - 1.0);
#declare RZ = -7+(7*NormClock);
object { HexaBenz ()
rotate <6, RY, RZ> translate HB_P }
/*
* nouveau 11 fevrier 2025
* passage d'un hexawood près de la base
*/
#declare A = <-21, -1.9, (SzSol/2)+8>;
#declare B = < 24, -2.4, (SzSol/2)+5>;
#declare A = <-21, 1.1, (SzSol/2)+8>;
#declare B = < 24, 1.1, (SzSol/2)+5>;
#declare P = Interpolate(A, B, NormClock);
object { HexaWood translate P }