home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1995 January / pcw-0195.iso / polymore / fig2-13.pi < prev    next >
Text File  |  1994-09-20  |  880b  |  57 lines
  1. //CYLINDER.PI
  2.  
  3. include "d:\polyray\include\colors.inc"
  4. include "d:\polyray\include\texture.inc"
  5.  
  6. viewpoint {
  7.  from      <0.1, 0.0, -0.7>
  8.  at        <0.0, 0.0, 0.0>
  9.  up        <0.0, 1.0, 0.0>
  10.  resolution      100,100
  11.  aspect          1.0
  12. }
  13.  
  14. // LIGHT_SOURCE
  15.    light <0, 5, -5>
  16.  
  17. // LIGHT_SOURCE
  18.    light <10,1,0>
  19.  
  20. // CYLINDER
  21. object {
  22.     cylinder <0.0, -0.5, 0.0>, <0.0, 0.5, 0.0>, 0.2
  23.     rotate <0, 0, 90>
  24.     reflective_yellow
  25. }
  26.  
  27. // SPHERE
  28. object {
  29.     sphere < 0.5, 0, 0>, 0.2
  30.     reflective_yellow
  31. }
  32.  
  33. // SPHERE
  34. object {
  35.     sphere < -0.5, 0, 0>, 0.2
  36.     reflective_yellow
  37. }
  38.  
  39. // CYLINDER
  40. object {
  41.     cylinder <0.0, -0.5, 0.0>, <0.0, 0.5, 0.0>, 0.2
  42.     reflective_yellow
  43. }
  44.  
  45. // SPHERE
  46. object {
  47.     sphere < 0, 0.5, 0>, 0.2
  48.     reflective_yellow
  49. }
  50.  
  51. // SPHERE
  52. object {
  53.     sphere < 0, -0.5, 0>, 0.2
  54.     reflective_yellow
  55. }
  56.  
  57.