home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 January / pcw-0195.iso / polyray / dat / animate / environ / ilight.pi < prev    next >
Encoding:
Text File  |  1994-12-31  |  1.2 KB  |  47 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. start_frame 0
  5. end_frame 119
  6.  
  7. // Set up the camera
  8. viewpoint {
  9.    from <-9, 2.5, -9>
  10.    at <0,2.5,0>
  11.    up <0,1,0>
  12.    angle 90
  13.    hither 0.1
  14.    resolution 200, 200
  15.    }
  16.  
  17. background Midnight_Blue
  18.  
  19. include "..\..\colors.inc"
  20.  
  21. light <0.3, 0.3, 0.3>, <0, 4.9, 0>
  22. define block_environ
  23. environment("one.tga", "two.tga", "three.tga",
  24.             "four.tga", "five.tga", "six.tga")
  25. textured_light {
  26.    color environment_map(P, block_environ)
  27.    rotate <frame*6, frame*3, 0>
  28.    translate <0, 2, 0>
  29.    }
  30.  
  31. object {
  32.    sphere <0, 2, 0>, 1
  33.    // Force the shading flags all the way on, except for the one that
  34.    // allows the object to cast a shadow.  We want the light from the
  35.    // textured light to shine through
  36.    shading_flags 16 + 8 + 4 + 2 + 1
  37.    }
  38.  
  39. // This is the room we are in
  40. object { box <-10, 0, -10>, <10, 5, 10> matte_brown }
  41.  
  42. // These are boxes in the room
  43. object { box <-6, 0, -6>, <-4, 1, -4> shiny_green rotate <0, 45, 0> }
  44. object { box <-6, 0,  4>, <-4, 1,  6> shiny_green rotate <0, 45, 0> }
  45. object { box < 4, 0, -6>, < 6, 1, -4> shiny_green rotate <0, 45, 0> }
  46. object { box < 4, 0,  4>, < 6, 1,  6> shiny_green rotate <0, 45, 0> }
  47.