/////////////////////////////////////////////////////////////////////////////////////
//
//  script.js bevat de javascript-functies voor de website van Barracuda Diving.
//
//  (c) 2001-2007 by Nico Oosterwijk
//
/////////////////////////////////////////////////////////////////////////////////////

site = "Barracuda Diving";   

var agt=navigator.appName
var ver=navigator.appVersion
var pos = 0, current = true, fast = true
var message, len, startdelay = 50
var speed1 = 5, speed2 = 85, delay = 2500
var msg1 = "Welkom op de website van Barracuda Diving - voor 'tec-heldere' duiken.";
var msg2 = "Barracuda Diving verzorgt opleidingen voor technisch duiken.";
var rightnow = new Date();
var hr = rightnow.getHours();
var mn = rightnow.getMinutes();
var day = rightnow.getDay();
var periode = "";
var dag = "";

switch ( day )
{
 case 0:
  dag = "zondag";
  break;
 case 1:
  dag = "maandag";
  break;
 case 2:
  dag = "dinsdag";
  break;
 case 3:
  dag = "woensdag";
  break;
 case 4:
  dag = "donderdag";
  break;
 case 5:
  dag = "vrijdag";
  break;
 case 6:
  dag = "zaterdag";
  break;
}
if (hr >= 0) { 
  periode = "morgen";
}
if (hr > 11) { 
  periode = "middag";
}
if (hr > 17) { 
  periode = "navond";
}

if (agt.indexOf("Pocket")!=-1)
{
 window.location.replace("http://www.barracuda-diving.nl/pda/index.html")
}
if (ver.indexOf("Symbian")!=-1)
{
 window.location.replace("http://www.barracuda-diving.nl/pda/index.html")
}

if (parent.frames.length <=0) {
 var pagina = window.location.pathname;
 window.location.replace("http://www.barracuda-diving.nl/pagina.html?" + pagina)
}

function startDisplay() {
        swpMsg()
        window.setTimeout("StatusDisplay()",startdelay)
}

function swpMsg() {
        if (!current)
          message = msg1
        else
         message = msg2
         len = message.length
         current = !current
         pos = 0
}

function StatusDisplay() {
        window.status = message.substring(0, pos + 1)
        pos++
        if (pos > len)
                {
                swpMsg()
                window.setTimeout("StatusDisplay()",delay)
                }
        else if (fast)
                window.setTimeout("StatusDisplay()",speed1)
        else
                window.setTimeout("StatusDisplay()",speed2)
        fast = !fast
}

function volopen(url) {
  window.open(url,"","fullscreen,scrollbars")
}

function setCookie(name, value, expires, path, domain, secure) {
  var curCookie = name + "=" + escape(value) +
        ((expires) ? "; expires=" + expires.toGMTString() : "") +
        ((path) ? "; path=" + path : "") +
        ((domain) ? "; domain=" + domain : "") +
        ((secure) ? "; secure=" + secure : "");
  document.cookie = curCookie;
}


function getCookie(name) {
  var dc = document.cookie;
  var prefix = name + "=";
  var begin = dc.indexOf("; " + prefix);
  if (begin == -1) {
    begin = dc.indexOf(prefix);
    if (begin != 0) return null;
    } else
      begin +=2
  var end = document.cookie.indexOf(";", begin);
  if (end == -1) 
    end = dc.length;
  return unescape(dc.substring(begin + prefix.length, end));
}


function deleteCookie(name, path, domain) {
  if (getCookie(name)) {
    document.cookie = name + "=" +
    ((path) ? "; path="+ path : "") +
    ((domain) ? "; domain="+ domain : "") +
    "; expires=Thu, 31-Oct-2000 00:00:01 GMT";
    document.close();
  }
}

function fixDate(date) {
  var base = new Date(0);
  var skew = base.getTime();
  if (skew > 0) 
    date.setTime(date,getTime() - skew);
}

function showpopup() {
  NewWin = window.open("popup/popup.html",'Popup','width=330,height=120,left=200,top=300,toolbar=0,scrollbars=no,status=0');
  setTimeout('NewWin.close()',18000);
}

function getpopup() {
  var aangeboden;
  aangeboden=getCookie("POPUP");
  if (!aangeboden) {
     showpopup();
     setpopup();
  }
}

