better rotation and look of gyrophares
This commit is contained in:
parent
b072c816a4
commit
bb68a37188
20
contexte.inc
20
contexte.inc
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user