home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 January / pcw-0195.iso / polyray / dat / texture / jade.pi < prev    next >
Text File  |  1994-12-31  |  1KB  |  66 lines
  1. viewpoint {
  2.    from <0,15,-25>
  3.    at <0,4,0>
  4.    up <0,1,0>
  5.    angle 30
  6.    resolution 320, 240
  7.    aspect 4/3
  8.    }
  9.  
  10. background white
  11. light 0.8*white, <-10, 10, -20>
  12. light 0.8*white, < 10, 10, -20>
  13.  
  14. define position_objectx     1
  15. define position_cylindrical 3
  16. define lookup_sawtooth 1
  17.  
  18. define jade
  19. texture {
  20.    noise surface {
  21.       ambient 0.3
  22.       diffuse 0.8
  23.       specular 0.4
  24.       microfacet Reitz 5
  25.       position_fn position_objectx
  26.       lookup_fn   lookup_sawtooth
  27.       octaves     3
  28.       turbulence  3
  29.       color_map(
  30.          [0.0, 0.8, <0.1, 0.6, 0.1>, <0.0, 0.3, 0.0>]
  31.          [0.8, 1.0, <0.1, 0.6, 0.1>, <0.0, 0.2, 0.0>])
  32.       }
  33.     rotate <80, 0, 0>
  34.     scale <3, 3, 3>
  35.    }
  36.  
  37. define light_wood
  38. texture {
  39.    noise surface {
  40.       ambient 0.2
  41.       diffuse 0.7
  42.       specular white, 0.5
  43.       microfacet Reitz 10
  44.       position_fn position_cylindrical
  45.       position_scale 1
  46.       lookup_fn lookup_sawtooth
  47.       octaves 3
  48.       turbulence 1
  49.       color_map(
  50.          [0.0, 0.8, <1, 0.72, 0.25>, <1, 0.72, 0.25>]
  51.          [0.8, 1.0, <0.5, 0.5, 0.07>, <0.4, 0.4, 0.035>])
  52.       }
  53.    // scale <2, 2, 2>
  54.    }
  55.  
  56. define vase
  57. object {
  58.    lathe 2, <0, 1, 0>, 12,
  59.       <0, 0>, <2, 0>,   <3.5, 1>,   <3.5, 2>,   <1, 7>,   <3.5, 8>,
  60.       <2, 8>, <0.5, 7>, <2.5, 2>, <2.5, 1>, <2, 0.5>, <0, 0.5>
  61.    }
  62.  
  63. // Make a jade vase
  64. vase { jade translate <-4.5, 0, 0> }
  65. vase { light_wood translate <4.5, 0, 0> }
  66.