home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / scripts / pov / wavedat / nightsky.inc next >
Encoding:
Text File  |  1994-04-04  |  3.2 KB  |  171 lines
  1. //this sky texture was written by Norm Bowler.
  2.  
  3. default{
  4.   finish{
  5.     ambient .2
  6.     diffuse .4
  7.   }
  8. }
  9.  
  10. #declare Br=1 //Brightness constant for color values
  11. #declare Br=3 //brighter colors
  12.  
  13. //more light
  14. default{
  15.   finish{
  16.     ambient .3
  17.     diffuse .7
  18.   }
  19. }
  20.  
  21. #declare BL1=Br*.35  //blue level for horizon
  22. #declare BL2=Br*.05  //blue level for zenith
  23.  
  24. union {
  25. // Sky sphere 
  26. sphere { <0, 0, 0>, 1000
  27. texture {
  28.   pigment {gradient z
  29.     color_map {
  30.       [0   color blue BL1]
  31.       [1   color blue BL2]
  32.     }
  33.     scale 800
  34.   }
  35.   finish {Luminous}
  36. }
  37. texture{
  38.   pigment {agate
  39.     color_map {
  40.       [0   color Clear]
  41.       [.75  color Clear]
  42.       [1   color White filter .93 ]
  43.     }
  44.     //scale <4000,700,4000>
  45.     scale <4000, 4000, 700>
  46.     //translate <300,700,0>
  47.     translate <300, 0, 700>
  48.   
  49.   }
  50.   finish {Luminous}
  51.  
  52. }
  53. texture{
  54.   pigment {granite 
  55.     //turbulence 1
  56.     color_map {
  57.       [0   color Clear]
  58.       [.8  color Clear]
  59.  
  60.       [.8  color Gray15]
  61.       [.92  color Gray70]
  62.       [.92  color red 1 green .8 blue .75]
  63.       [1   color red .95 blue 1 green .95]
  64.     }
  65.    scale 10}
  66.    finish {Luminous}
  67. }
  68. texture {
  69.   pigment {gradient z
  70.     color_map {
  71.       [0    color blue BL1 filter .1]
  72.       [.25  color blue BL1-((BL1-BL2)*.25) filter .6]
  73.       [.3   color blue BL1-((BL1-BL2)*.3)  filter 1]
  74.       [.35  color Clear]
  75.       [1    color Clear]
  76.     }
  77.     scale 800
  78.   }
  79.   finish {Luminous}
  80. }
  81. no_shadow
  82. }
  83. //clouds
  84. plane {z  122
  85.   pigment {bozo
  86.     turbulence .5
  87.     color_map {
  88.       [0   color Clear]
  89.       [.7  color Clear]
  90.       [.75  color red Br*.2 green Br*.2 blue Br*.2 filter .6]
  91.       [1   color red Br*.05 green Br*.05 blue Br*.05 filter .1]
  92.     }
  93.     scale <400,30,30>
  94.     }
  95.   finish {Luminous}
  96.   no_shadow
  97. }
  98. rotate <-45, 0, 0>
  99. }
  100.  
  101. //moon
  102. sphere { <-36,900,44.366>, 17
  103.   //base color
  104.   texture {
  105.     pigment { color Quartz}
  106.   }
  107.   texture  {
  108.     pigment{leopard
  109.       turbulence .3
  110.       color_map {
  111.         [0   color Clear]
  112.         [.55 color Clear]
  113.         [.7  color CadetBlue]
  114.         [.75 color Clear]
  115.         [1   color Clear]
  116.       }
  117.       scale 2
  118.     }
  119.   }
  120.   texture  {
  121.     pigment{leopard
  122.       turbulence .2
  123.       color_map {
  124.         [0   color Clear]
  125.         [.45 color Clear]
  126.         [.7  color CadetBlue]
  127.         [.8 color Clear]
  128.         [1   color Clear]
  129.       }
  130.       scale 1.5
  131.       //rotate <22,67,9>
  132.       rotate <22, 9, 67>
  133.       //translate <51,5,50>
  134.       translate <51, 50, 5>
  135.     }
  136.   }
  137.   texture {
  138.     pigment{leopard
  139.       turbulence .3
  140.       color_map {
  141.         [0   color Clear]
  142.         [.4 color Clear]
  143.         [.7  color CadetBlue]
  144.         [.75 color Clear]
  145.         [1   color Clear]
  146.       }
  147.       scale 2.5
  148.       //translate <32,17,12>
  149.       translate <32, 12, 17>
  150.     }
  151.   }
  152.   texture {
  153.     pigment{leopard
  154.       turbulence .2
  155.       color_map {
  156.         [0   color Clear]
  157.         [.35 color Clear]
  158.         [.7  color CadetBlue]
  159.         [.75 color Clear]
  160.         [1   color Clear]
  161.       }
  162.       scale 3
  163.       //rotate <38, 32, 80>
  164.       rotate <38, 80, 32>
  165.       //translate <62,17,12>
  166.       translate <62, 12, 17>
  167.     }
  168.   }
  169. }
  170.  
  171.