home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / function / superq.pi < prev    next >
Encoding:
Text File  |  1994-01-23  |  650 b   |  28 lines
  1. // Sample transcendental surface.  This is a basic superquadric shape (a pinchy)
  2. // There seems to be a problem with the shading, and there are severe holes
  3. // at the edges.
  4. // Polyray input file - Alexander Enzmann
  5.  
  6. // Set up the camera
  7. viewpoint {
  8.    from <0, 5, -5>
  9.    at <0,0,0>
  10.    up <0,1,0>
  11.    angle 15
  12.    resolution 160, 160
  13.    }
  14.  
  15. // Set up background color & lights
  16. background white
  17. light <10,10,-10>
  18. include "..\colors.inc"
  19.  
  20. // Define a superquadric surface
  21. object {
  22.    function |x|^0.75 + |y|^0.74 + |z|^0.75 - 1
  23.    shiny_red
  24.    bounding_box <-1, -1, -1>, <1, 1, 1>
  25.    uv_steps 128, 128
  26.    rotate <0, 30, 0>
  27.    }
  28.