home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 January / pcw-0195.iso / polyray / dat / poly / strophid.pi < prev    next >
Text File  |  1994-12-31  |  617b  |  31 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. // Set up the camera
  5. viewpoint {
  6.    from <0, 5, -5>
  7.    at   <0, 0,  0>
  8.    up   <0, 1,  0>
  9.    angle 30
  10.    resolution 160, 160
  11.    }
  12.  
  13. // Get various surface finishes
  14. include "..\colors.inc"
  15.  
  16. // Set up background color & lights
  17. background black
  18. light <10, 10, -20>
  19.  
  20. // Strophoid
  21. define a 1
  22. define b -0.1
  23. define c 0.4
  24. object {
  25.      object { polynomial (b - x)*(y^2 + z^2) - c^2*a*x^2 - c^2*x^3 }
  26.    & object { box <-1, -1, -1>, <1, 1, 1> }
  27.    bounding_box <-1, -1, -1>, <1, 1, 1>
  28.    rotate <0, -30, 0>
  29.    shiny_red
  30.    }
  31.