function setpopup() {
        var now = new Date();
        fixDate(now);
        now.setTime(now.getTime() + 14 * 24 * 60 * 60 * 1000);
        setCookie("POPUP", "AlreadyOffered", now);
}

function Window_Close() {
        links = (screen.availWidth-450)/2;
        boven = (screen.availHeight-200)/2;
        offerd=getCookie("EINDE");
        if (!offerd) {
          var now = new Date();
          fixDate(now);
          now.setTime(now.getTime() + 7 * 24 * 60 * 60 * 1000);
          setCookie("EINDE", "AlreadyOffered", now);
          NewWin = window.open('unload.html','Popup','width=450,height=200,left=' + links + ',top=' + boven + ',toolbar=0,scrollbars=no,status=0');
        }
}

function Info()
{
  //if (!confirm("Door op <OK> te klikken bent u zich er van bewust dat Barracuda Diving op geen enkele wijze aansprakelijk gesteld kan worden voor de hier gepresenteerde informatie. Door op <Cancel>/<Annuleren> te klikken gaat u terug naar de vorige pagina.. "))
  //history.go(-1);return " ";
  goed = getCookie("theorie");
  if (!goed) {
  	if (!confirm("Door op <OK> te klikken bent u zich er van bewust dat Barracuda Diving op geen enkele wijze aansprakelijk gesteld kan worden voor de hier gepresenteerde informatie. Door op <Cancel>/<Annuleren> te klikken gaat u terug naar de vorige pagina.. "))
  	  { 
  	    history.go(-1);
  	    return " ";
  	  } else
  	setCookie("theorie","OK");
  }
}

function nummer(form) {
          Ctrl = form.Telefoon;
          if (Ctrl.value=="") {
                validatePrompt (Ctrl, "Wat is je telefoonnummer?")
                return (false);
          } else
                return checkIfNumber(Ctrl);
}

function runSubmit(form) {
        if (!nummer(form)) return false;
          document.forms[0].submit();
          return true;
}

function validatePrompt (Ctrl, PromptStr) {
                alert (PromptStr);
                Ctrl.focus();
                return;
}
        
function isNumber (inputStr) {
                for (var i = 0; i < inputStr.length; i++) {
                  var oneChar = inputStr.charAt(i);
                  if (i==1) {
                    if (oneChar==6 || oneChar==0) {
                      alert("Deze service werkt niet bij mobiele- en internationale telefoonnummers!");
                      return false;
                    }
                  }
                  if (oneChar < "0" || oneChar > "9") {
                    alert("In dit veld alleen cijfers invoeren, andere tekens zijn niet toegestaan.");
                    return false;
                  }
                }
                return true;
}


function checkIfNumber (formField) {
                var inputStr = formField.value;
                if (isNumber(inputStr)) {
                        return true;
                } else {
                        formField.focus();
                        formField.select();
                        return false;
                }
}

    
function isTelNumber (inputStr) {
		if (inputStr.length < 10) {
		  alert("Een telefoonnummer moet uit 10 cijfers bestaan!");
		  return false;		  
		}

                for (var i = 0; i < inputStr.length; i++) {
                  var oneChar = inputStr.charAt(i);

		  // controle op het eerste cijfer
	          if (i==0) {
		    if (oneChar!=0) {
                      alert("Een telefoonnummer moet met een 0 beginnen!");
		      return false;		  
                    }
                  }

		  // controle op het tweede cijfer
                  if (i==1) {
                    if (oneChar==0) {
                      alert("Internationale nummers zijn niet toegestaan!");
		      return false;		  
                    }
                    if (oneChar==9) {
                      alert("09xx nummers zijn niet toegestaan!");
                      return false;		  
                    }
                  }

		  // controle op de reeks cijfers
                  if (oneChar < "0" || oneChar > "9") {
                    alert("In dit veld alleen cijfers invoeren, andere tekens zijn niet toegestaan.");
                    return false;
                  }

                }

	  return true;


}


function iban() {
   window.open("iban.html","Popup","width=380,height=400,left=100,top=100,toolbar=0,scrollbars=yes,status=0");
}

function close_window() {
        window.close();
}


/////////////////////////////////////////////////////////////////////////
//Trimix berekening, geschreven door Nico Oosterwijk, Barracuda Diving //
/////////////////////////////////////////////////////////////////////////

