home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 January / pcw-0195.iso / polyray / dat / animate / environ / environ.pi next >
Encoding:
Text File  |  1994-12-31  |  998 b   |  55 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. start_frame 0
  5. end_frame 59
  6.  
  7. // Set up the camera
  8. viewpoint {
  9.    from <0, 4, -8>
  10.    at <0,-1,0>
  11.    up <0,1,0>
  12.    angle 55
  13.    hither 1
  14.    resolution 128, 128
  15.    }
  16.  
  17. light <0.5, 0.5, 0.7>, <-10, 2, -20>
  18. light <0.7, 0.5, 0.5>, < 10, 2, -20>
  19.  
  20. background Midnight_Blue
  21.  
  22. define green_tinted_mirror
  23. texture {
  24.    surface {
  25.       ambient green, 0.1
  26.       diffuse green, 0.3
  27.       specular white, 0.3
  28.       microfacet Reitz 5
  29.       reflection white, 0.8
  30.       }
  31.    }
  32.  
  33. define block_environ
  34. environment("one.tga", "two.tga", "three.tga",
  35.             "four.tga", "five.tga", "six.tga")
  36.  
  37. object {
  38.    disc <0, -2, 0>, <0, 1, 0>, 50
  39.    green_tinted_mirror
  40.    }
  41.  
  42. object {
  43.    sphere <0, 1, 0>, 2
  44.    texture {
  45.       special surface {
  46.      color environment_map(P, block_environ)
  47.      ambient 0.1
  48.      diffuse 0.6
  49.      specular white, 0.7
  50.      microfacet Phong 10
  51.      }
  52.       }
  53.    rotate <0, frame * 6, 0>
  54.    }
  55.