Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include "colors.inc"
- #include "shapes.inc"
- #include "textures.inc"
- camera {
- location <10, 0, -30>
- look_at <0, 0, 0>
- }
- sphere{<0,0,0>,1 hollow
- texture{
- pigment{gradient <0,1,0>
- color_map{
- [0.0 color White]
- [0.8 color rgb<0.1,0.25,0.75>]
- [1.0 color rgb<0.1,0.25,0.75>] }
- } // end pigment
- finish {ambient 1 diffuse 0}
- } // end of texture
- scale 10000
- }
- light_source {
- <0, 0, -40> color White
- }
- plane { <0,1,0>, -25 texture {Cork scale 0.7}}
- #declare dlong = pi*(3-sqrt(5));
- #declare dz = 2.0/300 ;
- #declare long = 0;
- #declare z1 = 1 - dz/2;
- #for(k,0,299)
- #declare r = sqrt(1-z1*z1);
- #declare xpos = cos(long)*r;
- #declare ypos = sin(long)*r;
- #declare zpos = z1;
- sphere{<xpos,ypos,zpos> 0.1 texture{pigment {color Red}}}
- #declare tempy = ypos;
- #declare tempx = xpos;
- #declare tempz = zpos;
- #declare z1 = z1-dz ;
- #declare long = long + dlong;
- #end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement