home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / scripts / pov / gobo1 / gobo.inc < prev    next >
Encoding:
Text File  |  1993-11-19  |  1.9 KB  |  59 lines
  1. // Gobo Include File ( GAM reference ) 
  2. // POV 2.0 version
  3. // by Roderick van Gelder ( CompuServe 100237,3073 )
  4. // Please let me know if you have any suggestions
  5.  
  6. #include "colors.inc"
  7. #include "textures.inc"
  8.  
  9. //*************  Gobo Projectors  ***********
  10.  
  11. #declare Gobo_Light1=
  12.  union {
  13.  cylinder {<0.0, -2.0, 0.0>, <0.0, 1.5, 0.0>, 0.9 open}
  14.  sphere {<  0,  1.5,  0 >, 1 }
  15.  light_source{< 0 ,  -0.0 ,  0  > color White }         // Change Y position to change light beam angle
  16. // Gobo Holder
  17.                box{ <-1, -1, -1>, <1, 1, 1>
  18.                scale < 1.0,0.001,1.0>
  19.                pigment {   image_map  { 
  20.                               gif "gam201.gif"  once   // Change image here
  21.                               map_type 0
  22.                               filter 1, 1
  23.                        }
  24.                               rotate < 90, 0, 0 >
  25.                               translate < -0.5, 0, -0.5 >
  26.                               scale < 1.8, 1.8, 1.8 >
  27.                   }
  28.                translate < 0.0, -2.0, 0.0>
  29.                }
  30.     pigment { Black }
  31.     finish  { Dull }
  32.  }
  33.  
  34.  
  35. #declare Gobo_Light2=
  36.  union {
  37.  cylinder {<0.0, -2.0, 0.0>, <0.0, 1.5, 0.0>, 0.9 open}
  38.  sphere {<  0,  1.5,  0 >, 1 }
  39.  light_source{< 0 ,  -0.0 ,  0  > color White }         // Change Y position to change light beam angle
  40. // Gobo Holder
  41.                box{ <-1, -1, -1>, <1, 1, 1>
  42.                scale < 1.0,0.001,1.0>
  43.                pigment {   image_map  { 
  44.                               gif "gam575.gif"  once   
  45.                               map_type 0
  46.                               filter 1, 1
  47.                        }
  48.                               rotate < 90, 0, 0 >
  49.                               translate < -0.5, 0, -0.5 >
  50.                               scale < 1.8, 1.8, 1.8 >
  51.                   }
  52.                translate < 0.0, -2.0, 0.0>
  53.                }
  54.     pigment { Black }
  55.     finish  { Dull }
  56.  }
  57.  
  58.  
  59.