hjp
/
3d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Stiegenhaeuser, Schnitt.

This commit is contained in:
hjp 2007-12-23 16:34:23 +00:00
parent 8000e940f7
commit bfb041a30d
1 changed files with 69 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

73
pr/schneller_kreuzer/deck_13.pov
View File

@ -5,6 +5,8 @@
#include "T_bodenbelag.pov"
#include "zentrale.pov"
#declare Eps=1E-3;
#local kabinen_deck =
union {
object {
@ -62,10 +64,19 @@
#local I1 = 0;
#while (I1 < 4)
#local A = A0 + (-1.5 + I1) * Kw;
object {
kabine4
rotate <0, A, 0>
}
#local ss = 1;
#ifdef (SCHNITT_1)
#local pp = vrotate(<0, 0, 1>, <0, A, 0>);
#if (pp.x < 0 & pp.z < 0)
#local ss = 0;
#end
#end
#if (ss)
object {
kabine4
rotate <0, A, 0>
}
#end
#local I1 = I1 + 1;
#end
#local A0 = A0 + 90;
@ -82,6 +93,29 @@
(15+6)/2, (15-6)/2
}
}
box {
<-5.9, -0.1-Eps, -1>
<-10, 0+Eps, +1>
texture { T_bodenbelag }
}
box {
<-5.9, -0.1-Eps, -1>
<-10, 0+Eps, +1>
texture { T_bodenbelag }
rotate <0, 90, 0>
}
box {
<-5.9, -0.1-Eps, -1>
<-10, 0+Eps, +1>
texture { T_bodenbelag }
rotate <0, 180, 0>
}
box {
<-5.9, -0.1-Eps, -1>
<-10, 0+Eps, +1>
texture { T_bodenbelag }
rotate <0, 270, 0>
}
#ifdef (SCHNITT_1)
intersection {
torus {
@ -168,6 +202,37 @@
kabinen_deck
translate <0, 14.8-2*2.84, 0>
}
// Stiegenhaeuser
#local J = 0;
#while (J < 360)
union {
#local I= 0;
#while (I < 10)
box {
<-10+(I+1)*0.4, 14.8-2.84 - I*0.196, 0>
<-10+I*0.4, 14.8-2.84 - I*0.196 - 0.1, +1>
texture { T_bodenbelag }
}
#local I = I + 1;
#end
#local I= 0;
#while (I < 6)
box {
<-10+(I+1)*0.4, 14.8-2*2.84 + I*0.18, 0>
<-10+I*0.4, 14.8-2*2.84 + I*0.18 - 0.1, -1>
texture { T_bodenbelag }
}
#local I = I + 1;
#end
box {
<-6, 10.2, 0>
<-7.6, 10.2 - 0.1, -1>
texture { T_bodenbelag }
}
rotate <0, J, 0>
}
#local J = J + 90;
#end
// Treibstofftanks
#local rr = 25.5;