moving a wagonet to a better file

This commit is contained in:
Tonton Th 2025-11-02 13:58:23 +01:00
parent 1a2fbe84b9
commit 40bf162ba8
2 changed files with 32 additions and 32 deletions

View File

@ -24,38 +24,6 @@
* rail circulaire
*/
#macro Wagonnet_0 (Longueur)
object {
/* le corps */
merge {
#local L2 = Longueur / 2;
#local R = 0.50;
cylinder { <L2, 0, 0>, <-L2, 0, 0>, R }
sphere { <0, 0, 0>, R
scale <3, 1, 1>
translate x*L2
}
/* le kiosque (est-ce un sous-marin ?) */
sphere { <-L2, 0, 0>, R }
merge {
cylinder { <0, 0, 0>, <0, L2, 0>, R/4 }
sphere { <0, 0, 0>, R/4
scale <1, 0.4, 1> translate y*L2
}
scale <2, 1, 1> translate x*L2*0.70
}
#local R = rand(Rng1);
#if (R < 0.333)
texture { WIP_color }
#elseif (R < 0.666)
texture { GoldDark }
#else
texture { Flashy scale 17 }
#end
}
}
#end // macro
#declare Un_Wagonnet = object
{

View File

@ -4,6 +4,38 @@
* A cosy place for experimental things (2025/10/27)
*
*/
#macro Wagonnet_0 (Longueur)
object {
/* le corps */
merge {
#local L2 = Longueur / 2;
#local R = 0.55;
cylinder { <L2, 0, 0>, <-L2, 0, 0>, R }
sphere { <0, 0, 0>, R
scale <3, 1, 1>
translate x*L2
}
/* le kiosque (est-ce un sous-marin ?) */
sphere { <-L2, 0, 0>, R }
merge {
cylinder { <0, 0, 0>, <0, L2, 0>, R/4 }
sphere { <0, 0, 0>, R/4
scale <1, 0.4, 1> translate y*L2
}
scale <2, 1, 1> translate x*L2*0.70
}
#local R = rand(Rng1);
#if (R < 0.333)
texture { WIP_color }
#elseif (R < 0.666)
texture { GoldDark }
#else
texture { Flashy scale 17 }
#end
}
}
#end // macro
// =======================================================
/*