////////////////////////////
//                        //
//     Manuel Kasten      //
//                        //
//    kasten.m@gmx.de     //
//                        //
////////////////////////////


#local g=text{ttf "povlogo" "A" 2,0}

#local Q=seed(0);

#macro r() rand(Q) #end

light_source {-9,1}

#local i=0;

blob{

    #while (i<9000)

        #local a = <r() r() 1.1>;

        #if ( inside ( g, a ) )

            sphere{

                a, r()/50, 1

                pigment { rgb .5 + <r() r() 1> }

            }

            #local i=i+1;

        #end

    #end

    translate -<.3.5>

}