home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / IMAGE13.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  6.7 KB  |  293 lines
  1. // Persistence of Vision Raytracer
  2. // Sample file
  3. // By  Drew Wells
  4.  
  5. // Two rows of multi-colored pillars lead to a chrome hemisphere 
  6. // reflecting a blinding sunrise.
  7. // - Drew Wells 1990 CIS 73767,1244 
  8.  
  9. #include "shapes.dat"
  10. #include "colors.dat"
  11. #include "textures.dat"
  12.  
  13. { Camera }
  14. view_point
  15.    location <0.0  20.0 -100.0>
  16.    direction <0.0 0.0  1.0>
  17.    up  <0.0  1.0  0.0>
  18.    right <1.333333333 0.0 0.0>
  19. end_view_point
  20.  
  21.  
  22. { Ground }
  23. object
  24.    plane < 0.0 1.0 0.0 > -10. end_plane
  25.    texture
  26.      White_Marble
  27.      scale <10.0 10.0 10.0>
  28.      ambient 0.3
  29.      diffuse 0.7
  30.    end_texture
  31.    color White
  32. end_object
  33.  
  34. { Sky/Ceiling }
  35. object
  36.   quadric QSphere
  37.     translate < 0.0 0.0 0.0 >
  38.     scale     < 200.0 100.0 200.0 >
  39.     inverse
  40.   end_quadric
  41.   texture
  42.     0.05
  43.     bozo
  44.     turbulence 0.3
  45.     colour_map { Sky Colors }
  46.         [0.0 0.5   colour red 0.25 green 0.25 blue 0.5
  47.                    colour red 0.25 green 0.25 blue 0.5]
  48.     [0.5 0.6   colour red 0.25 green 0.25 blue 0.5
  49.                    colour red 0.7 green 0.7 blue 0.7]
  50.         [0.6 1.001 colour red 0.7 green 0.7 blue 0.7
  51.            colour red 0.3 green 0.3 blue 0.3]
  52.     end_colour_map
  53.     scale <50.0 50.0 50.0>
  54.     translate <200.0 400.0 100.0>
  55.     ambient 0.6
  56.     diffuse 0.7
  57.   end_texture
  58.   color White
  59. end_object
  60.  
  61. { Mirrored sphere to reflect sun }
  62. { Diffuse value controls aura effect }
  63. object
  64.    sphere < 0.0 0.0 110.0 > 40.0 end_sphere
  65.    texture {mirror}
  66.       color White
  67.       ambient 0.0
  68.       diffuse 0.3
  69.       reflection 1.0
  70.       brilliance 3.0
  71.       specular 1.0
  72.       roughness 0.01
  73.    end_texture
  74.    color White
  75. end_object
  76.  
  77. { Two rows of pillars - Grouped two per object for easy manipulation }
  78. object
  79.    union
  80.       quadric
  81.          Cylinder_Y
  82.      scale <6.0 1.0 3.0>
  83.      translate <-60.0 0.0 0.0>
  84.       end_quadric
  85.       quadric
  86.          Cylinder_Y
  87.      scale <6.0 1.0 3.0>
  88.      translate <60.0 0.0 0.0>
  89.       end_quadric
  90.       quadric
  91.          Cylinder_Y
  92.      scale <6.0 1.0 3.0>
  93.      translate <-60.0 0.0 180.0>
  94.       end_quadric
  95.       quadric
  96.          Cylinder_Y
  97.      scale <6.0 1.0 3.0>
  98.      translate <60.0 0.0 180.0>
  99.       end_quadric
  100.       quadric
  101.          Cylinder_Y
  102.      scale <6.0 1.0 3.0>
  103.      translate <-60.0 0.0 60.0>
  104.       end_quadric
  105.       quadric
  106.          Cylinder_Y
  107.      scale <6.0 1.0 3.0>
  108.      translate <60.0 0.0 60.0>
  109.       end_quadric
  110.    end_union
  111.    texture
  112.      Blue_Agate
  113.      scale <10.0 10.0 10.0>
  114.      ambient 0.2
  115.      diffuse 0.7
  116.      brilliance 3.0
  117.      specular 1.0
  118.      roughness 0.01
  119.    end_texture
  120.    color CBlue
  121. end_object
  122.  
  123. object
  124.    union
  125.       quadric
  126.          Cylinder_Y
  127.      scale <6.0 1.0 3.0>
  128.      translate <-60.0 0.0 30.0>
  129.       end_quadric
  130.       quadric
  131.          Cylinder_Y
  132.      scale <6.0 1.0 3.0>
  133.      translate <60.0 0.0 30.0>
  134.       end_quadric
  135.    end_union
  136.    texture
  137.       gradient < 1.0 1.0 0.0 >
  138.       colour_map
  139.          [0.00 0.25  colour red 0.0 green 0.0 blue 1.0
  140.                      colour red 0.7 green 0.3 blue 0.0]
  141.          [0.25 0.75  colour red 1.0 green 0.0 blue 1.0
  142.                      colour red 0.8 green 0.4 blue 1.0]
  143.          [0.75 1.001 colour red 0.0 green 0.3 blue 0.8
  144.                      colour red 0.7 green 0.3 blue 0.0]
  145.       end_colour_map
  146.       scale <30.0 30.0 30.0>
  147.       translate <30.0 -30.0 0.0>
  148.       ambient 0.2
  149.       diffuse 0.7
  150.       brilliance 3.0
  151.       specular 1.0
  152.       roughness 0.01
  153.   end_texture
  154.   color White
  155. end_object
  156.  
  157. object
  158.    intersection
  159.       union
  160.          quadric
  161.             Cylinder_Y
  162.             scale <6.0 1.0 3.0>
  163.             translate <-60.0 0.0 60.0>
  164.          end_quadric
  165.          quadric
  166.             Cylinder_Y
  167.             scale <6.0 1.0 3.0>
  168.             translate <60.0 0.0 60.0>
  169.          end_quadric
  170.       end_union
  171.       plane < 0.0 1.0 0.0 > 250.0 end_plane
  172.    end_intersection
  173.    texture
  174.      Blue_Agate
  175.      scale <10.0 10.0 10.0>
  176.      specular 1.0
  177.      roughness 0.01
  178.   end_texture
  179.   color CBlue
  180. end_object
  181.  
  182. object
  183.    intersection
  184.       union
  185.          quadric
  186.             Cylinder_Y
  187.             scale <6.0 1.0 3.0>
  188.             translate <-60.0 0.0 90.0>
  189.          end_quadric
  190.          quadric
  191.             Cylinder_Y
  192.             scale <6.0 1.0 3.0>
  193.             translate <60.0 0.0 90.0>
  194.          end_quadric
  195.       end_union
  196.       plane < 0.0 1.0 0.0 > 250.0 end_plane
  197.    end_intersection
  198.    texture
  199.       gradient < 1.0 1.0 0.0 >
  200.       colour_map
  201.          [0.00 0.25  colour red 0.0 green 0.8 blue 0.4
  202.                      colour red 0.2 green 0.3 blue 0.0]
  203.          [0.25 0.75  colour red 0.0 green 0.0 blue 0.8
  204.                      colour red 0.1 green 0.6 blue 1.0]
  205.          [0.75 1.001 colour red 0.0 green 0.3 blue 0.4
  206.                      colour red 0.8 green 0.8 blue 0.0]
  207.        end_colour_map
  208.        scale <30.0 30.0 30.0>
  209.        translate <30.0 -30.0 0.0>
  210.        ambient 0.2
  211.        diffuse 0.7
  212.        brilliance 3.0
  213.        specular 1.0
  214.        roughness 0.01
  215.    end_texture
  216.    color White
  217. end_object
  218.  
  219. object
  220.    intersection
  221.       union
  222.          quadric
  223.             Cylinder_Y
  224.             scale <6.0 1.0 3.0>
  225.             translate <-60.0 0.0 120.0>
  226.          end_quadric
  227.          quadric
  228.             Cylinder_Y
  229.             scale <6.0 1.0 3.0>
  230.             translate <60.0 0.0 120.0>
  231.          end_quadric
  232.       end_union
  233.       plane < 0.0 1.0 0.0 > 250.0 end_plane
  234.    end_intersection
  235.    texture
  236.      Blue_Agate
  237.      scale <10.0 10.0 10.0>
  238.      specular 1.0
  239.      roughness 0.01
  240.   end_texture
  241.   color CBlue
  242. end_object
  243.  
  244. object
  245.    intersection
  246.       union
  247.          quadric
  248.             Cylinder_Y
  249.             scale <6.0 1.0 3.0>
  250.             translate <-60.0 0.0 150.0>
  251.          end_quadric
  252.          quadric
  253.             Cylinder_Y
  254.             scale <6.0 1.0 3.0>
  255.             translate <60.0 0.0 150.0>
  256.          end_quadric
  257.       end_union
  258.       plane < 0.0 1.0 0.0 > 250.0 end_plane
  259.    end_intersection
  260.    texture
  261.       gradient < 1.0 1.0 0.0 >
  262.       colour_map
  263.          [0.00 0.25  colour red 0.0 green 0.8 blue 0.4
  264.                      colour red 0.2 green 0.3 blue 0.0]
  265.          [0.25 0.75  colour red 0.0 green 0.0 blue 0.8
  266.                      colour red 0.1 green 0.6 blue 1.0]
  267.          [0.75 1.001 colour red 0.0 green 0.3 blue 0.4
  268.                      colour red 0.8 green 0.8 blue 0.0]
  269.       end_colour_map
  270.       scale <30.0 30.0 30.0>
  271.       translate <30.0 -30.0 0.0>
  272.       ambient 0.2
  273.       diffuse 0.7
  274.       brilliance 3.0
  275.       specular 1.0
  276.       roughness 0.01
  277.    end_texture
  278.    color White
  279. end_object
  280.  
  281. { The Blinding Sun }
  282. object
  283.     sphere <0.0 0.0 0.0> 25.0 end_sphere
  284.     translate < 0.0 50.0 -100.0 >
  285.     texture
  286.        colour White
  287.        ambient 1.0
  288.        diffuse 0.0
  289.     end_texture
  290.     light_source
  291.     colour White
  292. end_object
  293.