tTh/PovJouets
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

add a door to the station

Browse Source
This commit is contained in:
Tonton Th
2026-06-29 15:58:02 +02:00
parent 5f45012538
commit 1e11d7316e
1 changed files with 21 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
incs/gare.inc
View File

@@ -5,29 +5,38 @@
*/
#local H_quai = 110;
#local Decoupe_porte_gare = object
{
merge {
box { <-120, -1, -20>, <120, 240, 20> }
cylinder { <0, 0, -20>, <0, 0, 20>, 51
scale <1, 0.8, 1> translate y*230 }
}
}
#declare Corps_Gare = object
{
difference
{
box { <-600, 0, -200>, <600, 400, 200> }
box { <-590, 0, -190>, <590, 390, 190> }
#declare foo = -3;
#while (foo <= 3)
#for (foo, -1, 3)
#declare px = foo * 165;
box { <px-42, 120, -222>, <px+42, 275, 222> }
#declare foo = foo + 1;
box { <px-42, 110, -222>, <px+42, 255, 222> }
#end
object { Decoupe_porte_gare translate <-430, 0, -200> }
}
texture {
pigment { color White }
finish { phong 0.5 }
translate y*100
}
}
#declare Quai_Gare = object
{
box { <-700, 0, 220>, <700, 100, -420> }
box { <-700, 0, 220>, <700, H_quai, -420> }
pigment { color White }
finish { phong 0.4 }
@@ -35,15 +44,13 @@ finish { phong 0.4 }
#include "incs/enseigne.inc"
#declare Gare = object
{
union
{
object { Corps_Gare }
object { Corps_Gare translate y*H_quai }
object { Quai_Gare }
object { Enseigne_Hello scale 15 translate <0, 460, -210> }
object { Enseigne_Hello scale 15 translate <0, 465, -210> }
}
}