home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / FISHBOWL.DAT < prev    next >
Encoding:
Text File  |  1991-09-06  |  3.2 KB  |  132 lines
  1. // Persistence of Vision Raytracer
  2. // Sample file
  3.  
  4. #include "colors.dat"
  5. #include "shapes.dat"
  6. #include "textures.dat"
  7.  
  8. view_point
  9.    location <0.0 10.0 -90.0>
  10.    direction <0.0 0.0  1.0>
  11.    up  <0.0 1.0 0.0>
  12.    right <1.0 0.0 0.0>
  13. end_view_point
  14.  
  15. // Top part of bowl
  16. object
  17.     intersection
  18.        sphere <0.0 0.0 0.0> 20.0 end_sphere
  19.        sphere <0.0 0.0 0.0> 19.99 inverse end_sphere
  20.        plane <0.0 1.0 0.0> 15.0 rotate <10.0 0.0 0.0> end_plane
  21.        plane <0.0 1.0 0.0> 10.0 rotate <10.0 0.0 0.0> inverse end_plane
  22.     end_intersection
  23.     translate <-8.0 0.0 0.0>
  24.     texture
  25.        color LightGray alpha 0.7
  26.        ambient 0.3
  27.        diffuse 0.7
  28.        refraction 1.0
  29.        ior 1.5
  30.     end_texture
  31. end_object
  32.  
  33. // Bottom part of bowl
  34. object
  35.    intersection
  36.        sphere <0.0 0.0 0.0> 20.0 end_sphere
  37.        sphere <0.0 0.0 0.0> 19.99 inverse end_sphere
  38.        plane <0.0 1.0 0.0> 10.0 rotate <10.0 0.0 0.0> end_plane
  39.     end_intersection
  40.     translate <-8.0 0.0 0.0>
  41.     texture
  42.        color LightBlue alpha 0.9
  43.        ambient 0.1
  44.        diffuse 0.7
  45.        refraction 0.9
  46.        ior 1.33
  47.     end_texture
  48. end_object
  49.  
  50. object
  51.     plane <0.0 1.0 0.0> -19.0 end_plane
  52.     texture
  53.        checker colour DarkSlateGrey colour IndianRed
  54.        scale <10.0 10.0 10.0>
  55.     end_texture
  56. end_object
  57.  
  58. object
  59.     plane <0.0 0.0 1.0> 30.0 end_plane
  60.     texture
  61.        colour red 0.329804 blue 0.204314 green 0.204314
  62.     end_texture
  63. end_object
  64.  
  65. object
  66.    sphere <0.0 0.0 0.0> 1.5 end_sphere
  67.    translate <-100.0  100.0  -130.0>
  68.    texture
  69.       colour red 0.7 green 0.7 blue 0.7
  70.       ambient 1.0
  71.       diffuse 0.0
  72.    end_texture
  73.    colour red 0.7 green 0.7 blue 0.7
  74.    light_source
  75. end_object
  76.  
  77.  
  78. // Picture
  79. composite
  80.   object
  81.    intersection
  82.     plane <1.0 0.0 0.0> 1.0 end_plane
  83.     plane <1.0 0.0 0.0> -1.0 inverse end_plane
  84.     plane <0.0 1.0 0.0> 1.0 end_plane
  85.     plane <0.0 1.0 0.0> -1.0 inverse end_plane
  86.     plane <0.0 0.0 1.0> 1.0 end_plane
  87.     plane <0.0 0.0 1.0> -1.0 inverse end_plane
  88.    end_intersection
  89.     translate <1.0 1.0 1.0>
  90.     scale <20.0 15.0 1.0>
  91.     texture
  92.        color White
  93.        ambient 0.05
  94.        diffuse 0.9
  95.     end_texture
  96.   end_object
  97.  
  98. // The picture frame 
  99.   object
  100.    union
  101.     intersection
  102.     union
  103.       quadric Cylinder_Y scale <1.0 1.0 1.0> translate <41.0 0.0 0.0> end_quadric
  104.       quadric Cylinder_Y scale <1.0 1.0 1.0> translate <-1.0 0.0 0.0> end_quadric
  105.     end_union
  106.       plane <0.0 1.0 0.0> 31.0 end_plane
  107.           plane <0.0 1.0 0.0> -1.0 inverse end_plane
  108.     end_intersection
  109.     intersection
  110.     union
  111.         quadric Cylinder_X scale <1.0 1.0 1.0> translate <0.0 31.0 0.0> end_quadric
  112.       quadric Cylinder_X scale <1.0 1.0 1.0> translate <0.0 -1.0 0.0> end_quadric
  113.     end_union
  114.       plane <1.0 0.0 0.0> 41.0 end_plane
  115.       plane <1.0 0.0 0.0> -1.0 inverse end_plane
  116.     end_intersection
  117.       sphere <-1.0 -1.0 0.0> 1.0 end_sphere
  118.       sphere <-1.0 31.0 0.0> 1.0 end_sphere
  119.       sphere <41.0 -1.0 0.0> 1.0 end_sphere
  120.       sphere <41.0 31.0 0.0> 1.0 end_sphere
  121.    end_union
  122.    texture
  123.         Pine_Wood
  124.     ambient 0.3
  125.     diffuse 0.7
  126.    end_texture
  127.   end_object
  128.  
  129.     scale <1.5 1.5 1.5>
  130.     translate <20.0 20.0 29.0>
  131. end_composite
  132.