POV-Ray : Newsgroups : povray.binaries.scene-files : My First Friday Abstract Server Time
2 Sep 2024 10:16:39 EDT (-0400)
  My First Friday Abstract (Message 1 to 1 of 1)  
From: Bryan Valencia
Subject: My First Friday Abstract
Date: 4 Sep 2001 18:31:38
Message: <3B95569F.1EDB0BDE@209software.com>
This is it... 46 lines and no includes.


//my first friday abstract
#declare White= rgb 1;
#declare Black= rgb 0;


#version unofficial MegaPov 0.6;

global_settings{
  max_trace_level 20
  post_process {
    soft_glow {1, 8}
  }
}

difference{
    box{<-100,-100,-100><100,100,100>}
    union{
        sphere{<0,0,0>,99}
        cylinder{<0,0,0><0,0,-101>,10}
    }
    texture{
        pigment{color Black}
        finish{reflection 1}
    }
}

#declare R=seed(298);
#declare A=0;
#while (A<360)
    box{<-10,-10,-10><10,10,10> translate x*90 pigment{color
rgb<rand(R),rand(R),rand(R)>*3} rotate z*A}
    #declare A=A+20;
#end

#declare A=0;
#while (A<100)
    sphere{<0,0,0>,5
        pigment{color rgbf<1,1,1,1>}
        finish{reflection .5}
        interior{ior 2}
        translate <rand(R)*200-100,rand(R)*200-100,rand(R)*200-100>
    }
    #declare A=A+1;
#end

camera{location<0,0,-100> look_at<0,0,0> }
light_source{<0,0,-100> color White}


--
Bryan Valencia
Software Development Engineer


Post a reply to this message

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