function bereken_trmx(form) {

var NDepth, PDepth, PO2, PN2, PHe, Depth;

  Depth=(form.diepte.value);
  if (Depth > 0) {
   form.voorkeur.value="Nitrox32";
  }
  if (Depth > 30) {
   form.voorkeur.value="Tx21/35";
  }
  if (Depth > 45) {
   form.voorkeur.value="Tx18/45";
  }
  if (Depth > 60) {
   form.voorkeur.value="Tx15/55";
  }
  if (Depth > 75) {
   form.voorkeur.value="Tx10/70";
  }
  if (Depth > 120) {
   form.voorkeur.value="";
  }

if (form.diepte.value > 30) {

  PDepth=(form.diepte.value/10)+1;
  NDepth=(form.ndiepte.value/10)+1;
  PO2=(form.maxppo2.value/PDepth);
  PN2=(NDepth*.79)/PDepth;
  //PN2=(NDepth*(100-PO2))/PDepth;
    
  //////////////
  // Afronden //
  //////////////
  PO2=eval(parseInt(PO2*100+.5)/100);
  PN2=eval(parseInt(PN2*100+.5)/100);
  PHe=eval(parseInt(PHe*100+.5)/100);
  PO2=PO2*100;
  PN2=PN2*100;
  PHe=100-PO2-PN2;
  if (PHe < 0) {
    PHe = 0;
    PN2 = 100-PO2;
  }
  form.He.value=PHe;
  form.O2.value=PO2;
  form.N2.value=PN2;
 
 } else {
  alert("Duiken tot 30 meter diepte doen we bij voorkeur met Nitrox32!");
  //form.diepte.value=0;
  form.maxppo2.value=1.4;
  form.ndiepte.value=30;
  form.He.value=0;
  form.O2.value=0;
  form.N2.value=0;
 }

}

function maak_leeg(form) {
  form.diepte.value=0;
  form.maxppo2.value=1.4;
  form.ndiepte.value=30;
  form.He.value=0;
  form.O2.value=0;
  form.N2.value=0;
}

function maak_nleeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
        form.PW.value='';
        form.OW.value='';
        form.PH.value='';
        form.OH.value='';
        form.ON.value='';
        form.AN.value='';
        form.BM.value='100';
}

function maak_tleeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
        form.PW.value='';
        form.OW.value='';
        form.PH.value='';
        form.OH.value='';
        form.HH.value='';
        form.HW.value='';
        form.Instr.value='';
}


function bereken_blenden(form) {
var pN2,pH,pW,fW,fH,tussen,PPW,PPH,PPN,pN,fN;

        pN2 = (form.BM.value/100);
        fH=form.OH.value/100;
        fW=form.OW.value/100;
        pH=form.PH.value;
        pW=form.PW.value;
        
        // Have, Want, Need tabel
        PPW = fW * pW;
        PPH = fH * pH;
        PPN = PPW - PPH;
        pN = pW - pH;
        fN = PPN / pN;
        
        ON = ( (fN - .21) / (pN2 - .21) ) * pN;
        tussen = (pH*1) + (ON*1);
        AN = pW - tussen;
                
        AN = ( parseInt((AN)*100+.5)/100 );
        ON = ( parseInt((ON)*100+.5)/100 );
        tussen = ( parseInt((tussen)*100+.5)/100 );

	//form.Instr.value = AN;

        form.Instr.value = "Vul de fles aan met ";
        form.Instr.value = form.Instr.value + ON;
        form.Instr.value = form.Instr.value + " BAR vulmix tot " + tussen + " BAR ";
        form.Instr.value = form.Instr.value + "en vul dan " + AN + " BAR lucht erbij tot de gewenste druk van " + pW + " BAR. ";
        form.Instr.value = form.Instr.value + "ANALYZE DE MIX!!";
}

