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