function findObj(n, d) { //v4.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);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function nbGroup(event, grpName) { //v3.0
  var i,img,nbArr,args=nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = findObj(args[2])) != null && !img.init) {
      img.init = true; img.up = args[3]; img.dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = findObj(args[i])) != null) {
        if (!img.up) img.up = img.src;
        img.src = img.dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = findObj(args[i])) != null) {
      if (!img.up) img.up = img.src;
      img.src = (img.dn && args[i+2]) ? args[i+2] : args[i+1];
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.nbOver.length; i++) {
      img = document.nbOver[i]; img.src = (img.dn) ? img.dn : img.up; }
  } else if (event == "down") {
    if ((nbArr = document[grpName]) != null)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.up; img.dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = findObj(args[i])) != null) {
      if (!img.up) img.up = img.src;
      img.src = img.dn = args[i+1];
      nbArr[nbArr.length] = img;
  } }
}

function preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.p) d.p=new Array();
    var i,j=d.p.length,a=preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.p[j]=new Image; d.p[j++].src=a[i];}}
}

function displayStatusMsg(msgStr) { //v1.0
  status=msgStr;
  document.returnValue = true;
}

function swapImgRestore() { //v3.0
  var i,x,a=document.sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function swapImage() { //v3.0
  var i,j=0,x,a=swapImage.arguments; document.sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=findObj(a[i]))!=null){document.sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' moet een correct adres bevatten.\n';
      } else if (test!='R') {
        if (isNaN(val)) errors+='- '+nm+' moet een getal bevatten.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (val<min || max<val) errors+='- '+nm+' moet een getal zijn tussen '+min+' en '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is niet ingevuld.\n'; }
  } if (errors) alert('De volgende fouten zijn geconstateerd:\n'+errors);
  else if (confirm('Wilt u de ingevoerde gegevens verzenden?'))
		document.informatie.submit();
  document.returnValue = (errors == '');
}

function herstelForm()
	{
		if (confirm('Weet u zeker dat u de ingevoerde gegevens wilt wissen?'))
			document.informatie.reset();
	}

window.defaultStatus='Welkom op de website van kampeerboerderij het Heukeloms Hoefke !';

function vensterSchop()
	{
		schop=open('', 'nieuw_venster', 'width=292,height=587,status=no,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=no');
		schop.document.open();
		schop.document.write('<html><head><title>Plattegrond &acute;t Schop</title></head>');
		schop.document.write('<body onload="window.moveTo(0,0);window.focus()" bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"  rightmargin="0">');
		schop.document.write('<table align="center" width="291" height="586" border="0" celpadding="0"><tr><td><img src="grfx/platgr_schop.gif"></td></tr>');
		schop.document.write('<tr><td><form><center><input type="button" value="sluit venster" onClick="self.close()"></center></form></td></tr></table>');
		schop.document.write('</body></html>');
		schop.document.close();
	}

function vensterSchuurke()
	{
		schuurke=open('', 'nieuw_venster', 'width=483,height=372,status=no,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=no');
		schuurke.document.open();
		schuurke.document.write('<html><head><title>Plattegrond &acute;t Schuurke</title></head>');
		schuurke.document.write('<body onLoad="window.moveTo(0,0);window.focus()" bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"  rightmargin="0">');
		schuurke.document.write('<table align="center" width="482" height="371" border="0" celpadding="0"><tr><td><img src="grfx/platgr_schuurke.gif"></td></tr>');
		schuurke.document.write('<tr><td><form><center><input type="button" value="sluit venster" onClick="self.close()"></center></form></td></tr></table>');
		schuurke.document.write('</body></html>');
		schuurke.document.close();
	}
