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_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_findObj(n, d) { //v4.01
  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);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

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_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

// (C) 2000 www.CodeLifter.com
// http://www.codelifter.com
// Set slideShowSpeed (milliseconds)
var slideShowSpeed = 5000
// Duration of crossfade (seconds)
var crossFadeDuration = 2
var Pic = new Array() // don't touch this
Pic[0] = 'images/website-design-tsequipment.jpg'
Pic[1] = 'images/website-design-rdrake.jpg'
Pic[2] = 'images/website-design-rpa.jpg'
Pic[3] = 'images/website-design-heattend.jpg'
Pic[4] = 'images/website-design-weddings.jpg'
Pic[5] = 'images/website-design-goblet.jpg'
Pic[6] = 'images/website-design-johnpill.jpg'
Pic[7] = 'images/website-design-sapphire.jpg'
Pic[8] = 'images/website-design-portaramp.jpg'


var t
var j = 0
var p = Pic.length

var preLoad = new Array()
for (i = 0; i < p; i++){
   preLoad[i] = new Image()
   preLoad[i].src = Pic[i]
}

function runSlideShow(){
   if (document.all){
      document.images.SlideShow.style.filter="progid:DXImageTransform.Microsoft.GradientWipe(GradientSize=1.0, wipeStyle=0,motion='forward')";
      document.images.SlideShow.filters[0].Apply();     
   }
   document.images.SlideShow.src = preLoad[j].src
   if (document.all){
      document.images.SlideShow.filters[0].Play(duration=crossFadeDuration);
   }
   j = j + 1
   if (j > (p-1)) j=0
   t = setTimeout('runSlideShow()', slideShowSpeed)
}


<!--          Sandeep V. Tamhankar (stamhankar@hotmail.com) -->
<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

function emailCheck (emailStr) {
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) {
	alert("Email address seems incorrect (check @ and .'s)")
	return false
}
var user=matchArray[1]
var domain=matchArray[2]

if (user.match(userPat)==null) {
    // user is not valid
    alert("The e-mail username doesn't seem to be valid.")
    return false
}

var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
    // this is an IP address
	  for (var i=1;i<=4;i++) {
	    if (IPArray[i]>255) {
	        alert("Destination IP address is invalid!")
		return false
	    }
    }
    return true
}

var domainArray=domain.match(domainPat)
if (domainArray==null) {
	alert("The e-mail domain doesn't seem to be valid.")
    return 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) {
   alert("The e-mail address must end in a three-letter domain, or two letter country.")
   return false
}

if (len<2) {
   var errStr="The e-mail address is missing a hostname!"
   alert(errStr)
   return false
}

return true;
}

function formCheck (form) {

if (form.email.value=="") {
	
	}else{
	if (emailCheck(form.email.value)==false) {
   		return false;
	}
}
form.M.value="sub"
return true;
}


// simple function that writes a line to the layer specified
function writeMessage(message, id) {
	var layer = document.getElementById(id);
	layer.innerHTML = message;
}


ie5  = (document.all && document.getElementById);
ns6 = (!document.all && document.getElementById);
//fades layer in
opac = 0;
function fadeIn() {
/*	if(opac != 100){
		opac+=2;
		if(ie5) document.getElementById('Hooks').filters.alpha.opacity = opac;
		if(ns6) document.getElementById('Hooks').style.MozOpacity = opac/100;
		setTimeout('fadeIn()', 50);
	}*/
}

// sets layer z-index

function setZIndex(id, z_index) {
	document.getElementById(id).style.zIndex = z_index;
}

//toggles layer visibility on and off

function show(id) {
	document.getElementById(id).style.visibility = "visible";
}
function hide(id) {
	document.getElementById(id).style.visibility = "hidden";
}

function anyerror(){
	var mess = document.form1.msg.value
	var l = mess.length
	if (l > 2) alert(mess);	
}

function MM_callJS(jsStr) { //v2.0
  return eval(jsStr)
}

function OpenPopUp(loc,wwidth,wheight)
{
window.open(loc,'','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=' + wwidth + ',height=' + wheight + ',screenx=100,screeny=100')
}
function printWindow(){
   bV = parseInt(navigator.appVersion)
   if (bV >= 4) window.print()
}