home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / blobs / blobgrid.pi < prev    next >
Encoding:
Text File  |  1992-11-22  |  1.3 KB  |  50 lines
  1. viewpoint {
  2.    from  <0, 12, -20>
  3.    up    <0, 1, 0>
  4.    at    <0, 0, -1>
  5.    angle 25
  6.    resolution 640, 320
  7.    aspect 2
  8.    }
  9.  
  10. light 0.7 * white, <-5, 15, -20>
  11. light 0.7 * white, < 5, 15, -20>
  12. background midnightblue
  13.  
  14. include "..\colors.inc"
  15.  
  16. object {
  17.    blob 0.5:
  18. // Interacting spheres
  19.       sphere <-2, 1.5, 0>, 1, 3,
  20.       sphere < 2, 1.5, 0>, 1, 3,
  21.  
  22. // Left to right cylinders
  23.       cylinder <-6, 0, -6>, < 6, 0, -6>, 1, 0.5,
  24.       cylinder <-6, 0, -4>, < 6, 0, -4>, 1, 0.5,
  25.       cylinder <-6, 0, -2>, < 6, 0, -2>, 1, 0.5,
  26.       cylinder <-6, 0,  0>, < 6, 0,  0>, 1, 0.5,
  27.       cylinder <-6, 0,  2>, < 6, 0,  2>, 1, 0.5,
  28.       cylinder <-6, 0,  4>, < 6, 0,  4>, 1, 0.5,
  29.       cylinder <-6, 0,  6>, < 6, 0,  6>, 1, 0.5,
  30.  
  31. // Front to back cylinders
  32.       cylinder <-6, 0, -6>, <-6, 0, 6>, 1, 0.5,
  33.       cylinder <-4, 0, -6>, <-4, 0, 6>, 1, 0.5,
  34.       cylinder <-2, 0, -6>, <-2, 0, 6>, 1, 0.5,
  35.       cylinder < 0, 0, -6>, < 0, 0, 6>, 1, 0.5,
  36.       cylinder < 2, 0, -6>, < 2, 0, 6>, 1, 0.5,
  37.       cylinder < 4, 0, -6>, < 4, 0, 6>, 1, 0.5,
  38.       cylinder < 6, 0, -6>, < 6, 0, 6>, 1, 0.5
  39.    mirror
  40.    }
  41.  
  42. object {
  43.    polygon 4, <-6, 0, -6>, <-6, 0,  6>,
  44.               < 6, 0,  6>, < 6, 0, -6>
  45.    texture {
  46.       checker matte_white, matte_black
  47.       scale <2, 1, 2>
  48.       }
  49.    }
  50.