3d/pr/entdecker/impulstriebwerk.pov

51 lines
808 B
POVRay

#declare extra = 2;
#declare impulstriebwerk =
difference {
union {
intersection {
sphere {
<0, 0, 0> 900
translate <-670, -500, 0>
}
box {
< 80, 0, -40>
< 0, 100, 40>
}
}
cone {
<35, 0, 0>, 35
<35, 100, 0>, 35
texture { pigment { color Blue }}
}
}
cone {
<0, -extra, 0>, extra
<0, 0, 0>, 0
matrix <
35, -35, 0,
-25, -55, 0,
0, 0, 35,
10, 10, 0
>
texture { pigment { color Yellow }}
}
sphere {
<10, 10, 0>
8
texture { pigment { color Yellow }}
}
cone {
<10, 10, 0> 4
<0, 10, 0> 4
texture { pigment { color Yellow }}
}
#ifdef (Debug)
box {
<-10, 0, 0>
<70, 100, 70>
texture { pigment { color Red }}
}
#end
texture { Ynkelonium_Texture }
}