function bereken_trimix(form) {
var PN2,PO2H,PO2W,PN2W,PN2H,AN,ON,VolO2,VolN2,VolHe,rest,HeH,O2H,O2W,HeW,He,O2,Left,Gevuld,Gevuld1,rest1;

        PN2 = 0.79;

        PO2H=form.OH.value/100;
        PO2W=form.OW.value/100;
        PHeH=form.HH.value/100;
        PHeW=form.HW.value/100;

        O2H = form.PH.value * PO2H;                     //1 + 7
        HeH = form.PH.value * PHeH;                     //2
        O2W = form.PW.value * PO2W;                     //3
        HeW = form.PW.value * PHeW;                     //4

        He = HeW-HeH;                                   //5
        Gevuld = ((form.PH.value/100) + (He/100)) *100                  //6
        rest = form.PW.value - Gevuld;
        rest = ( parseInt((rest)*100)/100 );

        O2 = O2W - O2H;                                 //8
        O2 = O2 / rest;
        O2 = (O2 - .21) / .79 * rest;
        O2 = ( parseInt((O2)*100)/100 );

        Gevuld1 = Gevuld + O2;

        rest1 = form.PW.value - Gevuld1;
        rest1 = ( parseInt((rest1)*100)/100 );

        form.Instr.value = "Vul eerst = " + He + " BAR Helium tot " + Gevuld + " BAR. ";
        form.Instr.value = form.Instr.value + "Vul vervolgens = " + O2 + " BAR Zuurstof tot " + Gevuld1 + " BAR. ";
        form.Instr.value = form.Instr.value + "Vul tenslotte de rest aan met "+ rest1 +" lucht tot " + form.PW.value + " BAR. "
        form.Instr.value = form.Instr.value + "ANALYZE DE MIX!!";
}

/////////////////////////////////////////////////////////////////////////
//Nitrox berekening, geschreven door Nico Oosterwijk, Barracuda Diving //
/////////////////////////////////////////////////////////////////////////


function bereken_nnitrox(form) {
var to_PER1,to_PER2,to_DEP1,to_DEP2,to_EAD,to_MAX,to_MAR,to_PO2,to_P,to_PO,to_fPO;
if (form.d.value > 30)  {
    alert("Voor duiken dieper dan 30 msw wordt geen Nitrox gebruikt!\nZie hiervoor het artikel over Trimix!");
}
    if (form.p.value < 40)  {

        ///////////////////////////////////////////////                
        //bereken het percentage    fPO = pO2/P      //
        ///////////////////////////////////////////////
        to_P=eval(form.d.value);
        to_P=eval(to_P+10);
        to_P=eval(to_P/10);
        to_PO=eval(form.p.value);
        to_fPO=eval(to_PO/to_P);
	to_fPO=eval(parseInt(to_fPO*100+.5)); //afronden

        ///////////////////////////////////////////////                
        //bereken de PO2: ((depth+10)/10)*percentage //
        ///////////////////////////////////////////////
        to_PO2=eval(form.p.value);
        
        //////////////////////////////////////////////////////////
        //bereken de EAD: (((1-percentage)*(depth+10))/0,79)-10 //
        //////////////////////////////////////////////////////////
        to_PER1=eval(to_fPO/100);
        to_PER1=eval(1-to_PER1);
        to_DEP1=eval(form.d.value);
        to_DEP1=eval(to_DEP1+10);
        to_DEP1=eval(to_DEP1/0.79);
        to_EAD=eval((to_PER1*to_DEP1)-10);
        to_EAD=eval(parseInt(to_EAD*100+.5)/100); //afronden

        //////////////////////////////////////////////
        //bereken de MAX diepte: (14:percentage)-10 //
        //////////////////////////////////////////////
        to_MAX=eval(14/(to_fPO/100));
        to_MAX=eval(to_MAX-10);
        to_MAX=eval(parseInt(to_MAX*100+.5)/100); //afronden

        ////////////////////////////////////////////////
        //bereken de MARGE diepte: (16:percentage)-10 //
        ////////////////////////////////////////////////
        to_MAR=eval(16/(to_fPO/100));
        to_MAR=eval(to_MAR-10);
        to_MAR=eval(parseInt(to_MAR*100+.5)/100); //afronden

        ////////////////////////////////////////////////
        // en nu de cellen invullen met de resultaten //
        ////////////////////////////////////////////////
        form.e.value=to_EAD;    
        form.o.value=to_fPO;    
        form.m.value=to_MAX;    
        form.n.value=to_MAR;   
    }
    else {
        ////////////////////////////////////////////////////////
        // percentage niet onder 40% reset alle velden naar 0 //
        ////////////////////////////////////////////////////////
        alert("Percentage moet onder de 40% zijn!");
        form.e.value=0;
        form.p.value=0;
        form.o.value=0;
        form.m.value=0;
        form.n.value=0;
    }
}

