better rotation and look of gyrophares

This commit is contained in:
Tonton Th 2025-03-20 21:22:02 +01:00
parent b072c816a4
commit bb68a37188

View File

@ -44,8 +44,8 @@ union {
cylinder { 0, y*H_gyro, R_gyro }
intersection {
sphere { 0, R_gyro scale <1, 1.414, 1> }
box { <-1, 0, -1>, <1, 1, 1> }
translate y*(H_gyro+H_gylampe+0.02)
box { <-1, 0, -1>, <1, 1.94, 1> }
translate y*(H_gyro+H_gylampe+0.04)
}
#if (rand(Rng1) < 0.5)
texture { T_Stone25 scale 1+rand(Rng1) }
@ -61,16 +61,18 @@ union {
cylinder { 0, y*H_gylampe, R_gyro }
cylinder { y*0.01, y*(H_gylampe-0.01), R_gyro*0.97 }
#local WB = 0.017;
box { <-1, 0.03, -WB>, <1, (H_gylampe-0.03), WB> }
box { <-WB, 0.03, -1>, <WB, (H_gylampe-0.03), 1> }
union {
box { <-1, 0.03, -WB>, <1, (H_gylampe-0.03), WB> }
box { <-WB, 0.03, -1>, <WB, (H_gylampe-0.03), 1> }
}
#undef WB
pigment { color Gray90 }
#local Ro = 5.89*(0.5-rand(Rng1));
#if (abs(Ro) < 0.06)
#local Ro = Ro * 10;
#local Ro = 0.5 + (2.0 * rand(Rng1));
#if (rand(Rng1) < 0.50)
#local Ro = -Ro;
#end
rotate y * Ro * clock
#undef Ro
rotate y*(0.5-rand(Rng1)) * clock
}
light_source { y*0.10
rgb <0.8, 0.9, 0.999999999>
@ -92,7 +94,7 @@ union {
#macro Les_GyroPhares ()
union {
#local E = SzSol * 0.431;
#for (Idx, 0, 360, 60)
#for (Idx, 0, 359, 60)
#local Ang = radians(Idx+7.33);
#local Dx = E * sin(Ang);
#local Dz = E * cos(Ang);