home *** CD-ROM | disk | FTP | other *** search
/ Mega A/V / mega_av.zip / mega_av / GRAPHUTL / POVSCN.ZIP / LEVEL2.ZIP / WTORUS.POV < prev   
Text File  |  1992-07-03  |  2KB  |  89 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. // A single wooden torus
  4. // Illustrates what is possible withPOV-Raywood textures.
  5. // File by Dan Farmer Jan 1992
  6.  
  7. #include "shapes.inc"
  8. #include "colors.inc"
  9. #include "textures.inc"
  10.  
  11. /*
  12.    Torus specs:                                                                  
  13.       Major radius: 7.000000       Minor radius: 3.000000
  14.       Outer radius: 10.000000      Inner radius: 4.000000
  15. */
  16. #declare Torus =
  17. quartic {
  18.    <    1.000000 0.000000 0.000000 0.000000 2.000000
  19.    0.000000 0.000000 2.000000 0.000000 -116.000000
  20.    0.000000 0.000000 0.000000 0.000000 0.000000
  21.    0.000000 0.000000 0.000000 0.000000 0.000000
  22.    1.000000 0.000000 0.000000 2.000000 0.000000
  23.    80.000000 0.000000 0.000000 0.000000 0.000000
  24.    1.000000 0.000000 -116.000000 0.000000 1600.000000 >
  25. }
  26.  
  27.  
  28. // Wooden torus
  29. object {
  30.    quartic { Torus }
  31.  
  32.    // Bottom layer texture.  Uses a "stretched" bozo for fine porous grain
  33.    texture {
  34.       bozo
  35.       color_map {
  36.          [0.0 0.4 color BakersChoc  color BakersChoc ]
  37.          [0.4 1.01 color Tan color Tan]
  38.       }
  39.       scale <4 0.05 0.05>
  40.    }
  41.  
  42.    // Overlaying ring grain texture
  43.    texture {
  44.       phong 1
  45.       phong_size 100
  46.       brilliance 3
  47.       ambient 0.2
  48.       diffuse 0.8
  49.       wood turbulence 0.025
  50.  
  51.       color_map {
  52.          [0.0 0.15 color SemiSweetChoc color CoolCopper ]
  53.          [0.15 0.40 color CoolCopper color Clear ]
  54.          [0.40 0.80 color Clear  color CoolCopper ]
  55.          [0.80 1.01 color CoolCopper color SemiSweetChoc ]
  56.       }
  57.  
  58.       scale <3.5 1 1>
  59.       translate <0 -50 0>
  60.       rotate <0 0 1.5>
  61.    }
  62.  
  63.    translate <0 0 0>
  64. }
  65.  
  66.  
  67. // Main light source
  68. object {
  69.    light_source { <-50.0 100 -80.0>
  70.       colour White
  71.    }
  72. }
  73.  
  74. // Dim side light to fill shadows
  75. object {
  76.    light_source { <250.0  25.0 -100.0>
  77.       colour DimGray
  78.    }
  79. }
  80.  
  81.  
  82. camera {
  83.    location <0.0  20.0  -15.0>
  84.    direction <0.0 0.0  1.0>
  85.    up  <0.0  1.0  0.0>
  86.    right <1.33333 0.0 0.0>
  87.    look_at <0 0 0>
  88. }
  89.