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
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
|
// This work is licensed under the Creative Commons Attribution-ShareAlike 3.0 Unported License.
// To view a copy of this license, visit http://creativecommons.org/licenses/by-sa/3.0/ or send a
// letter to Creative Commons, 444 Castro Street, Suite 900, Mountain View, California, 94041, USA.
// Persistence Of Vision Ray Tracer Scene Description File
// Desc: Brick wall & Stucco
// Date: 2000/03/14
// Updated: 2001/07/26
// Auth: Ingo Janssen
// Updated: 2013/02/15 for 3.7
//
// -w320 -h240
// -w800 -h600 +a0.3
//
#version 3.7;
global_settings { assumed_gamma 1.0
noise_generator 1 } // change to 2 or 3.
light_source {
< 500, 500,-500>
rgb 1
}
camera {
location <0.2, 0.0,-25.0>
look_at <0.0, 0.0, 0.0>
right x*image_width/image_height // keep propotions with any aspect ratio
angle 65
}
//====== Doing the Stucco ======
#declare L2=0.55; //clock; //Set amount of decay of stucco, higher value is more decay. animate
#declare PWrink= pigment { //Mortar
wrinkles
scale 0.25
colour_map {
[0, rgb 0.5]
[L2, rgb 0.96]
}
}
#declare Stucco= pigment { //Stucco
granite
scale 0.05
colour_map {
[0, rgb 0.96]
[1, rgb 1]
}
}
#declare StuMor= pigment { //Stucco & Mortar
pigment_pattern{
wrinkles
scale 0.25
}
pigment_map {
[L2, PWrink]
[L2, Stucco]
}
}
#declare HF_Stucco=height_field { //Turn it into a hightfield
function 500, 500{ //500,500 for test higher is better, but watch the memory
pigment{StuMor }
}
translate -0.5
rotate -90*x
scale <20,20,2>
pigment { //Use the mortar to colour up the stucco
pigment_pattern {
wrinkles
scale 0.25
}
color_map {
[L2, rgb 0.5]
[L2, rgb <1,1,0.95>]
}
warp {planar z, 0}
translate <-0.5, -0.5, 0>
rotate <180,0,0>
scale <20,20,2>
}
}
//====== Lay some Bricks ======
//Size : dimension of the brick in a vector x, y, z
//Mortar : width of the joint.
//Turbulence etc : control the stone deformation.
#macro BrickWall(Size, Mortar, Turbulence, Octaves, Lambda, Omega)
#local Brick= pigment {
boxed // one single brick ...
scale <Size.x/2,Size.y/2,Size.z/2>
translate <Size.x/2+Mortar,Size.y/2+Mortar,0>
warp {repeat x*(Size.x+Mortar)} // ... repeated over and over again.
warp {repeat y*(2*(Size.y+Mortar))}
}
#declare FBrickWall= function {
pigment {
pigment_pattern {
gradient y
warp {repeat y}
scale <1,2*(Size.y+Mortar),1>
}
pigment_map {
[0.5, Brick
warp { // deforming the bricks ...
turbulence Turbulence
octaves Octaves
lambda Lambda
omega Omega
}
translate <0,-(Mortar/2),0>
]
[0.5, Brick // ... row by row.
warp {
turbulence Turbulence
octaves Octaves
lambda Lambda
omega Omega
}
translate <(Size.x/2)+Mortar,(Size.y+(Mortar/2)),0>
]
}
}
}
#end
#declare Wall=pigment {
BrickWall(<4,1,1>,0.2,<0.05,0.1,0>,6,0.5,0.5)
function{FBrickWall(x,y,z).gray}
pigment_map { // give some stucture to the joint ...
[0, granite
scale 0.1
colour_map {
[0, rgb 0][1, rgb 0.3]
}
]
[0.05, crackle // ... and the bricks.
scale <3,1,1>
turbulence 0.5
colour_map {
[0, rgb 0.34][1, rgb 0.5]
}
]
}
scale 0.04
}
#declare HF_Wall=height_field { // Build the wall
function 500, 500 { //500,500, for test, higher is better & slower. Watch the memory use.
pigment{Wall}
}
smooth
translate -0.5
rotate <-90,0,0>
scale <33,33,1>
pigment {
Wall
pigment_map {
[0, rgb 0.6]
[0.05, wrinkles
turbulence 0.3
scale <2,0.3,1>
colour_map {
[0.0, rgb <0.5,0.3,0.25>]
[0.15, rgb <0.5,0.3,0.25>/1.3]
[0.3, rgb <0.5,0.3,0.25>]
[0.6, rgb <0.6,0.3,0.25>/1.6]
[0.8, rgb <0.5,0.3,0.25>]
[1.0, rgb <0.5,0.3,0.35>/2]
}
]
}
translate <-0.5, -0.5, 0>
rotate -90*x
warp {planar y, 0}
scale <33,33,1>
}
}
object {HF_Stucco}
object {HF_Wall translate <0,0,-0.8>}
|