function nmaak_leeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
        form.d.value="";        
        form.p.value="";        
        form.e.value="";        
        form.o.value="";        
        form.m.value="";        
        form.n.value="";        
}

/////////////////////////////////////////////////////////////////////////////////
// Berekening drijfvermogen, geschreven door Nico Oosterwijk, Barracuda Diving //
/////////////////////////////////////////////////////////////////////////////////

function bereken_fles(form) {
var materiaal, capaciteit, druk, gewicht, watersoort, staal_dichtheid, alu_dichtheid, lucht_dichtheid, zout_dichtheid;
var volume, lucht, leeg, zuurstof, stikstof;

        ////////////////////
        // vaste gegevens //
        ////////////////////
	staal_dichtheid=7.8;
	alu_dichtheid=2.7;
	zout_dichtheid=1.03;
	zuurstof_dichtheid=0.001429;
	stikstof_dichtheid=0.0012506;

        ///////////////////////////////////////////
        // variabele gegevens en controle invoer //
        ///////////////////////////////////////////
	if (!document.FLES.staal.checked) {
	  if (!document.FLES.alum.checked) { 
	    alert("Kies type fles!");
	    return;
          }
	}
	if (document.FLES.staal.checked) {
	  materiaal="staal";
	  if (document.FLES.alum.checked) {
	    alert("Je kunt niet allebei STAAL en ALUMINIUM aan hebben");
	    return;
	  }
	}
	if (document.FLES.alum.checked) {
	  materiaal="alum";
	}

	if (!document.FLES.zout.checked) {
	  if (!document.FLES.zoet.checked) { 
	    alert("Kies type water!");
	    return;
	  }
        }
	if (document.FLES.zoet.checked) {
	  watersoort="zoet";
	  if (document.FLES.zout.checked) {
	    alert("Je kunt niet allebei ZOET en ZOUT aan hebben");
	    return;
	  }
	}
	if (document.FLES.zout.checked) {
	  watersoort="zout";
	}
	if (!form.capac.value) {
	  alert("De capaciteit ontbreekt!");
	  return;
        }
	capaciteit=eval(form.capac.value);
	if (!form.maxpres.value) {
	  alert("De druk ontbreekt!");
	  return;
        }
	druk=eval(form.maxpres.value);
	if (!form.weight.value) {
	  alert("Het gewicht ontbreekt!");
	  return;
        }
	gewicht=eval(form.weight.value);
	if (!form.o2perc.value) {
	  alert("Het zuurstofpercentage ontbreekt!");
	  return;
        }
	zuurstof=eval(form.o2perc.value);

        ////////////////
        // berekening //
        ////////////////
	zuurstof=zuurstof/100;
	stikstof=1-zuurstof;
	zuurstof=zuurstof_dichtheid*(druk*zuurstof);
	stikstof=stikstof_dichtheid*(druk*stikstof);
	lucht_dichtheid=(zuurstof+stikstof)/druk;
	if (materiaal=="staal") {
		volume=capaciteit+(gewicht/staal_dichtheid);
	} 
	if (materiaal=="alum") {
		volume=capaciteit+(gewicht/alu_dichtheid);	
	}
	if (watersoort=="zout") {
		volume=volume*zout_dichtheid;
	}
	lucht=lucht_dichtheid*druk*capaciteit;
	form.leeg.value=( parseInt((volume-gewicht)*100+.5)/100 );
	form.vol.value=( parseInt((volume-gewicht-lucht)*100+.5)/100 );
}

function maak_flesleeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
	form.leeg.value='';
	form.vol.value='';
}

////////////////////////////////////////////////////////////////////////
// EADD berekening, geschreven door Nico Oosterwijk, Barracuda Diving //
////////////////////////////////////////////////////////////////////////


