home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilsp / rayshade / Ray / glass < prev    next >
Encoding:
Text File  |  1992-03-29  |  1.0 KB  |  39 lines
  1. /*
  2.  * Bump-mapped transparent drinking glass on checkerboard
  3.  * C Kolb 12/90
  4.  */
  5.  
  6. name glass
  7. union
  8.         torus 0.95 0.06 0 0 2 0 0 1
  9.         difference
  10.                 list /* outer glass */
  11.                         cone 0.9 0 0 -0.001 1.0 0 0 2
  12.                         disc 1 0 0 2 0 0 1
  13.                         disc 0.9 0 0 -.001 0 0 -1
  14.                 end
  15.                 list /* inner glass */
  16.                         cone 0.7 0 0 0.1   0.9 0 0 2.2
  17.                         disc .9 0 0 2.2 0 0 1
  18.                         disc .7 0 0 0.1 0 0 -1
  19.                 end
  20.         end
  21. end
  22.  
  23.  
  24. surface glass
  25.         diffuse .08 .08 .08 specular .2 .2 .2
  26.         reflect 1. transp 1 body .8 .8 .8 index 1.3
  27. surface white ambient 1 1 1
  28. surface red diffuse .8 0 0  ambient .1 0 0 specular .6 .6 .6
  29.  
  30. object glass glass /*texture bump 0.2 scale .2 .2 .2*/
  31.  
  32. plane ambient .1 .1 .1 diffuse .7 .7 .7 0 0 0  0 0 1
  33.                 texture checker red scale .8 .8 .8 translate 0 0 -.2
  34.  
  35. background .1 .3 .8
  36. eyep 0 -10 7
  37. fov 30
  38. light 1. directional 1. -1. 1.
  39.