image1 = new Image();

image1.src = "images/bullet_right.gif";

image2 = new Image();

image2.src = "images/bullet_right_h.gif";



function move_in(img_name,img_src) {

document[img_name].src=img_src;

}



function move_out(img_name,img_src) {

document[img_name].src=img_src;

}


function quickcontactform_val()
	{
	err = 0;
	msg = "";
	reExp = new RegExp("[\\w\_-]+@[\\w\_-]+\\.[\\w\_-]+");
	if (document.quickcontactform.name.value == "")
		{
		err = 1;
		msg = msg + "Please enter your name\n";
		}
	if (!(reExp.test(document.quickcontactform.email.value)))
		{
		err = 1;
		msg = msg + "Please enter your email address in correct format\n";
		}
	if (document.quickcontactform.comments.value == "")
		{
		err = 1;
		msg = msg + "Please enter your comments\n";
		}
	if (err)
		{
		alert(msg);
		return false;
		}
	return true;
	}

function tellformval()
	{
	reExp = new RegExp("[\\w\_-]+@[\\w\_-]+\\.[\\w\_-]+");
	if (!(reExp.test(document.tellform.tell_email.value)))
		{
		alert("Email format not correct!");
		return false;
		}
	url_to_open = "tell.php?email=" + document.tellform.tell_email.value;
	window.open(url_to_open,'tell','width=500,height=700')
 	}

function val_ftellform()
	{
	reExp = new RegExp("[\\w\_-]+@[\\w\_-]+\\.[\\w\_-]+");
	if (!(reExp.test(document.ftellform.fremail.value)))
		{
		alert("Please enter your friend's email address!");
		return false;
		}
	return true;
	}

function remove_con(o)
	{
	o.value = "";
	}

function rimage()

	{

	/* Array t holds the image numbers */

	var t = new Array(0, 1, 2, 3, 4);

	total_no = t.length;

	var r = Math.round((total_no - 1)*Math.random());

	document.write("<img src=\"images/right_image" + r + ".jpg\" width=\"197\" height=\"224\" border=\"0\" alt=\"Internal Balance, Inc. has strategic partnerships around the world that allow us to be on the cutting edge of science.We are concerned about the research coming out of Europe alerting us to the potential dangers of cell tower emissions on our DNA.\" /><br />");

	}