annotate CADDSuite-1.0.1/data/OpenBabel/babel_povray3.inc @ 9:2cff9609f2c7

Uploaded
author marcel
date Tue, 15 Nov 2011 10:40:26 -0500
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1 //Include for Babel
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
2 //Copyright (c) by Steffen Reith and Oliver Weichold 1996-2002
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
3 // This program is free software; you can redistribute it and/or modify
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
4 // it under the terms of the GNU General Public License as published by
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
5 // the Free Software Foundation version 2 of the License.
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
6 //EMail: streit@streit.cc
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
7 //For chemical questions send mail to
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
8 //weichold@sas.upenn.edu
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
9
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
10 //$Id: babel_povray3.inc 3895 2010-07-22 10:36:05Z baoilleach $
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
11
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
12 #include "colors.inc"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
13 #include "metals.inc"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
14
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
15 //Do a ball and sticks model as default (nothing defined)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
16 #ifndef (BAS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
17 #ifndef (SPF)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
18 #ifndef (CST)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
19 #declare BAS = true;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
20 #declare SPF = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
21 #declare CST = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
22 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
23 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
24 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
25
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
26 //Default: No Ball and Sticks-model (if undefined)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
27 #ifndef (BAS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
28 #declare BAS = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
29 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
30
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
31 //Default: No Spacefill-model (if undefined)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
32 #ifndef (SPF)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
33 #declare SPF = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
34 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
35
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
36 //Default: No capped sticks-model (if undefined)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
37 #ifndef (CST)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
38 #declare CST = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
39 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
40
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
41 //Is a model (BAS, SPF or CST) selected ?
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
42 #if (!((BAS | SPF) | CST))
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
43
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
44 //Terminate parsing
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
45 #error "You have to select BAS (default), SPF or CST"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
46
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
47 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
48
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
49 //Select only one model
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
50 #if ((BAS & SPF) | ((BAS & CST) | (SPF & CST)))
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
51
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
52 //Terminate parsing
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
53 #error "You have to select only one model-type"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
54
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
55 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
56
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
57 //Display copyright
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
58 #render "\n\n"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
59 #render "\nbabel31.inc (C) 1996-2002 by\n"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
60 #render "Oliver Weichold (weichold@sas.upenn.edu)\n"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
61 #render "and Steffen Reith (streit@streit.cc)\n"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
62 #render "\n\n"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
63
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
64 //TRANS mode off by default (only needed for transparent textures)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
65 #ifndef (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
66 #declare TRANS = false;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
67 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
68
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
69 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
70 #include "glass.inc"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
71 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
72
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
73 //Finishs for atoms (Nonmetals, Transmetals, Halfmetals and Metals)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
74 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
75
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
76 #declare TransFinish = finish {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
77 ambient 0.1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
78 diffuse 0.1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
79 specular 0.8
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
80 reflection 0.1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
81 roughness 0.0003
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
82 phong 1 phong_size 400
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
83 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
84
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
85 //Transparent finishs
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
86 #declare MetalFinish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
87 #declare HalfMetalFinish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
88 #declare NonMetalFinish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
89 #declare TransMetalFinish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
90 #declare Bond_0_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
91 #declare Bond_1_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
92 #declare Bond_2_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
93 #declare Bond_3_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
94 #declare Bond_4_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
95 #declare Bond_5_Finish = finish {TransFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
96
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
97 //Filter values for transparent finishs
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
98 #declare MetalFilter = 1.00;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
99 #declare HalfMetalFilter = 0.95;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
100 #declare NonMetalFilter = 1.00;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
101 #declare TransMetalFilter = 0.95;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
102 #declare Bond_0_Filter = 0.00;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
103 #declare Bond_1_Filter = 0.90;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
104 #declare Bond_2_Filter = 0.90;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
105 #declare Bond_3_Filter = 0.90;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
106 #declare Bond_4_Filter = 0.90;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
107 #declare Bond_5_Filter = 0.90;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
108
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
109 #else
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
110
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
111 //Solid finishs
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
112 #declare MetalFinish = finish {F_MetalA}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
113 #declare HalfMetalFinish = finish {F_MetalD}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
114 #declare NonMetalFinish = finish {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
115
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
116 ambient 0.2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
117 diffuse 0.8
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
118 brilliance 1.0
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
119 phong 1.0
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
120 phong_size 80
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
121 reflection 0.25
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
122
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
123 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
124 #declare TransMetalFinish = finish {F_MetalD}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
125 #declare Bond_0_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
126 #declare Bond_1_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
127 #declare Bond_2_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
128 #declare Bond_3_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
129 #declare Bond_4_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
130 #declare Bond_5_Finish = finish {F_MetalC}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
131
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
132 //No additional filter (texture is not transparent)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
133 #declare MetalFilter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
134 #declare HalfMetalFilter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
135 #declare NonMetalFilter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
136 #declare TransMetalFilter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
137 #declare Bond_0_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
138 #declare Bond_1_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
139 #declare Bond_2_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
140 #declare Bond_3_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
141 #declare Bond_4_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
142 #declare Bond_5_Filter = 0.0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
143
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
144 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
145
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
146 //Thickness of Bonds (see Makro Bond_order)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
147 #if (CST)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
148
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
149 // For capped-stick models you must use _one_ Bond_Thick !
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
150 #declare Bond_Thick_0 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
151 #declare Bond_Thick_1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
152 #declare Bond_Thick_2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
153 #declare Bond_Thick_3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
154 #declare Bond_Thick_4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
155 #declare Bond_Thick_5 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
156
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
157 #else
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
158
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
159 #declare Bond_Thick_0 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
160 #declare Bond_Thick_1 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
161 #declare Bond_Thick_2 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
162 #declare Bond_Thick_3 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
163 #declare Bond_Thick_4 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
164 #declare Bond_Thick_5 = 0.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
165
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
166 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
167
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
168 //Colors for Bonds (see Makro Bond_order)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
169 #declare Bond_0_Color = rgbf <1.00,0.725,0.275,Bond_0_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
170 #declare Bond_1_Color = rgbf <1.00,0.725,0.275,Bond_1_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
171 #declare Bond_2_Color = rgbf <1.00,0.725,0.275,Bond_2_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
172 #declare Bond_3_Color = rgbf <1.00,0.725,0.275,Bond_3_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
173 #declare Bond_4_Color = rgbf <1.00,0.725,0.275,Bond_4_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
174 #declare Bond_5_Color = rgbf <1.00,0.725,0.275,Bond_5_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
175
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
176 #declare Bond_0_Color = rgbf <0.95,0.95,0.1,Bond_0_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
177 #declare Bond_1_Color = rgbf <0.95,0.95,0.1,Bond_1_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
178 #declare Bond_2_Color = rgbf <0.95,0.95,0.1,Bond_2_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
179 #declare Bond_3_Color = rgbf <0.95,0.95,0.1,Bond_3_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
180 #declare Bond_4_Color = rgbf <0.95,0.95,0.1,Bond_4_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
181 #declare Bond_5_Color = rgbf <0.95,0.95,0.1,Bond_5_Filter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
182
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
183 //The bond declarations
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
184 #declare bond_0 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
185 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
186 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
187 Bond_Thick_0
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
188 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
189
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
190 pigment {color Bond_0_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
191 finish {Bond_0_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
192
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
193 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
194 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
195 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
196 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
197 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
198 #declare bond_1 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
199 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
200 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
201 Bond_Thick_1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
202 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
203
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
204 pigment {color Bond_1_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
205 finish {Bond_1_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
206
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
207 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
208 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
209 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
210 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
211 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
212 #declare bond_2 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
213 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
214 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
215 Bond_Thick_2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
216 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
217
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
218 pigment {color Bond_2_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
219 finish {Bond_2_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
220
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
221 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
222 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
223 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
224 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
225 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
226 #declare bond_3 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
227 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
228 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
229 Bond_Thick_3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
230 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
231
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
232 pigment {color Bond_3_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
233 finish {Bond_3_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
234
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
235 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
236 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
237 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
238 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
239 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
240 #declare bond_4 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
241 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
242 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
243 Bond_Thick_4
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
244 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
245
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
246 pigment {color Bond_4_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
247 finish {Bond_4_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
248
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
249 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
250 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
251 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
252 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
253 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
254 #declare bond_5 = cylinder {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
255 <0,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
256 <1,0,0>
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
257 Bond_Thick_5
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
258 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
259
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
260 pigment {color Bond_5_Color}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
261 finish {Bond_5_Finish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
262
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
263 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
264 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
265 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
266 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
267 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
268
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
269 //Generic definition of an atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
270 #if (BAS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
271 #render "\n\nCalculate a ball and sticks model of :"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
272 #declare atom = sphere {<0,0,0>,0.6}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
273 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
274 #if (SPF)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
275 #render "\n\nCalculate a spacefill model of :"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
276 #declare atom = sphere {<0,0,0>,1.66}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
277 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
278 #if (CST)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
279 #render "\n\nCalculate a capped sticks model of :"
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
280 #declare atom = sphere {<0,0,0>,1.0}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
281 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
282
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
283 //For Povray 3.1 only
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
284 #version 3.1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
285
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
286 //For capped sticks models we use Bond_Thick_0 for all atom radii
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
287 #if (CST)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
288
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
289 #declare Radius_C1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
290 #declare Radius_C2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
291 #declare Radius_C3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
292 #declare Radius_H = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
293 #declare Radius_D = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
294 #declare Radius_O = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
295 #declare Radius_N = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
296 #declare Radius_S = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
297 #declare Radius_P = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
298 #declare Radius_F = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
299 #declare Radius_Cl = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
300 #declare Radius_Br = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
301 #declare Radius_I = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
302
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
303 #declare Radius_Si = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
304 #declare Radius_B = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
305 #declare Radius_Ge = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
306 #declare Radius_Se = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
307
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
308 #declare Radius_Ca = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
309 #declare Radius_Ca2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
310 #declare Radius_Sn = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
311 #declare Radius_Sn2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
312 #declare Radius_Sn4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
313 #declare Radius_Pb = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
314 #declare Radius_Pb2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
315 #declare Radius_Pb4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
316 #declare Radius_Te = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
317 #declare Radius_Te4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
318 #declare Radius_Te6 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
319 #declare Radius_Na = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
320 #declare Radius_Na1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
321 #declare Radius_K = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
322 #declare Radius_K1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
323 #declare Radius_Li = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
324 #declare Radius_Li1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
325 #declare Radius_Al = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
326 #declare Radius_Al3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
327
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
328 #declare Radius_Mn = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
329 #declare Radius_Mn2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
330 #declare Radius_Mn3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
331 #declare Radius_Mn4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
332 #declare Radius_W = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
333 #declare Radius_W4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
334 #declare Radius_W6 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
335 #declare Radius_Fe = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
336 #declare Radius_Fe2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
337 #declare Radius_Fe3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
338 #declare Radius_Pd = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
339 #declare Radius_Pd2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
340 #declare Radius_Pd4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
341 #declare Radius_Ni = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
342 #declare Radius_Ni2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
343 #declare Radius_Ni3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
344 #declare Radius_Cu = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
345 #declare Radius_Cu1 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
346 #declare Radius_Cu2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
347 #declare Radius_V = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
348 #declare Radius_V2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
349 #declare Radius_V3 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
350 #declare Radius_V4 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
351 #declare Radius_V5 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
352 #declare Radius_Zn = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
353 #declare Radius_Zn2 = Bond_Thick_0;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
354
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
355 #else
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
356
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
357 //Atom radii in A as published in J. Emsley, The Elements,
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
358 //Clarender Press, Oxford 1991
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
359
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
360 //All uncharged radii are kovalent. The values for Na and V are calculated
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
361 //from the atomic radius (10% less).
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
362 //We use the kovalent radii for the description of metal atoms. If you want to
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
363 //use ion radii, just replace the radius in the atom description.
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
364 //E.g., replace
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
365 //
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
366 //scale Radius_Zn
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
367 //
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
368 //by
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
369 //
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
370 //scale Radius_Zn2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
371 //
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
372 //for creating a sphere with the ion radius of Zn2+.
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
373
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
374 #declare Radius_C1 = 0.770;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
375 #declare Radius_C2 = 0.670;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
376 #declare Radius_C3 = 0.600;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
377
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
378 #declare Radius_H = 0.370;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
379 #declare Radius_D = 0.370;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
380 #declare Radius_O = 0.660;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
381 #declare Radius_N = 0.700;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
382 #declare Radius_S = 1.040;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
383 #declare Radius_P = 1.100;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
384 #declare Radius_F = 0.580;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
385 #declare Radius_Cl = 0.990;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
386 #declare Radius_Br = 1.142;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
387 #declare Radius_I = 1.330;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
388
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
389 #declare Radius_Si = 1.170;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
390 #declare Radius_B = 0.880;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
391 #declare Radius_Ge = 1.220;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
392 #declare Radius_Se = 1.170;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
393
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
394 #declare Radius_Ca = 1.740;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
395 #declare Radius_Ca2 = 1.060;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
396 #declare Radius_Sn = 1.400;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
397 #declare Radius_Sn2 = 0.930;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
398 #declare Radius_Sn4 = 0.740;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
399 #declare Radius_Pb = 1.540;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
400 #declare Radius_Pb2 = 1.320;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
401 #declare Radius_Pb4 = 0.890;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
402 #declare Radius_Te = 1.370;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
403 #declare Radius_Te4 = 0.970;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
404 #declare Radius_Te6 = 0.560;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
405 #declare Radius_Na = 1.380;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
406 #declare Radius_Na1 = 0.980;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
407 #declare Radius_K = 2.030;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
408 #declare Radius_K1 = 1.330;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
409 #declare Radius_Li = 1.230;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
410 #declare Radius_Li1 = 0.780;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
411 #declare Radius_Al = 1.250;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
412 #declare Radius_Al3 = 0.570;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
413
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
414 #declare Radius_Mn = 1.170;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
415 #declare Radius_Mn2 = 0.910;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
416 #declare Radius_Mn3 = 0.700;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
417 #declare Radius_Mn4 = 0.520;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
418 #declare Radius_W = 1.300;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
419 #declare Radius_W4 = 0.680;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
420 #declare Radius_W6 = 0.620;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
421 #declare Radius_Fe = 1.165;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
422 #declare Radius_Fe2 = 0.820;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
423 #declare Radius_Fe3 = 0.670;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
424 #declare Radius_Pd = 1.280;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
425 #declare Radius_Pd2 = 0.860;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
426 #declare Radius_Pd4 = 0.640;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
427 #declare Radius_Ni = 1.150;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
428 #declare Radius_Ni2 = 0.780;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
429 #declare Radius_Ni3 = 0.620;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
430 #declare Radius_Cu = 1.170;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
431 #declare Radius_Cu1 = 0.960;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
432 #declare Radius_Cu2 = 0.720;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
433 #declare Radius_V = 1.188;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
434 #declare Radius_V2 = 0.720;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
435 #declare Radius_V3 = 0.650;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
436 #declare Radius_V4 = 0.610;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
437 #declare Radius_V5 = 0.590;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
438 #declare Radius_Zn = 1.250;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
439 #declare Radius_Zn2 = 0.830;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
440
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
441 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
442
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
443 //Atom descriptions
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
444
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
445 //Section: Nonmetals
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
446 #declare Color_C1 = rgbf <0.00,0.00,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
447 #declare Atom_C1 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
448
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
449 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
450 scale Radius_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
451 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
452
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
453 pigment {color Color_C1}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
454 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
455
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
456 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
457 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
458 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
459 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
460
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
461 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
462 #declare Atom_C = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
463 #declare Atom_Cac = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
464 #declare Atom_Cbl = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
465 #declare Atom_Cmi = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
466 #declare Atom_Crad = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
467 #declare Atom_Cx = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
468 #declare Atom_Nr = Atom_C1
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
469
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
470 #declare Radius_Cac = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
471 #declare Radius_Cbl = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
472 #declare Radius_Cmi = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
473 #declare Radius_Crad = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
474 #declare Radius_Cx = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
475 #declare Radius_Nr = Radius_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
476
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
477 #declare Color_C = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
478 #declare Color_Cac = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
479 #declare Color_Cbl = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
480 #declare Color_Cmi = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
481 #declare Color_Crad = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
482 #declare Color_Cx = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
483 #declare Color_Nr = Color_C1;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
484
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
485 #declare Color_C2 = rgbf <0.00,0.00,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
486 #declare Atom_C2 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
487
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
488 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
489 scale Radius_C2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
490 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
491
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
492 pigment {color Color_C2}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
493 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
494
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
495 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
496 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
497 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
498 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
499 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
500
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
501 #declare Color_C3 = rgbf <0.00,0.00,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
502 #declare Atom_C3 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
503
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
504 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
505 scale Radius_C3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
506 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
507
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
508 pigment {color Color_C3}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
509 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
510
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
511 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
512 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
513 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
514 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
515 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
516 #declare Atom_Car = Atom_C3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
517 #declare Atom_Cpl = Atom_C3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
518 #declare Atom_Cx = Atom_C3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
519
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
520 #declare Radius_Car = Radius_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
521 #declare Radius_Cpl = Radius_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
522 #declare Radius_Cx = Radius_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
523
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
524 #declare Color_Car = Color_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
525 #declare Color_Cpl = Color_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
526 #declare Color_Cx = Color_C3;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
527
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
528 #declare Color_H = rgbf <1.00,1.00,1.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
529 #declare Atom_H = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
530
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
531 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
532 scale Radius_H
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
533 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
534
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
535 pigment {color Color_H}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
536 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
537
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
538 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
539 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
540 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
541 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
542 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
543 #declare Atom_HC = Atom_H
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
544 #declare Atom_HO = Atom_H
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
545 #declare Atom_HN = Atom_H
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
546 #declare Atom_Hpl = Atom_H
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
547
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
548 #declare Radius_HC = Radius_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
549 #declare Radius_HO = Radius_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
550 #declare Radius_HN = Radius_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
551 #declare Radius_Hpl = Radius_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
552
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
553 #declare Color_HC = Color_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
554 #declare Color_HO = Color_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
555 #declare Color_HN = Color_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
556 #declare Color_Hpl = Color_H;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
557
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
558 #declare Color_D = rgbf <0.85,0.85,0.95,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
559 #declare Atom_D = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
560
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
561 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
562 scale Radius_D
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
563 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
564
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
565 pigment {color Color_D}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
566 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
567
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
568 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
569 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
570 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
571 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
572 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
573 #declare Atom_DC = Atom_D
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
574
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
575 #declare Radius_DC = Radius_D;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
576
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
577 #declare Color_DC = Color_D;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
578
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
579 #declare Color_O = rgbf <1.00,0.00,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
580 #declare Atom_O = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
581
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
582 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
583 scale Radius_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
584 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
585
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
586 pigment {color Color_O}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
587 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
588
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
589 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
590 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
591 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
592 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
593 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
594 #declare Atom_O3 = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
595 #declare Atom_O2 = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
596 #declare Atom_Omi = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
597 #declare Atom_OCO2 = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
598 #declare Atom_Oany = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
599 #declare Atom_Oco2 = Atom_O
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
600
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
601 #declare Radius_O3 = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
602 #declare Radius_O2 = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
603 #declare Radius_Omi = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
604 #declare Radius_OCO2 = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
605 #declare Radius_Oany = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
606 #declare Radius_Oco2 = Radius_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
607
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
608 #declare Color_O3 = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
609 #declare Color_O2 = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
610 #declare Color_Omi = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
611 #declare Color_OCO2 = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
612 #declare Color_Oany = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
613 #declare Color_Oco2 = Color_O;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
614
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
615 #declare Color_N = rgbf <0.14,0.42,0.56,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
616 #declare Atom_N = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
617
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
618 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
619 scale Radius_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
620 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
621
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
622 pigment {color Color_N}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
623 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
624
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
625 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
626 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
627 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
628 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
629 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
630 #declare Atom_NPL3 = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
631 #declare Atom_N2 = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
632 #declare Atom_N4 = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
633 #declare Atom_N3 = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
634 #declare Atom_Npl = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
635 #declare Atom_N2pl = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
636 #declare Atom_Naz = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
637 #declare Atom_N1 = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
638 #declare Atom_Nox = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
639 #declare Atom_Ntr = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
640 #declare Atom_NC = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
641 #declare Atom_Nar = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
642 #declare Atom_Nam = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
643 #declare Atom_Ngpl = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
644 #declare Atom_N3pl = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
645 #declare Atom_Nany = Atom_N
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
646
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
647 #declare Radius_NPL3 = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
648 #declare Radius_N2 = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
649 #declare Radius_N4 = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
650 #declare Radius_N3 = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
651 #declare Radius_Npl = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
652 #declare Radius_N2pl = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
653 #declare Radius_Naz = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
654 #declare Radius_N1 = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
655 #declare Radius_Nox = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
656 #declare Radius_Ntr = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
657 #declare Radius_NC = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
658 #declare Radius_Nar = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
659 #declare Radius_Nam = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
660 #declare Radius_Ngpl = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
661 #declare Radius_N3pl = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
662 #declare Radius_Nany = Radius_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
663
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
664 #declare Color_NPL3 = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
665 #declare Color_N2 = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
666 #declare Color_N4 = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
667 #declare Color_N3 = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
668 #declare Color_Npl = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
669 #declare Color_N2pl = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
670 #declare Color_Naz = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
671 #declare Color_N1 = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
672 #declare Color_Nox = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
673 #declare Color_Ntr = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
674 #declare Color_NC = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
675 #declare Color_Nar = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
676 #declare Color_Nam = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
677 #declare Color_Ngpl = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
678 #declare Color_N3pl = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
679 #declare Color_Nany = Color_N;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
680
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
681 #declare Color_F = rgbf<1.00,1.00,0.88,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
682 #declare Atom_F = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
683
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
684 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
685 scale Radius_F
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
686 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
687
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
688 pigment {color Color_F}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
689 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
690
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
691 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
692 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
693 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
694 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
695 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
696
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
697 #declare Color_Cl = rgbf <0.20,0.80,0.20,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
698 #declare Atom_Cl = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
699
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
700 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
701 scale Radius_Cl
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
702 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
703
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
704 pigment {color Color_Cl}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
705 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
706
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
707 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
708 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
709 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
710 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
711 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
712
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
713 #declare Color_Br = rgbf <0.65,0.16,0.16,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
714 #declare Atom_Br = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
715
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
716 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
717 scale Radius_Br
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
718 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
719
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
720 pigment {color Color_Br}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
721 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
722
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
723 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
724 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
725 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
726 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
727 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
728
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
729 #declare Color_I = rgbf<0.58,0.44,0.86,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
730 #declare Atom_I = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
731
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
732 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
733 scale Radius_I
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
734 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
735
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
736 pigment {color Color_I}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
737 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
738
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
739 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
740 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
741 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
742 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
743 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
744
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
745 #declare Color_P = rgbf <1.00,0.50,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
746 #declare Atom_P = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
747
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
748 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
749 scale Radius_P
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
750 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
751
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
752 pigment {color Color_P}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
753 finish{NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
754
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
755 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
756 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
757 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
758 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
759 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
760 #declare Atom_Pac = Atom_P
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
761 #declare Atom_P3 = Atom_P
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
762 #declare Atom_Pox = Atom_P
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
763 #declare Atom_P3pl = Atom_P
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
764
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
765 #declare Radius_Pac = Radius_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
766 #declare Radius_P3 = Radius_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
767 #declare Radius_Pox = Radius_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
768 #declare Radius_P3pl = Radius_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
769
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
770 #declare Color_Pac = Color_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
771 #declare Color_P3 = Color_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
772 #declare Color_Pox = Color_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
773 #declare Color_P3pl = Color_P;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
774
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
775 #declare Color_S = rgbf <1.00,1.00,0.00,NonMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
776 #declare Atom_S = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
777
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
778 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
779 scale Radius_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
780 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
781
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
782 pigment {color Color_S}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
783 finish {NonMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
784
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
785 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
786 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
787 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
788 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
789 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
790 #declare Atom_S3pl = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
791 #declare Atom_S3 = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
792 #declare Atom_S2 = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
793 #declare Atom_Sac = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
794 #declare Atom_Sox = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
795 #declare Atom_Sany = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
796 #declare Atom_So = Atom_S
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
797
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
798 #declare Radius_S3pl = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
799 #declare Radius_S3 = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
800 #declare Radius_S2 = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
801 #declare Radius_Sac = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
802 #declare Radius_Sox = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
803 #declare Radius_Sany = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
804 #declare Radius_So = Radius_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
805
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
806 #declare Color_S3pl = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
807 #declare Color_S3 = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
808 #declare Color_S2 = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
809 #declare Color_Sac = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
810 #declare Color_Sox = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
811 #declare Color_Sany = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
812 #declare Color_So = Color_S;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
813
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
814 //A special color for halfmetals
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
815 #declare HalfMetalColor = rgbf <0.6,0.6,0.85,HalfMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
816
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
817 //Section: HalfMetals
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
818 #declare Color_B = rgbf <0,1.0,0,HalfMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
819 #declare Atom_B = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
820
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
821 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
822 scale Radius_B
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
823 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
824
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
825 pigment {color Color_B}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
826 finish {HalfMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
827
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
828 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
829 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
830 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
831 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
832 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
833 #declare Atom_Bac = Atom_B
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
834 #declare Atom_Box = Atom_B
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
835
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
836 #declare Radius_Bac = Radius_B;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
837 #declare Radius_Box = Radius_B;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
838
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
839 #declare Color_Bac = Color_B;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
840 #declare Color_Box = Color_B;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
841
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
842 #declare Color_Si = HalfMetalColor;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
843 #declare Atom_Si = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
844
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
845 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
846 scale Radius_Si
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
847 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
848
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
849 pigment {color Color_Si}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
850 finish {HalfMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
851
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
852 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
853 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
854 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
855 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
856 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
857
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
858
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
859 #declare Color_Ge = HalfMetalColor;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
860 #declare Atom_Ge = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
861
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
862 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
863 scale Radius_Ge
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
864 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
865
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
866 pigment {color Color_Ge}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
867 finish {HalfMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
868
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
869 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
870 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
871 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
872 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
873 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
874 #declare Color_Se = HalfMetalColor;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
875 #declare Atom_Se = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
876
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
877 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
878 scale Radius_Se
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
879 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
880
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
881 pigment {color Color_Se}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
882 finish {HalfMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
883
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
884 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
885 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
886 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
887 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
888 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
889
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
890 //Metals
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
891 #declare Color_Metal = rgbf <0.94,0.93,0.90,MetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
892
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
893 #declare Color_Te = rgbf <0.6,0.6,0.6,MetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
894 #declare Atom_Te = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
895
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
896 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
897 scale Radius_Te
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
898 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
899
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
900 pigment {color Color_Te}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
901 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
902
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
903 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
904 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
905 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
906 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
907 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
908
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
909 #declare Color_Li = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
910 #declare Atom_Li = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
911
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
912 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
913 scale Radius_Li
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
914 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
915
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
916 pigment {color Color_Li}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
917 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
918
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
919 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
920 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
921 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
922 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
923 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
924
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
925 #declare Color_Na = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
926 #declare Atom_Na = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
927
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
928 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
929 scale Radius_Na
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
930 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
931
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
932 pigment {color Color_Na}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
933 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
934
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
935 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
936 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
937 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
938 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
939 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
940
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
941 #declare Color_K = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
942 #declare Atom_K = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
943
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
944 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
945 scale Radius_K
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
946 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
947
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
948 pigment {color Color_K}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
949 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
950
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
951 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
952 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
953 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
954 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
955 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
956
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
957 #declare Color_Ca = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
958 #declare Atom_Ca = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
959
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
960 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
961 scale Radius_Ca
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
962 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
963
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
964 pigment {color Color_Ca}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
965 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
966
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
967 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
968 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
969 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
970 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
971 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
972
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
973 #declare Color_Al = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
974 #declare Atom_Al = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
975
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
976 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
977 scale Radius_Al
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
978 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
979
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
980 pigment {color Color_Al}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
981 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
982
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
983 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
984 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
985 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
986 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
987 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
988
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
989 #declare Color_Sn = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
990 #declare Atom_Sn = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
991
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
992 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
993 scale Radius_Sn
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
994 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
995
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
996 pigment {color Color_Sn}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
997 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
998
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
999 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1000 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1001 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1002 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1003 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1004
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1005 #declare Color_Pb = Color_Metal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1006 #declare Atom_Pb = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1007
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1008 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1009 scale Radius_Pb
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1010 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1011
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1012 pigment {color Color_Pb}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1013 finish {MetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1014
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1015 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1016 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1017 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1018 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1019 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1020
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1021 //TransMetals
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1022 #declare Color_TransMetal = rgbf <0.94,0.93,0.90,TransMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1023
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1024 #declare Color_W = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1025 #declare Atom_W = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1026
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1027 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1028 scale Radius_W
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1029 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1030
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1031 pigment {color Color_W}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1032 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1033
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1034 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1035 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1036 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1037 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1038 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1039
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1040 #declare Color_Pd = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1041 #declare Atom_Pd = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1042
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1043 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1044 scale Radius_Pd
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1045 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1046
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1047 pigment {color Color_Pd}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1048 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1049
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1050 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1051 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1052 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1053 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1054 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1055
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1056 #declare Color_Ni = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1057 #declare Atom_Ni = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1058
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1059 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1060 scale Radius_Ni
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1061 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1062
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1063 pigment {color Color_Ni}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1064 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1065
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1066 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1067 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1068 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1069 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1070 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1071
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1072 #declare Color_Cu = rgbf <0.50,0.25,0.15,TransMetalFilter>;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1073 #declare Atom_Cu = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1074
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1075 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1076 scale Radius_Cu
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1077
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1078 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1079
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1080 pigment {color Color_Cu}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1081 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1082
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1083 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1084 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1085 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1086 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1087 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1088
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1089 #declare Color_Mn = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1090 #declare Atom_Mn = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1091
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1092 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1093 scale Radius_Mn
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1094 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1095
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1096 pigment {color Color_Mn}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1097 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1098
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1099 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1100 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1101 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1102 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1103 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1104
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1105 #declare Color_Fe = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1106 #declare Atom_Fe = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1107
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1108 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1109 scale Radius_Fe
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1110
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1111 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1112
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1113 pigment {color Color_Fe}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1114 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1115
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1116 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1117 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1118 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1119 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1120 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1121
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1122
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1123 #declare Color_V = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1124 #declare Atom_V = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1125
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1126 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1127 scale Radius_V
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1128 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1129
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1130 pigment {color Color_V}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1131 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1132
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1133 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1134 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1135 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1136 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1137 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1138
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1139 #declare Atom_V2 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1140
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1141 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1142 scale Radius_V2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1143 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1144
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1145 pigment {color Color_V}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1146 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1147
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1148 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1149 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1150 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1151 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1152 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1153
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1154 #declare Atom_V3 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1155
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1156 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1157 scale Radius_V3
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1158 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1159
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1160 pigment {color Color_V}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1161 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1162
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1163 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1164 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1165 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1166 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1167 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1168
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1169 #declare Atom_V4 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1170
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1171 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1172 scale Radius_V4
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1173 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1174
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1175 pigment {color Color_V}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1176 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1177
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1178 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1179 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1180 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1181 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1182 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1183
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1184 #declare Atom_V5 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1185
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1186 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1187 scale Radius_V5
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1188 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1189
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1190 pigment {color Color_V}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1191 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1192
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1193 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1194 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1195 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1196 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1197 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1198
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1199
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1200 #declare Color_Zn = Color_TransMetal;
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1201 #declare Atom_Zn = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1202
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1203 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1204 scale Radius_Zn
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1205 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1206
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1207 pigment {color Color_Zn}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1208 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1209
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1210 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1211 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1212 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1213 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1214 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1215
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1216 #declare Atom_Zn2 = object {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1217
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1218 atom
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1219 scale Radius_Zn2
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1220 texture {
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1221
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1222 pigment {color Color_Zn}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1223 finish {TransMetalFinish}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1224
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1225 }
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1226 #if (TRANS)
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1227 interior{ I_Glass}
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1228 #end
2cff9609f2c7 Uploaded
marcel
parents:
diff changeset
1229 }