(

	delete objects
	tile_size = 40
	size = 10

	b = box width:(size-1) length:(size-1) height:0.5

	for i=1 to tile_size do (

		for j=1 to tile_size do (

			bb = copy b
			bb.pos = [ i * size, j * size, 0 ]

		)

	)

	hide b

	count = 50

	for j = 1 to 10 do (

		b.width  *= 1.2
		b.length *= 1.2

		for i=1 to count do (

			n = geometry[ random 1 geometry.count ]
			b.pos = random n.min n.max

			(for g in geometry where intersects b g and b != g collect g).wirecolor = random green (random red blue)

		)

		count *= 0.7

		redrawViews()
		sleep 0.15
	)
)