home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 16
/
CD_ASCQ_16_0994.iso
/
news
/
4613
/
jet.rrt
< prev
next >
Wrap
Text File
|
1994-06-11
|
15KB
|
679 lines
// Fontaine
#include "colors.inc"
#include "shapes.inc"
#include "textures.inc"
camera {
location <10 17 -10>
point_at <0 0.2 0>
angle 32
}
environment {
clouds
color_map {
[0 1 color Blue color White ]
}
}
object {
light_source { <-13 17 3> intensity 15 color White }
}
object {
light_source { <10 3 -10> intensity 12 color White }
}
object {
light_source { <3 17 3> intensity 10 color White }
}
/*object {
light_source { <-8 14 6> intensity 10 color White }
}*/
#declare Wood1 = texture {
wood
turbulence 0.4
octaves 2
scale <0.1 0.1 0.4>
color_map {
[0.00 0.10 color red 0.60 green 0.30 blue 0.18
color red 0.60 green 0.30 blue 0.18]
[0.10 0.90 color red 0.60 green 0.30 blue 0.18
color red 0.30 green 0.15 blue 0.09]
[0.90 1.00 color red 0.30 green 0.15 blue 0.09
color red 0.30 green 0.15 blue 0.09]
}
}
#declare Recule = 5
#declare Lobe = union {
intersection {
QCone_X
slab { <1 0 0> 0 1 }
scale <1 0.122790698 0.122790698>
}
intersection {
sphere { <1.015077555 0 0> 0.1237129262 }
plane { <-1 0 0> 1 }
}
rotate <0 0 -20>
}
#declare Base = bound {
object { Lobe rotate <0 0 0> }
object { Lobe rotate <0 12 0> }
object { Lobe rotate <0 24 0> }
object { Lobe rotate <0 36 0> }
object { Lobe rotate <0 48 0> }
object { Lobe rotate <0 60 0> }
object { Lobe rotate <0 72 0> }
object { Lobe rotate <0 84 0> }
object { Lobe rotate <0 96 0> }
object { Lobe rotate <0 108 0> }
object { Lobe rotate <0 120 0> }
object { Lobe rotate <0 132 0> }
object { Lobe rotate <0 144 0> }
object { Lobe rotate <0 156 0> }
object { Lobe rotate <0 168 0> }
object { Lobe rotate <0 180 0> }
object { Lobe rotate <0 192 0> }
object { Lobe rotate <0 204 0> }
object { Lobe rotate <0 216 0> }
object { Lobe rotate <0 228 0> }
object { Lobe rotate <0 240 0> }
object { Lobe rotate <0 252 0> }
object { Lobe rotate <0 264 0> }
object { Lobe rotate <0 276 0> }
object { Lobe rotate <0 288 0> }
object { Lobe rotate <0 300 0> }
object { Lobe rotate <0 312 0> }
object { Lobe rotate <0 324 0> }
object { Lobe rotate <0 336 0> }
object { Lobe rotate <0 348 0> }
}
by box { <-1.1 -0.47 -1.1> <1.1 0 1.1> }
#declare Milieu1 = bound {
object {
intersection {
Hyperboloid_Y
slab { <0 1 0> -3.1 1.118 }
scale <0.6 1.104 0.6>
}
translate <0 2.4 0>
}
}
by box { <-2 -0.8 -2> <2 3.6 2> }
#declare Bosse = object {
Ellipsoid
scale <0.8 0.8 0.2>
translate <0 4.634272 0>
}
#declare Milieu2 = bound {
object {
torus { <0 0 0> <0 0 1> 0.9 0.1 }
rotate <90 0 0>
translate <0 3.734272 0>
}
object {
intersection {
Hyperboloid_Y
slab { <0 1 0> -1.118 1.118 }
scale <0.6 0.7155635063 0.6>
}
translate <0 4.634272 0>
}
object { Bosse }
object { Bosse rotate <0 15 0> }
object { Bosse rotate <0 30 0> }
object { Bosse rotate <0 45 0> }
object { Bosse rotate <0 60 0> }
object { Bosse rotate <0 75 0> }
object { Bosse rotate <0 90 0> }
object { Bosse rotate <0 105 0> }
object { Bosse rotate <0 120 0> }
object { Bosse rotate <0 135 0> }
object { Bosse rotate <0 150 0> }
object { Bosse rotate <0 165 0> }
object {
torus { <0 0 0> <0 0 1> 0.9 0.1 }
rotate <90 0 0>
translate <0 5.534272 0>
}
object {
intersection {
Cylinder_Y
slab { <0 1 0> -0.3 0.3 }
}
scale <0.9 1 0.9>
translate <0 5.834272 0>
}
}
by box { <-1 3.6 -1> <1 6.2 1> }
#declare Pied = object {
composite {
object { Base scale <4.3 4.3 4.3> }
object { Milieu1 }
object { Milieu2 }
}
texture {
White_Marble
scale <0.5 0.5 0.5>
ambient 0.2
diffuse 0.7
phong 0.25
phong_size 90
}
}
#declare CuvetteA =
union {
intersection {
Paraboloid_Y
plane { <0 1 0> 36 }
scale <1 0.06388888889 1>
}
torus { <0 0 0> <0 0 1> 5.90873527 0.15 rotate <90 0 0> translate <0 2.419040954 0> }
}
#declare CuvetteElemB = intersection {
Paraboloid_Y
plane { <0 1 0> 40 }
scale <1 0.06388888889 0.2>
}
#declare CuvetteB =
union {
union {
union {
union {
object { CuvetteElemB }
object { CuvetteElemB rotate <0 11.25 0> }
}
union {
object { CuvetteElemB rotate <0 22.50 0>}
object { CuvetteElemB rotate <0 33.75 0> }
}
}
union {
union {
object { CuvetteElemB rotate <0 45 0>}
object { CuvetteElemB rotate <0 56.25 0> }
}
union {
object { CuvetteElemB rotate <0 67.50 0>}
object { CuvetteElemB rotate <0 78.75 0> }
}
}
}
union {
union {
union {
object { CuvetteElemB rotate <0 90 0>}
object { CuvetteElemB rotate <0 101.25 0> }
}
union {
object { CuvetteElemB rotate <0 112.50 0>}
object { CuvetteElemB rotate <0 123.75 0> }
}
}
union {
union {
object { CuvetteElemB rotate <0 135 0>}
object { CuvetteElemB rotate <0 146.25 0> }
}
union {
object { CuvetteElemB rotate <0 157.50 0>}
object { CuvetteElemB rotate <0 168.75 0> }
}
}
}
}
#declare Bassin = object {
intersection {
object { Paraboloid_Y scale <1 0.06388888889 1> translate <0 7.325 0> }
plane { <0 1 0> 9.3 }
}
scale <0.9 1 0.9>
texture {
color red 0.9 green 0.95 blue 0.9
ambient 0.03
diffuse 0.0175
// reflection 0.10
refraction 0.95
ior 1.33
phong 0.15
phong_size 150
bump {
bumps 0.055
scale <0.1 0.1 0.1>
ripples 0.18 { center < 2.297 9.3 0> frequency 5 phase 0 decay 0.8 }
ripples 0.18 { center <-2.297 9.3 0> frequency 5 phase 0 decay 0.8 }
ripples 0.18 { center <0 9.3 2.297> frequency 5 phase 0 decay 0.8 }
ripples 0.18 { center <0 9.3 -2.297> frequency 5 phase 0 decay 0.8 }
}
}
}
#declare Cuvette = object {
bound {
object {
difference {
object { CuvetteA }
object { CuvetteB translate <0 0.1 0> }
translate <0 7.3 0>
scale <0.9 1 0.9>
}
}
object { Bassin } // eau dans la cuvette
}
by box { <-6.4 7.3 -6.4> <6.4 9.7 6.4> }
texture {
White_Marble
scale <0.5 0.5 0.5>
ambient 0.2
diffuse 0.7
phong 0.25
phong_size 90
}
}
#declare SommetElem1 = intersection {
Hyperboloid_Y
slab { <0 1 0> -2.108185106 0 }
scale <0.45 1.660195772 0.15>
}
#declare Sommet1 = bound {
object { SommetElem1 translate <0 11.1 0> }
object { SommetElem1 rotate <0 30 0> translate <0 11.1 0> }
object { SommetElem1 rotate <0 60 0> translate <0 11.1 0> }
object { SommetElem1 rotate <0 90 0> translate <0 11.1 0> }
object { SommetElem1 rotate <0 120 0> translate <0 11.1 0> }
object { SommetElem1 rotate <0 150 0> translate <0 11.1 0> }
}
by box { <-1.2 7.4 -1.2> <1.2 11.1 1.2> }
#declare Sommet2 = bound {
object {
torus { <0 0 0> <0 0 1> 0.45 0.075 }
rotate <90 0 0>
translate <0 11.175 0>
}
object {
difference {
intersection {
Cylinder_Y
slab { <0 1 0> -0.2 0.2 }
scale <0.45 1 0.45>
}
torus { <0 0 0> <0 0 1> 0.45 0.2 rotate <90 0 0> }
translate <0 11.45 0>
}
}
object {
torus { <0 0 0> <0 0 1> 0.45 0.075 }
rotate <90 0 0>
translate <0 11.725 0>
}
}
by box { <-0.525 11.1 -0.525> <0.525 11.9 0.525> }
#declare Sommet = object {
composite {
object { Sommet1 }
object { Sommet2 }
object {
difference {
intersection {
object { Ellipsoid scale <0.8 0.3 0.8> }
plane { <0 1 0> 0.17 }
}
object {
intersection {
Cylinder_Y
slab { <0 1 0> 0 1 }
scale <0.7 1 0.7>
}
}
translate <0 12.025 0>
}
}
}
texture {
marble // White_Marble
turbulence 1.0
color_map {
[0.0 0.8 color red 0.9 green 0.9 blue 0.9
color red 0.5 green 0.5 blue 0.5]
[0.8 1.0 color red 0.5 green 0.5 blue 0.5
color red 0.2 green 0.2 blue 0.2]
}
scale <0.25 0.25 0.25>
ambient 0.120
diffuse 0.225
phong 0.25
phong_size 90
}
}
#declare Robinet = object {
bound {
intersection {
intersection {
torus { <0 0 0> <0 0 1> 0.9 0.09 }
plane { <1 0 0> 0 rotate <0 0 -30> }
}
plane { <-1 0 0> 0 }
// scale <0.85 1 1>
translate <0.75 11.125 0>
}
}
by box { <0.75 11.8 -0.1> <1.5 12.13 0.1> }
texture {
Metal
color Gold
ambient 0.2
diffuse 0.5
phong 0.25
phong_size 90
bump { bumps 0.1 scale <0.013 0.013 0.013> }
}
}
#declare Robinets = composite {
object { Robinet }
object { Robinet rotate <0 90 0> }
object { Robinet rotate <0 180 0> }
object { Robinet rotate <0 270 0> }
}
#declare Jet = object {
bound {
difference {
difference {
torus { <0 0 0> <0 0 1> 1 0.0310344827 }
plane { <1 0 0> 0 rotate <0 0 -25> }
}
plane { <0 1 0> 0 }
scale <1.9 2.9 2.9>
translate <0.3970253 9.276130278 0>
}
}
by box { <1.2 9.27 -0.09> <2.75 12.17 0.09> }
texture {
color red 0.9 green 0.95 blue 0.9
ambient 0.03
diffuse 0.015
// reflection 0.10
refraction 0.96
ior 1.33
phong 0.25
phong_size 90
bump { bumps 0.1 scale <0.03 0.03 0.03> }
}
}
#declare Jets = composite {
object { Jet }
object { Jet rotate <0 90 0> }
object { Jet rotate <0 180 0> }
object { Jet rotate <0 270 0> }
}
#declare JetSommet = object {
bound {
difference {
intersection {
Paraboloid_Y
plane { <0 1 0> 1 }
scale <0.4 1.1 0.4>
}
intersection {
Paraboloid_Y
plane { <0 1 0> 1.1 }
scale <0.33 1 0.33>
translate <0 0.1 0>
}
rotate <180 0 0>
scale <1 0.75 1>
translate <0 12.925 0>
}
}
by box { <-0.4 12 -0.4> <0.4 13.3 0.4> }
texture {
color red 0.9 green 0.93 blue 0.9
ambient 0.02
diffuse 0.01
// reflection 0.10
refraction 0.96
ior 1.33
phong 0.25
phong_size 90
bump { bumps 0.15 scale <0.03 0.03 0.03> }
}
}
#declare Sol = object {
plane { <0 1 0> -2 }
texture {
color red 0.7 green 0.9 blue 0.3
ambient 0.075
diffuse 0.12
bump {
bumps 0.25
scale <0.07 0.07 0.07>
}
}
}
#declare Pos_Porte = <3 -1.95 24.5>
#declare Mur = object {
difference {
plane { <0 0 -1> -25 }
box { <-4 -0.5 -0.5> <4 12.5 22.5> translate Pos_Porte }
}
texture {
Blue_Agate
rotate <0 30 0>
ambient 0.04
diffuse 0.08
}
translate <0 1 Recule>
rotate <0 -30 0>
}
#declare Moulure = intersection {
union {
union {
box { <-0.5 -6 -0.4> <0.2 6 0.4> }
object { Cylinder_Y scale <0.3 1 0.3> translate < 0.2 0 0> }
}
object { Cylinder_Y scale <0.3 1 0.3> translate <-0.5 0 0> }
translate <4.5 0 0>
}
intersection {
plane { <-1 1 0> 0 }
plane { <-1 -1 0> 0 }
}
}
#declare Moulure1 = object {
Moulure
translate <-2.5 0 0>
}
#declare Moulure2 = object {
Moulure
rotate <0 0 180>
translate <2.5 0 0>
}
#declare Moulure3 = object {
Moulure
rotate <0 0 90>
scale <0.5 1 1>
}
#declare Moulure4 = object {
Moulure3
rotate <0 0 180>
}
#declare Porte = object {
bound {
difference {
box { <-3.5 0 0> <3.5 12 2> }
union {
union {
Moulure1
Moulure2
}
union {
Moulure3
Moulure4
}
translate <0 6 0>
}
}
}
by box { <-3.5 0 0> <3.5 12 2> }
texture {
Tom_Wood
scale <0.75 0.75 0.75>
rotate <90 0 0>
ambient 0.225
diffuse 0.45
// reflection 0.3
phong 0.15
phong_size 200
}
translate Pos_Porte
translate <0 1 Recule>
rotate <0 -30 0>
}
#declare Poignée = object {
Ellipsoid
scale <0.35 0.45 0.35>
translate <3.1 6 -0.3>
texture {
Metal
color Gold
ambient 0.18
diffuse 0.35
phong 0.25
phong_size 100
bump { bumps 0.1 scale <0.013 0.013 0.013> }
}
translate Pos_Porte
translate <0 1 Recule>
rotate <0 -30 0>
}
#declare Cadre = object {
difference {
box { <-4 0 0> <4 12.55 2> }
box { <-3.6 -0.5 -0.5> <3.6 12.15 2.5> }
}
texture {
Tom_Wood
scale <1.2 1.2 1.2>
rotate <90 0 0>
ambient 0.225
diffuse 0.450
phong 0.15
phong_size 200
}
translate <0 -0.05 0>
translate Pos_Porte
translate <0 1 Recule>
rotate <0 -30 0>
}
#declare Tableau = object {
bound {
object {
difference {
box { <-5 -3.75 -0.4> <5 3.75 0> }
box { <-4.7 -3.45 -0.5> <4.7 3.45 -0.1> }
}
texture {
Tom_Wood
scale <0.75 0.75 0.75>
rotate <90 0 0>
ambient 0.225
diffuse 0.450
phong 0.15
phong_size 90
}
}
object {
box { <-4.7 -3.45 -0.3> <4.7 3.45 -0.2> }
texture {
Tom_Wood
scale <0.75 0.75 0.75>
rotate <90 0 0>
ambient 0.225
diffuse 0.450
phong 0.15
phong_size 90
}
}
}
by box { <-5 -3.75 -0.4> <5 3.75 0> }
scale <0.75 0.75 1>
translate <-15 5 24.75>
translate <0 0.8 Recule>
rotate <0 -30 0>
}
#declare Tapi = object {
intersection {
Cylinder_Y
slab { <0 1 0> 0 0.01 }
scale <0.7 1 0.7>
}
texture {
color red 0.9 green 0.95 blue 0.9
ambient 0.03
diffuse 0.0175
// reflection 0.10
refraction 0.95
ior 1.33
phong 0.15
phong_size 150
bump {
bumps 2
scale <0.1 0.1 0.1>
}
}
}
object { Pied translate <0 1 0> }
//object { Cuvette }
//object { Sommet }
//object { Robinets }
//object { Jets }
//object { JetSommet }
//object { Tapi translate <0 12.1 0> }
//object { Sol translate <0 5 0> }
//object { Mur }
//object { Porte }
//object { Poignée }
//object { Cadre }
//object { Tableau }
end.