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

welcome here, hexa-patrol

Browse Source
This commit is contained in:
Tonton Th
2026-02-14 13:35:54 +01:00
parent 6a983ee560
commit 606536c3f3
18 changed files with 198 additions and 199 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
contexte.inc
View File

@@ -11,8 +11,8 @@
#macro Trois_Portiques (Dist)
union {
object { Portique_A () }
object { Portique_A () scale <1, 1.15, 1> translate z*5 }
object { Portique_A () translate z*10 }
object { Portique_A () scale <1, 1.2, 1> translate z*11 }
object { Portique_A () rotate y*11 translate z*22 }
// XXX scale 1.85
}
#end // macro trois portiques
@@ -22,17 +22,13 @@ union {
* essai du 12 mars 2025
*/
#declare RedB_0_X = 19;
#declare RedB_0_Z = 29;
#declare RedB_0_X = 19; #declare RedB_0_Z = 29;
#declare RedB_1_X = -24;
#declare RedB_1_Z = 8;
#declare RedB_1_X = -24; #declare RedB_1_Z = 8;
#declare RedB_2_X = 36;
#declare RedB_2_Z = -21;
#declare RedB_2_X = 36; #declare RedB_2_Z = -21;
#declare RedB_3_X = 42;
#declare RedB_3_Z = -5;
#declare RedB_3_X = 42; #declare RedB_3_Z = -5;
#declare Pos_RedB_0 = <RedB_0_X, 0, RedB_0_Z>;
#declare Pos_RedB_1 = <RedB_1_X, 0, RedB_1_Z>;
@@ -69,7 +65,7 @@ union {
#local R = rand(Rng1);
#if (R < 0.33) texture { T_Stone25 scale 1+rand(Rng1) }
#elseif (R < 0.66) texture { T_Stone15 scale 1+rand(Rng1) }
#else texture { T_Stone6 }
#else texture { T_Stone6 scale 1+rand(Rng1) }
#end
#undef R
}
@@ -112,7 +108,7 @@ union {
#macro Les_GyroPhares ()
union {
#local E = SzSol * 0.455;
#local E = SzSol * 0.471;
#for (Idx, 0, 359, 60)
#local Ang = radians(Idx+9.33);
#local Dx = E * sin(Ang);
@@ -125,11 +121,10 @@ union {
/* ======================================================= */
/* 11 avril 2025, je pose un grand cercle d'hexapoles
* 9 octobre 2025, je rajoute un rail circulaire
* les navettes qui circulent sont dans 'dynamic.inc'
*/
#declare Les_HexaPoles = object
{
union {
#for (Ang, 0, 359, 6)
#local De = 3.6 + (0.5*rand(Rng1));
@@ -233,11 +228,12 @@ blob {
#for (Idx, 0, 5)
#local Angle = (Idx + 0.19) * 1.09; // magic numbers ?
#local Px = sin(Angle) * (SzSol * 0.98);
#local Pz = cos(Angle) * (SzSol * 1.02);
#local Kr = 6 - (rand(Rng1)*3);
#local Px = Kr + sin(Angle) * (SzSol * 0.98);
#local Kr = 6 - (rand(Rng1)*3);
#local Pz = Kr + cos(Angle) * (SzSol * 1.02);
#ifdef (DEBUG_LEVEL)
#write (Trid, "Def ", Idx, " ", NormClock, " ", Px, " ", Pz, "\n")
#write (Trid, "Def_", Idx, " ", NormClock, " ", Px, " ", Pz, "\n")
#end
// put the coords in the array.
#declare UnderHoles[Idx] = <Px, 0, Pz>;
@@ -261,13 +257,21 @@ difference {
}
}
/* 10 fev 2026, on place des bordures autour des trous */
/* -> xperiment.inc */
#for (foo, 0, 5)
#local YHB = (0.08 + (0.5*rand(Rng1)) * y);
object { HoleBorder (1.14) translate YHB + UnderHoles[foo] }
#end
/* 10 fev 2026, on place des bordures autour des trous */
/* voir aussi -> xperiment.inc */
#declare Les_Bordures = object
{
union {
#for (foo, 0, 5)
// #local YHB = (0.08 + (0.5*rand(Rng1)) * y);
#if (rand(Rng1) < 0.5)
object { HoleBorder_A (1.04) translate UnderHoles[foo] }
#else
object { HoleBorder_B (1.06) translate UnderHoles[foo] }
#end // if
#end // for
}
}
/* ======================================================= */
/*
* nouvel éclairage du 10 février 2025
@@ -302,7 +306,7 @@ rotate -19 * y
union {
/* a l'interieur du 'circular' */
object { Chose () translate <-25, 0, -31> }
object { Chose () translate < 20, 0, -32> }
object { Chose () translate < 20, 0, -36> }
/* a l'exterieur du 'circular' */
#for (foo, 0, 359, 18)
#local CK = radians(foo + (9*rand(Rng1)));
@@ -376,6 +380,7 @@ sky_sphere {
{
union {
object { Underground }
object { Les_Bordures }
#include "groundbase.inc"
object { La_GroundBase }
@@ -393,7 +398,8 @@ union {
object { QuadriLight }
object { Les_GyroPhares () }
object { Les_HexaPoles }
object { Horloge rotate y*27 translate < 3, 0, -30> }
object { HorlogeDouble rotate y*(27*NormClock)
translate < 3, 0, -30> }
object { Les_Choses }
object { Les_Arches (1.9) rotate y*132 translate <-34, 0, -26> }