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

a lot of little changes

Browse Source
This commit is contained in:
Tonton Th
2025-11-13 02:15:11 +01:00
parent 030f2fb2cf
commit 0b04ffd359
17 changed files with 152 additions and 124 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
xperiment.inc
View File

@@ -9,29 +9,30 @@ object {
/* le corps */
merge {
#local L2 = Longueur / 2;
#local R = 0.55;
#local R = 0.25;
cylinder { <L2, 0, 0>, <-L2, 0, 0>, R }
sphere { <0, 0, 0>, R
scale <3, 1, 1>
translate x*L2
}
sphere { <-L2, 0, 0>, R }
/* le kiosque (est-ce un sous-marin ?) */
sphere { <-L2, 0, 0>, R }
merge {
cylinder { <0, 0, 0>, <0, L2, 0>, R/4 }
#local H2 = L2 * 0.60;
cylinder { <0, 0, 0>, <0, H2, 0>, R/4 }
sphere { <0, 0, 0>, R/4
scale <1, 0.4, 1> translate y*L2
scale <1, 0.5, 1> translate y*H2
}
scale <2, 1, 1> translate x*L2*0.70
scale <2.5, 1, 1> translate x*L2*0.75
}
#local R = rand(Rng1);
#if (R < 0.333)
texture { WIP_color }
texture { Soft_Silver }
#elseif (R < 0.666)
texture { GoldDark }
#else
texture { Flashy scale 17 }
texture { Lightning1 rotate z*90 scale 0.11 }
#end
}
}
@@ -43,12 +44,12 @@ object {
*/
#macro Une_Arche (Val)
object {
#debug concat(" Arche, val = ", str(Val, 6, 4), "\n")
// #debug concat(" Arche, val = ", str(Val, 6, 4), "\n")
merge {
#local Ha = 2;
// mettre une base de la colonne
cylinder { <-1, 0, 0>, <-1, 0.20, 0> Val*1.29 }
cylinder { < 1, 0, 0>, < 1, 0.20, 0> Val*1.27 }
cylinder { <-1, 0, 0>, <-1, 0.20, 0> Val*1.49 }
cylinder { < 1, 0, 0>, < 1, 0.20, 0> Val*1.41 }
cylinder { <-1, 0, 0>, <-1, Ha, 0>, Val }
cylinder { < 1, 0, 0>, < 1, Ha, 0>, Val }
@@ -72,16 +73,15 @@ merge {
#elseif (R < 0.75)
texture { T_Stone32 scale 5+rand(Rng1) }
#else
texture { T_Stone36 scale 6+rand(Rng1) }
texture { T_Stone36 scale 3+rand(Rng1) }
#end
}
}
#end
#declare Les_Arches = object
{
#macro Les_Arches (EK)
union {
#local E = 1.333 + (rand(Rng1) * 0.50);
#local E = EK + (rand(Rng1) * 0.50);
object { Une_Arche (0.20) }
object { Une_Arche (0.16) translate -z*E }
object { Une_Arche (0.16) translate z*E }
@@ -90,7 +90,7 @@ union {
object { Une_Arche (0.08) translate -z*E*3 }
object { Une_Arche (0.08) translate z*E*3 }
}
}
#end // macro
// ==============================================================
/*
@@ -111,7 +111,7 @@ union {
difference {
#local KX = 0.60;
#local KH = 1.80 + rand(Rng1) ;
#debug concat(" Cahute_0, KH = ", str(KH, 6, 4), "\n")
// #debug concat(" Cahute_0, KH = ", str(KH, 6, 4), "\n")
#local KZ = KX + (0.24*rand(Rng1));
box { <-KX, 0, -KZ>, <KX, KH, KZ> }