home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / scripts / pov / winreal / winreal.pov < prev   
Encoding:
Text File  |  1994-05-25  |  7.9 KB  |  381 lines
  1. // Persistence Of Vision raytracer version 2.0 
  2.  
  3. // By Michael J Leon
  4. //    Chatsworth, CA
  5.  
  6. // Title-"Reality Windows"
  7. // 05/19/94 
  8.  
  9. // Any suggestions or comments, I'm at 742740,1110
  10.  
  11. #include "winreal.inc"     
  12. #include "shapes.inc"
  13. #include "colors.inc"
  14. #include "textures.inc" 
  15.  
  16. camera{ location <0,0,-165>
  17.     look_at <0,0,0>}
  18.  
  19.  
  20. // Place Lights in Blue Sky
  21.  
  22. light_source{<55,30,-195>color red 0.752941 green 0.752941 blue 0.752941}    
  23. light_source{<-55,30,-195>color red 0.752941 green 0.752941 blue 0.752941}
  24.  
  25. // Blue Sky
  26.  
  27. sphere {<0,0,0>,340
  28.     texture{pigment{bozo
  29.     turbulence 0.6
  30.     color_map {
  31.                     [0.0 0.6   color red 0.5 green 0.5 blue 1.0
  32.                color red 0.5 green 0.5 blue 1.0]
  33.                     [0.6 0.8   color red 0.5 green 0.5 blue 1.0
  34.                color red 1.0 green 1.0 blue 1.0]
  35.                     [0.8 1.001 color red 1.0 green 1.0 blue 1.0
  36.                color red 0.8 green 0.8 blue 0.8]}
  37.                     scale <105,50,200>}
  38.     finish{ambient 0.8 diffuse 0.0 }}
  39.     }
  40.  
  41. // Build Wood Window sides    
  42.  
  43. union   {object{box1 translate<-55,59,-1.5>}
  44.      object{box2 translate<-55,59,-1.5>}
  45.      object{box3 translate<-55,59,-1.5>}
  46.      
  47.      texture{Rosewood
  48.      rotate <0,40,10>
  49.      scale 10}              
  50.      finish{diffuse 0.7}         
  51.      }
  52.  
  53. union   {object{box1 translate<55.25,58.9,-1.5>}
  54.      object{box2 translate<55.25,58.9,-1.5>}
  55.      object{box3 translate<55.25,58.9,-1.5>}
  56.      texture{Rosewood
  57.      rotate <0,50,10>
  58.      scale 10}              
  59.      finish{diffuse 0.7}         
  60.      }
  61.  
  62. // Carved Rosewood top board
  63.  
  64. difference{
  65.                     box{<-50,64,3.55><50,48.5,-0.55>}
  66.  
  67.                     object{DD translate<0,102,-1.05>
  68.                         rotate <0,0,0>
  69.                         scale 0.55}
  70.  
  71.                     object{DD translate<0,102,-1.05>
  72.                         rotate <0,180,0>
  73.                         scale 0.55}
  74.  
  75.                     object{DD translate<23,102,-1.05>
  76.                         rotate <0,0,0>
  77.                         scale 0.55}
  78.  
  79.                     object{DD translate<23,102,-1.05>
  80.                         rotate <0,180,0>
  81.                         scale 0.55}
  82.  
  83.                     object{DD translate<46,102,-1.05>
  84.                         rotate <0,0,0>
  85.                         scale 0.55}
  86.  
  87.                     object{DD translate<46,102,-1.05>
  88.                         rotate <0,180,0>
  89.                         scale 0.55}
  90.  
  91.                     object{DD translate<69,102,-1.05>
  92.                         rotate <0,0,0>
  93.                         scale 0.55}
  94.  
  95.                     object{DD translate<69,102,-1.05>
  96.                         rotate <0,180,0>
  97.                         scale 0.55}
  98.  
  99.                   texture{Rosewood
  100.                 rotate <45,0,50>
  101.                 scale 10}              
  102.                 finish{diffuse 0.7}         
  103.                     }        
  104.  
  105. // Carved Rosewood slats
  106.  
  107. difference{
  108.             box{<-50.25,50,1.5><50.25,47.5,0.5>}
  109.  
  110.             cylinder{<-50.25,48.75,0.34><50.25,48.75,0.34>1}
  111.  
  112.             texture{Rosewood
  113.             rotate <0,0,0>
  114.             scale 10}    
  115.           }           
  116.  
  117. difference{
  118.             box{<-50.25,47.3,1.5><50.25,44.7,0.5>}                 
  119.     
  120.             cylinder{<-50.25,45.95,0.34><50.25,45.95,0.34>1}
  121.     
  122.             texture{Rosewood
  123.              rotate <0,20,20>
  124.             scale 10}    
  125.             }             
  126.     
  127. difference{
  128.                box{<-50.25,44.5,1.5><50.25,42.0,0.5>}               
  129.     
  130.             cylinder{<-50.25,43.25,0.34><50.25,43.25,0.34>1}
  131.  
  132.             texture{Rosewood
  133.             rotate <0,0,30>
  134.                  scale 10}    
  135.             }    
  136.     
  137. difference{
  138.             box{<-50.25,41.8,1.5><50.25,39.4,0.5>}               
  139.     
  140.             cylinder{<-50.25,40.3,0.33><50.25,40.3,0.33>1}
  141.  
  142.             texture{Rosewood
  143.             rotate <30,0,0>
  144.             scale 10}    
  145.             }           
  146.     
  147. difference{
  148.             box{<-50.25,39.2,1.5><50.25,36.6,0.5>}
  149.  
  150.             cylinder{<-50.25,37.85,0.33><50.25,37.85,0.33>1}
  151.  
  152.             texture{Rosewood
  153.             rotate <0,0,40>
  154.             scale 10}    
  155.             }           
  156.     
  157. difference{        
  158.             box{<-50.25,36.4,1.5><50.25,33.9,0.5>}  
  159.  
  160.             cylinder{<-50.25,35.15,0.34><50.25,35.15,0.34>1}
  161.  
  162.             texture{Rosewood
  163.             rotate <40,0,0>
  164.             scale 10}    
  165.             }             
  166.     
  167. difference{        
  168.             box{<-50.25,33.7,1.5><50.25,31.2,0.5>} 
  169.     
  170.             cylinder{<-50.25,32.45,0.34><50.25,32.45,0.34>1}
  171.  
  172.             texture{Rosewood
  173.             rotate <0,0,10>
  174.             scale 10}    
  175.             }    
  176.     
  177. difference{
  178.             box{<-50.25,31.2,1.5><50.25,28.5,0.5>} 
  179.     
  180.             cylinder{<-50.25,29.75,0.34><50.25,29.75,0.34>1}
  181.  
  182.             texture{Rosewood
  183.             rotate <30,0,0>
  184.             scale 10}    
  185.             }           
  186.  
  187. difference{
  188.             box{<-50.25,28.3,1.5><50.25,25.8,0.5>} 
  189.     
  190.             cylinder{<-50.25,27.05,0.34><50.25,27.05,0.34>1}
  191.  
  192.             texture{Rosewood
  193.             rotate <0,0,10>
  194.             scale 10}    
  195.             }             
  196.  
  197. difference{
  198.             box{<-50.25,25.7,1.5><50.25,23.1,0.5>} 
  199.     
  200.             cylinder{<-50.25,24.35,0.34><50.25,24.35,0.34>1}
  201.  
  202.             texture{Rosewood
  203.             rotate <30,0,0>
  204.             scale 10}    
  205.             }    
  206.  
  207. box{<-50.25,23,1.5><50.25,15,0.5> 
  208.     texture{Rosewood
  209.     rotate <0,0,0>
  210.     scale 10}    
  211.     }    
  212.  
  213. // Brass handle on Rosewood window
  214.  
  215. difference{
  216.                cylinder{<-8,18.75,-1><8,18.75,-1>1.5}
  217.  
  218.             cylinder{<-6.75,18.75,-1><6.75,18.75,-1>0.5}
  219.  
  220.             cylinder{<-6.25,16.95,-2><6.25,16.95,-2>1}
  221.  
  222.             pigment{Brass}
  223.             finish{Shiny}
  224.             }
  225.  
  226. sphere{<-8,18.75,-1>1.5
  227.     pigment{Brass}
  228.     finish{Shiny}
  229.     }
  230.  
  231. sphere{<8,18.75,-1>1.5
  232.     pigment{Brass}
  233.     finish{Shiny}
  234.     }
  235.  
  236. // Rosewood window sides
  237.  
  238. union   {box{<-60.25,52,0.75><-50.25,-60,-0.5>}
  239.  
  240.         cylinder{<-55.25,50,0.75><-55.25,-60,0.25>3}           
  241.     
  242.         cylinder{<-51,50,-0.25><-51,-60,-0.75>1.25}         
  243.  
  244.         cylinder{<-59.25,50,-0.25><-59.25,-60,-0.75>1}         
  245.     
  246.         texture{Rosewood
  247.         turbulence 0.05 lambda 1.5 omega 0.75 octaves 8
  248.         rotate<67,10,0>
  249.         scale 10}  
  250.         finish{diffuse 0.7}
  251.         }
  252.  
  253. union   {box{<60.25,50,0.75><50.25,-60,-0.5>}
  254.  
  255.         cylinder{<55.25,50,0.75><55.25,-60,0.25>3}           
  256.     
  257.              cylinder{<51,50,-0.25><51,-60,-0.75>1.25}             
  258.       
  259.               cylinder{<59.25,50,-0.25><59.25,-60,-0.75>1}    
  260.     
  261.         texture{Rosewood
  262.         turbulence 0.05 lambda 1.5 omega 0.75 octaves 8
  263.         rotate<90,0,10>
  264.         scale 10}
  265.         finish{diffuse 0.7}
  266.         }
  267.  
  268. // Rosewood window sill
  269.  
  270. union   {box{<62,-60,-1><-62,-64,1.75>}
  271.  
  272.         cylinder{<62,-62,-1><-62,-62,-1>2}
  273.  
  274.         texture{Rosewood
  275.         turbulence 0.05 lambda 1.5 omega 0.75 octaves 8
  276.         rotate<90,20,10>
  277.         scale 10}
  278.         finish{diffuse 0.7}
  279.         }
  280.  
  281. difference{
  282.             box{<60,-64.25,-0.5><-60,-72.25,1.75>}
  283.  
  284.             cylinder{<55,-68.25,-0.5><-55,-68.25,-0.5>2}
  285.  
  286.             sphere{<55,-68.25,-0.5>2}
  287.  
  288.             sphere{<-55,-68.25,-0.5>2}    
  289.     
  290.             texture{Rosewood
  291.             turbulence 0.05 lambda 1.5 omega 0.75 octaves 8
  292.             rotate<20,90,10>
  293.             scale 10}
  294.             finish{diffuse 0.7}
  295.             }
  296.  
  297. // Place Sky (starfield) and light inside Wood Window
  298.  
  299. light_source {<100,30,275> color red 1 green .8 blue .65 }
  300.  
  301. box {<-145,112,268><145,-185,300>
  302.     inverse
  303.     texture{pigment{A4 translate <0,200,0>
  304.     scale 100
  305.     rotate <20,20,0>}
  306.     finish{ambient 0.6 diffuse 0.0}}
  307.     }
  308.  
  309. // Place clouds inside Wood Window      
  310.  
  311. box {<-145,112,266><145,-185,300>   
  312.     inverse
  313.     texture{pigment{A2
  314.     scale <300,9,30>}
  315.     finish{ambient 0.7 diffuse 0.0}}
  316.     }
  317.  
  318. // Place blob_things
  319.  
  320. object{Blob2 translate<-155,-30,190>
  321.     rotate<0,20,20>
  322.     texture{pigment{bozo
  323.     turbulence 0.6
  324.     color_map {
  325.                     [0.0 0.6   color red 0.5 green 0.5 blue 1.0
  326.                color red 0.5 green 0.5 blue 1.0]
  327.                     [0.6 0.8   color red 0.5 green 0.5 blue 1.0
  328.                color red 1.0 green 1.0 blue 1.0]
  329.                     [0.8 1.001 color red 1.0 green 1.0 blue 1.0
  330.                color red 0.8 green 0.8 blue 0.8]}
  331.                             scale <105,50,200>}
  332.     finish{Shiny}}
  333.          }
  334.  
  335. object{Blob2 translate<-65,40,-50>
  336.            rotate<-5,-20,20>
  337.       texture{pigment{A5
  338.              scale <300,9,30>}
  339.       finish{Shiny}}
  340.             }
  341.  
  342. object{Blob2 translate<15,5,230>
  343.     rotate<10,20,-20>
  344.     texture{pigment{A6 
  345.           scale <300,9,30>}
  346.     finish{Shiny}}
  347.     }
  348.  
  349. // Place White Window inside Wood Window
  350.  
  351. object{XYZ translate<0,-5,23>
  352.     scale 6}
  353.  
  354. // Place Sky and light inside White Window
  355.             
  356. box {<-40,3,265><40,-127,300>
  357.     inverse
  358.     texture{pigment{A1 translate <0,200,0>
  359.           rotate <0,0,90>        
  360.           scale <300,9,30>}
  361.     finish{ambient 0.6 diffuse 0.0}}
  362.     }
  363.  
  364. // Place Clouds inside White Window
  365.  
  366. box {<-40,3,260><40,-127,300>   
  367.     inverse
  368.     texture{pigment{A3
  369.           rotate <0,90,0>    
  370.     scale <300,9,30>}
  371.     finish{ambient 0.7 diffuse 0.0}}
  372.     }
  373.  
  374. light_source{<-50,30,220> color red 1 green .8 blue .65 } 
  375. light_source{<-35,-30,215>color red 1.0 green 1.0 blue 1.0}     
  376. light_source{<35,-5,215>color red 1.0 green 1.0 blue 1.0}
  377.  
  378. // Place Chain Links through all Windows
  379.  
  380. object{C2 translate<0,-57,0>}
  381.