# Two meta balls.

DEFINE floor_col PLASTIC
{
	PHONG 10
	COLOUR
	{
		RGB 1 0 0
		K 0.1 1 0.75
	}
}

DEFINE black COLOUR { RGB 0 0 0 }

SCHEME (define light_orig '(0.5 1.8 -3))

DEFINE metaexpr META_EXPRESSION
{
	ORIENT ORIG 0.5 0 2
	BOUNDARY 1.0
	DENSITY 20
	PLASTIC
	{
		PHONG 10
		COLOUR
		{
			RGB 1 0 1
			K 0.3 0.95 0.9
		}
	}
	META_TERM
	{
		TYPE ADD

		META_BALL
		{
			FALLOFF WYVILL
			ORIENT ORIG -2.0 0 0
			RADIUS 3.5
			WEIGHT 2.0
		}
		META_BALL
		{
			FALLOFF WYVILL
			ORIENT ORIG 2.0 0 0
			RADIUS 3.5
			WEIGHT 2.0
		}
	}
}


DEFINE floor PLANE
{
	ORIENT
	{
		ORIG 0 -1.5 3
		VCT_Z 0 1 0
	}
	floor_col	# default shader

	SQUARE { MIN -5 -5 1 MAX 5 5 1 }
}	

DEFINE camera CAMERA
{
	SCHEME (define camera_orig '(0 2 -7))
	ORIG camera_orig
	LOOKDIR (-v '(0 0 0) camera_orig)
	VCTUP 0 1 0
	ORTHOGONALIZE TRUE
	FOCAL 1.0
	PRINTSTATUS TRUE
}

SCENE
{
	metaexpr
	floor

	camera

	black

	LIGHT
	{
		ORIG light_orig
		COLOUR  1 1 1
	}

	AMBIENT 1.0
}