name: Kevin Loney
e-mail: kloney@pt2m.com
webpage: http://www.geocities.com/qsquared_1999/

code:
#local S=seed(0);

global_settings {
	radiosity {
	}
}

sky_sphere {
	pigment {
		agate
		color_map {
			[0 rgb <.7, .7, 1>]
			[1 blue .5]
		}
	}
}

camera {
	location <9, 9, 1>
	look_at 3 * y
	angle 50
}

#macro p(c, q, l)
	#if(l)
		#local r = -.15 * (6 - l) + 1;
		#local i = 0;
		#while(i < l / 2)
			#local d = vrotate( vrotate( (q + r) * y, 20 * (6 - l) + 10 * z), 360 * rand( S ) * y ) + c;
			cylinder {
				c, d, r, r/4
			}
			p( d, r, l - 1 )
			#local i = i + 1;
		#end
	#end
#end

union {
	plane {
		y, 0
	}
	blob {
		threshold .3
		p( 0, .7, 6 )
	}
	pigment {
		rgbt 1
	}
	normal {
		waves 1
		turbulence.5
	}
	finish {
		reflection 1
	}
	interior {
		ior 1.33
	}
}
//KWL

comments: Special thanks to Andrew Mah for providing constructive criticism

I SUBMIT TO THE STANDARD 10BEST.RAYTRACE.COM COPYRIGHT