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

commit for rabbit

Browse Source
This commit is contained in:
Tonton Th
2026-01-16 18:29:15 +01:00
parent 77ebfd9018
commit a51a963ba0
7 changed files with 65 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
dynamic.inc
View File

@@ -100,18 +100,26 @@ object { HexaCone () rotate y*((12*NormClock)+80) translate P }
* * les coordonnées de ces trous sont définies
* dans le fichier 'contexte.inc'.
*/
// #fopen Trid "WS/tridents.log" write
#ifdef (DEBUG_LEVEL)
#fopen Trid "WS/underholes.log" append
#end
#for (Foo, 0, 5)
#declare Dy = rand(Rng1)-4+(11*NormClock);
#declare Dy = rand(Rng1)-8+(12*NormClock);
#declare Tr = UnderHoles[Foo] + <0, Dy, 0>;
#declare Ry = (( 0.5+rand(Rng1)-NormClock ) * 97);
// #write (Trid, Foo, " ", NormClock, " ", Dy, " ",
// Ry, " ", Tr, "\n")
#declare Ry = (( 0.5+rand(Rng1)-NormClock ) * 133);
#ifdef (DEBUG_LEVEL)
#write (Trid, "Trid ", Foo, " ", NormClock, " ", Dy, " ",
Ry, " ", Tr, "\n")
#end
object { Trident_A () rotate y*Ry
translate y+( (10*rand(Rng1)) - 5)
// translate y+( (10*rand(Rng1)) - 5)
translate Tr }
#end
// #fclose Trid
#ifdef (DEBUG_LEVEL)
#fclose Trid
#end
/*
* ----------------------------
@@ -146,7 +154,7 @@ object { HexaBenz ()
#local R = 16.64 * cos(K);
#local H = 0.52 * pow(sin(K), 3);
#declare P_hexawood = P + <0, 0.26+H, 0>;
#debug "+++++++++++++ P_hexawood defined\n"
// #debug "+++++++++++++ P_hexawood defined\n"
object { HexaWood rotate z*R translate P_hexawood }