1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
// Persistence Of Vision raytracer version 3.5 sample file.
// File by Douglas Muir
// Note: Original used 640 x 480 height field.
// This version is scaled down for distribution.
// Requires "fract003.png" plasma png for the height field.
//
// -w320 -h240
// -w800 -h600 +a0.3
global_settings {
assumed_gamma 2.2
max_trace_level 5
}
#include "shapes.inc"
#include "colors.inc"
#include "textures.inc"
camera {
location <0.0, 80.0, -300.0>
direction <0.0, 0.0, 1.0>
up <0.0, 1.0, 0.0>
right <4/3, 0.0, 0.0>
look_at <0.0, 30.0, 200.0>
}
height_field {
png "fract003.png"
water_level 0.4
pigment {
image_map { png "fract003.png" }
quick_color White
rotate 90*x
scale <320.0, 1.0, 200.0>
translate <0.0, 0.0, -1.0>
}
scale <320, 256, 200>
scale <2.0, 0.5, 2.0>
translate <-160.0, -63.5, -100.0>
rotate 10*y
translate <-80.0, 0.0, -30.0>
}
// Define the ocean surface
plane { y, -10.0
hollow on
pigment { Aquamarine }
normal {
waves 0.06
frequency 5000.0
scale 1000.0
}
finish {
ambient 0.1
diffuse 0.1
reflection 0.8
}
}
// Put a floor underneath to catch any errant waves from the ripples
plane { y, -11.0
pigment { colour red 1.0 green 0.6 }
finish {
crand 0.05
ambient 0.8
diffuse 0.0
}
}
// Now draw the sky
sphere { <0.0, 0.0, 0.0>, 3500.0
hollow on
pigment {
onion
colour_map {
[0.0 0.6 colour red 1.0 green 0.6 blue 0.0
colour red 0.3 green 0.6 blue 0.6]
[0.6 1.0 colour red 0.3 green 0.6 blue 0.6
colour red 0.1 green 0.4 blue 0.6]
}
quick_colour red 0.7 green 0.7 blue 1.0
scale <6000.0, 1700.0, 4000.0>
translate <-1200.0, 220.0, 2500.0>
}
finish {
ambient 0.8
diffuse 0.0 /* we don't want clouds casting shadows on the sky */
}
}
// Put in a few clouds
plane { y, 300.0
hollow on
pigment {
bozo
turbulence 0.5
colour_map {
[0.0 0.6 colour red 1.0 green 1.0 blue 1.0 filter 1.0
colour red 1.0 green 1.0 blue 1.0 filter 1.0]
[0.6 0.8 colour red 1.0 green 1.0 blue 1.0 filter 1.0
colour red 1.0 green 0.8 blue 0.1]
[0.8 1.001 colour red 1.0 green 0.8 blue 0.1
colour red 0.8 green 0.4 blue 0.2]
}
quick_colour red 0.7 green 0.7 blue 1.0
scale <1000.0, 200.0, 800.0>
}
finish {
ambient 0.7
diffuse 0.0
}
translate -450*x
rotate 6*y
}
// Now to cast some light on the subject
light_source { <-150.0, 250.0, -400.0> colour MediumGoldenrod }
// Now to cast some more light on the subject
light_source {
<0, 0, 0> colour red 1.0 green 0.7
looks_like {
sphere { <0.0, 0.0, 0.0>, 190.0
pigment { colour red 1.0 green 0.6 filter 0.35 }
finish { ambient 1.0 diffuse 0.0 }
}
}
translate <-1300.0, 380.0, 2500.0>
}
|
