// JavaScript Document
	
function contact()
	{
	empty = false;
	fm 	= document.email_form;
	checker(fm.sender_name,"Please enter your Name");
	checker(fm.sender_email,"Please enter your E-mail address");
	checker(fm.message,"Please enter a message");
	email_validator(fm.sender_email)
	if (empty == false){document.email_form.submit()}
	}

function inc(filename)
	{
	var head = document.getElementsByTagName('head').item(0);
	var js = document.createElement('script');
 	js.setAttribute('type', 'text/javascript');
	js.setAttribute('src', "/includes/" + filename);
	head.appendChild(js)
	}
	
function slimbox()
	{	
	inc("mootools.js")
	inc("slimbox.js")
	}

function checker(obj,msg){if(obj.value=="" && empty==false){alert(msg);empty=true;obj.focus()}}
	
//Email Validator Functions
function email_validator(obj)
	{
	var emailStr=obj.value;var emailPat=/^(.+)@(.+)$/;
	var specialChars="\\(\\)!£$%^&*()+='#~?<>@,;:\\\\\\\"\\.\\[\\]";var validChars="\[^\\s" + specialChars + "\]";var quotedUser="(\"[^\"]*\")";var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
	var atom=validChars + '+';var word="(" + atom + "|" + quotedUser + ")";var userPat=new RegExp("^" + word + "(\\." + word + ")*$");var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");var matchArray=emailStr.match(emailPat)
	if ((matchArray==null) && empty==false){message("Email address seems incorrect (check @ and .'s)",obj)}
	if (empty==false){var user=matchArray [1];var domain=matchArray [2];if (user.match(userPat)==null){message("The username doesn't seem to be valid.",obj)}}
	if (empty==false){var IPArray=domain.match(ipDomainPat);if (IPArray!=null){for (var j=1;j<=4;j++){if (IPArray[j]>255){message("Destination IP address is invalid!",obj)}}}}
	if (empty==false){var domainArray=domain.match(domainPat);if (domainArray==null){message("The domain name doesn't seem to be valid.",obj)}}
	if (empty==false){var atomPat=new RegExp(atom,"g");var domArr=domain.match(atomPat);var len=domArr.length;if (domArr[domArr.length-1].length<2 || domArr[domArr.length-1].length>3){message("The address must end in a three-letter domain, or two letter country.",obj)}}
	if ((len<2) && empty==false){message("This address is missing a hostname!",obj)}
	}
function message(msg,obj){alert(msg);empty=true;obj.focus()}
// End Email Validator Functions