home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / sweep / lathe3.pi < prev    next >
Encoding:
Text File  |  1992-11-07  |  832 b   |  45 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3. //
  4.  
  5. // Set up the camera
  6. viewpoint {
  7.    from <0,5,-15>
  8.    at <0,0,0>
  9.    up <0,1,0>
  10.    angle 45
  11.    resolution 128, 128
  12.    }
  13.  
  14. background midnight_blue
  15. light <-10, 20, -10>
  16. light < 10, 20, -10>
  17.  
  18. define bozo1
  19. texture {
  20.    noise surface {
  21.       color white
  22.       octaves 2
  23.       position_fn 1
  24.       lookup_fn 1
  25.       turbulence 2
  26.       ambient 0.3
  27.       diffuse 0.8
  28.       specular 0.6
  29.       microfacet Reitz 10
  30.       color_map(
  31.      [0,   0.1, red,     orange]
  32.      [0.1, 0.3, orange,  blue]
  33.      [0.3, 0.5, blue,    skyblue]
  34.      [0.5, 0.7, skyblue, orange]
  35.      [0.7, 0.9, orange,  magenta]
  36.      [0.9, 1.0, magenta, red])
  37.       }
  38.    }
  39.  
  40. object {
  41.    lathe 2, <0, 1, 0>, 5,
  42.          <3, -5>, <0.5, -3>, <4, -2>, <3, 2>, <0, 4>
  43.    bozo1
  44.    }
  45.