function berekenEADD(form) {
fout = 0;

if (form.Depth.value <1)  {
    alert("Diepte moet meer dan 1 meter zijn!");
    fout=1;
}
if (form.He.value > 100 || form.He.value < 1)  {
    alert("Helium-percentage moet tussen 1 en 100 zijn!");
    fout=1;
}
if (form.O2.value > 100 || form.O2.value < 1)  {
    alert("Zuurstof-percentage moet tussen 1 en 100 zijn!");
    fout=1;
}
totaal = eval((form.O2.value*1)+(form.He.value*1));
if ( totaal > 100) {
    alert("Zuurstof en helium percentages kunnen samen niet groter zijn dan 100%!");
    fout=1;
}
if (form.setpoint.value > 1.5 || form.setpoint.value < 0.1)  {
    alert("Setpoint wordt berekend a.d.h.v. de diepte.");
    fout = 2;
}

if (fout != 1) {
///////////////////////////                
// vullen van variabelen //
///////////////////////////
rho_n2=1.245;
rho_o2=1.429;
rho_he=0.179;
rho_air=1.288;

//////////////////                
//bereken de Pt://
//////////////////
Pt=eval(form.Depth.value/10+1);

if (fout == 2) {
 PO2=eval(form.O2.value/100);
 PHe=eval(form.He.value/100);
 PN2=eval(1-PHe-PO2);
 form.setpoint.value = PO2*10;
}
if (fout == 0) {
 setpoint=eval(form.setpoint.value);
 PO2=eval(setpoint);
 PInert=eval(Pt-PO2);
 PN2=eval(100-form.O2.value-form.He.value);
 PHe=eval(PInert/(form.He.value*1+PN2)*(form.He.value*1));
 PN2=eval(PInert-PHe);
 PHe=PHe/10;
 PN2=PN2/10;
 PO2=PO2/10;
}
///////////////////////////////////                
//bereken de partiele gasdrukken://
///////////////////////////////////
pPO2=eval(PO2 * 10 * rho_o2);
pPHe=eval(PHe * 10 * rho_he);
pPN2=eval(PN2 * 10 * rho_n2);
pPt=eval(pPO2+pPHe+pPN2);

////////////////////////////                
//bereken terug naar lucht//
////////////////////////////
pEADD = eval(pPt/rho_air);
EADD = eval(pEADD*10-10);
EADD = eval(parseInt(EADD*100/100+.5)); 

form.EADD.value = EADD;
}

}

////////////////////////////////////////////////////////////////////////////////////
//SAC rate berekening, geschreven door Nico Oosterwijk, (c) 2002 Barracuda Diving //
////////////////////////////////////////////////////////////////////////////////////


function bereken_SAC(form) {
var BAR, Liters, Diepte, Tijd, Volume, Pressure, Usage;
        BAR=eval(form.bar.value);
        Liters=eval(form.liters.value);
        Diepte=eval(form.diepte.value);
        Tijd=eval(form.tijd.value);
        //alert(BAR+" "+Liters+" "+Diepte+" "+Tijd);
        Volume=eval(BAR*Liters);
        Pressure=eval(Diepte/10+1);
        Usage=eval((Volume/Pressure)/Tijd);
        form.result.value=( parseInt((Usage)*100+.5)/100 ); 
        
}

function maak_SACleeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
        form.bar.value="";        
        form.liters.value="";
        form.diepte.value="";
        form.tijd.value="";        
        form.result.value="";        
}
function maak_duikleeg(form) {
        ///////////////////////////////////////////////////
        // gebruiker klikt op 'opnieuw' maakt alles leeg //
        ///////////////////////////////////////////////////
        form.duiksac.value="";        
        form.duikdiepte.value="";
        form.duiktijd.value="";        
        form.duikresult.value="";        
}

function bereken_LUCHT(form) {
var D_SAC, D_Capaciteit, D_Diepte, D_Tijd, D_Pressure, D_Usage, D_Lucht, D_Extra;
        D_SAC=eval(form.duiksac.value);
        D_Capaciteit=eval(form.capaciteit.value);
	D_Diepte=eval(form.duikdiepte.value);
        D_Tijd=eval(form.duiktijd.value);
        D_Pressure=eval(D_Diepte/10+1);
        D_Usage=eval(D_Pressure*D_SAC*D_Tijd);
        D_Lucht=eval(D_Usage/D_Capaciteit);
        form.duikresult.value=( parseInt((D_Lucht)*100+.5)/100 ); 
	D_Extra = eval((form.duikresult.value/2)*3);
	form.extra.value=( parseInt((D_Extra)*100+.5)/100 ); 
}
