POV-Ray : Newsgroups : povray.text.scene-files : Colored attenuation: sun code : Colored attenuation: sun code Server Time
28 Jul 2024 16:23:28 EDT (-0400)
  Colored attenuation: sun code  
From: SamuelT 
Date: 30 Oct 1999 16:24:24
Message: <381B5564.98B6D2AF@aol.com>
Here is the code for the scene posted in the images section. You will
probably have to fix the code a little since it always becomes clipped
off at strange places when I post it. Anways, enjoy!



camera{location<0,0,-10>look_at 0}

light_source{<0,10000,100000>,<1 1 .5>}

background{<.8 .5 .2>}

fog{rgb<1 1 .3>*.8 distance 200 fog_type 2 fog_alt 20 fog_offset 0}

//Water
plane{y,-10
 pigment{rgb .2}
 finish{reflection .8}
 normal{granite -.5 scale 20}
 hollow
}

//Sun
sphere{<0,10000,100000>,20000
 pigment{rgbf 1}
 interior{
  fade_power 7
  fade_distance 20000
  fade_color rgb<4 4 3>
 }
 no_shadow
}

//Sticks
union{
 cylinder{<-5,-50,5>,<-5.5,4,0>,.2}
 cylinder{<-10,-50,20>,<-9.65,3,20>,.2}
 cylinder{<18,-50,15>,<7,5,13>,.2}
 cylinder{<7,5,13>,<7,-4,13>,.05}
 cylinder{<5,-50,30>,<9,7,33>,.25}
 pigment{rgb 1}
}

//Lens with torus
torus{1,.125
 pigment{rgb .3}
 finish{phong 1 phong_size 70 reflection .5}
 rotate<90,45,0>
 translate<7,-(5+.125),13>
}

sphere{<7,-(5+.125),13>,1-.125
 pigment{rgbf<1 1 1 .8>}
 finish{phong 1 phong_size 90 reflection .2}
 interior{ior 1.5 caustics .3 dispersion 1.5 disp_nelems 14}
}

--
Samuel Benge

STB### [at] aolcom

"And you can fly
 High as a kite if you want to
 Faster than light if you want to
 Speeding through the universe
 Thinking is the best way to travel"

          -The Best Way to Travel, The Moody Blues


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.