home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #7 / amigamamagazinepolishissue1998.iso / varia / povray3 / povray3_fpu / pov3demo / objects / superel2.pov < prev    next >
Text File  |  1997-12-12  |  2KB  |  56 lines
  1. // Persistence Of Vision raytracer version 3.0 sample file.
  2. // POV-Ray 3.0 sample data file by Dieter Bayer, Nov. 1994
  3. // This scene shows a number of cylindrical superellipsoids.
  4.  
  5. #version 3.0
  6. global_settings { assumed_gamma 2.2 }
  7.  
  8. camera {
  9.   orthographic
  10.   location <0, 0, -10>
  11.   right 15 * 4/3 * x
  12.   up 15 * y
  13.   look_at <0, 0, 0>
  14. }
  15.  
  16. light_source { <50, 50, -100> color red 0.7 green 0.7 blue 0.7 }
  17. light_source { <0, 0, -10000> color red 0.7 green 0.7 blue 0.7 }
  18.  
  19. plane { <0, 0, 1>, 2
  20.   pigment { checker color red 0 green 1 blue 0 color red 0 green 0 blue 1 }
  21.   finish { ambient 0.1 diffuse 0.4 }
  22. }
  23.  
  24. #declare Row1 = +5
  25. #declare Row2 =  0
  26. #declare Row3 = -5
  27. #declare Col1 = -5
  28. #declare Col2 =  0
  29. #declare Col3 = +5
  30.  
  31. #declare Tex = 
  32. texture {
  33.   pigment { color red 1 green 0 blue 0 } 
  34.   finish { ambient 0.2 diffuse 0.4 phong 0.5 phong_size 5 }
  35. }
  36.  
  37. superellipsoid { <1.0, 0.9> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col1, Row1, 0> texture { Tex } }
  38.  
  39. superellipsoid { <1.0, 0.8> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col2, Row1, 0> texture { Tex } }
  40.  
  41. superellipsoid { <1.0, 0.7> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col3, Row1, 0> texture { Tex } }
  42.  
  43. superellipsoid { <1.0, 0.6> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col1, Row2, 0> texture { Tex } }
  44.  
  45. superellipsoid { <1.0, 0.5> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col2, Row2, 0> texture { Tex } }
  46.  
  47. superellipsoid { <1.0, 0.4> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col3, Row2, 0> texture { Tex } }
  48.  
  49. superellipsoid { <1.0, 0.3> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col1, Row3, 0> texture { Tex } }
  50.  
  51. superellipsoid { <1.0, 0.2> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col2, Row3, 0> texture { Tex } }
  52.  
  53. superellipsoid { <1.0, 0.1> scale <1, 1, 1> rotate <-105, 30, 0> translate <Col3, Row3, 0> texture { Tex } }
  54.  
  55.  
  56.