function validEmail(emailField) {
  email = emailField.value
  if (email == "") {     //must contain something
    alert("Email address is empty")
    return false
  }
  invalid = " /;,:"
  for (i=0; i<invalid.length; i++){   //cannot contain these characters
    bad = invalid.charAt(i)
    if (email.indexOf(bad,0) > -1){
      alert("Email address contains invalid characters")
      return false
    }
  }
  atPos = email.indexOf("@",0)  //must have a @ character
  if (atPos == -1){
    alert("Email address is missing the @ character")
    return false
  }
  if (atPos == 0){   //cannot start with @ character
    alert("Email address cannot start with the @ character")
    return false
  }
  if (email.indexOf("@",atPos+1) != -1){  //can only have ONE @ character
    alert("Email address contains more than one @ character")
    return false
  }
  dotPos = email.indexOf(".",atPos+1)  //must have a . character after the @
  if (dotPos == -1){
    alert("Email address must have a . character following the @ character")
    return false
  }
  if (dotPos == 0){   //cannot start with . character
    alert("Email address cannot start with the . character")
    return false
  }
  if ((dotPos-atPos) == 1){
    alert("Email address has no characters between the @ and . characters")
    return false    
  }
  if (dotPos+3 > email.length){   //must have at least 2 characters after .
    alert("Email address must have at least two characters following the dot")
    return false
  }        
}
  


function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}


function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}



function MM_findObj(n, d) { //v3.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); return x;
}




function goBack()
{
  if (history.length > 0)
  {history.back()}
}


function findObj(n, d) { //v3.0
	var p,i,x;
	if(!d) d=document;
	if((p=n.indexOf("?"))>0&&parent.frames.length){
		d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
	}
	if(!(x=d[n])&&d.all) x=d.all[n];
	for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
	for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=findObj(n,d.layers[i].document);
	//alert("OBJ="+x.value)
	return x;
}


function hideLayer() {
	var v;
	if(prevMenu!=null){
		obj=findObj(prevMenu)
		if (obj.style){
			obj=obj.style; v='hidden';
		}
		else{
			v='hide';
		}
		obj.visibility=v;
	}
	prevMenu = null;
}


function showLayer(layerNum) {
	var v;
	if(prevMenu!=null){
		obj=findObj(prevMenu)
		if (obj.style){
			obj=obj.style; v='hidden';
		}
		else{
			v='hide';
		}
		obj.visibility=v;
	}
	obj=findObj(layerNum)
	if (obj.style){
		obj=obj.style; v='visible';
	}
	else{
		v='show';
	}
	obj.visibility=v;
	prevMenu = layerNum;
}
