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