// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1, 1, 1 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare camara =
        difference {
                sphere{<0,0,0>,1.0 texture{tx_fosca}}
                box{
                        <-1,-1,-1>,
                        <1,1,0>
                        texture{tx_fosca}
                }
        }

#include "eixos.inc"

#macro cena(m,n)
        #declare roleta1 = seed(131212);
        #declare centro = array[n];

        union{
                #declare i=0;
                #while(i<n)
                        #declare raio = 0.5*rand(roleta1);
                        #declare centro[i] = <50*rand(roleta1),50*rand(roleta1),50*rand(roleta1)>;
                        sphere{centro[i],raio texture{tx_fosca}}

                        #declare i = i+1;
                #end

                #declare j=0;
                #while(j<m)
                        #declare cam1=0;
                        #declare cam2=0;

                        #while(cam1 = cam2)
                                #declare cam1 = int(n*rand(roleta1));
                                #declare cam2 = int(n*rand(roleta1));
                        #end

                        cylinder
                        {
                                centro[cam1], centro[cam2], 0.1*rand(roleta1) texture{tx_fosca}
                        }
                        #declare j = j+1;
                #end
        }
#end

object{cena(50,50)}

#include "camlight.inc"
#declare centro_cena = < 25.00, 25.00, 25.00 >;
#declare raio_cena = 50.0;
#declare dir_camera = < 14.00, 7.00, 4.00 >;
#declare dist_camera = 5*raio_cena;
#declare intens_luz = 1.20;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)