function bereken()
{
	var boxaction = document.forms['frmForm'].boxaction;
	var van = document.forms['frmForm'].firstValue;
	var naar = document.forms['frmForm'].secondValue;
	var enter = document.forms['frmForm'].enterValue;
	var answer = document.forms['frmForm'].answerValue;
	//alert(naar.value);
	var beginwaarde = parseInt(enter.value);

	var temp = new Array()
	if(boxaction.value == 'calculatortemp')
	{
		temp['celcius'] 	= ({celcius:beginwaarde,fahrenheit:((beginwaarde*1.8)+32),kelvin:((beginwaarde)+273.15)});
		temp['fahrenheit'] 	= ({celcius:((beginwaarde-32)*0.5555),fahrenheit:beginwaarde,kelvin:(((beginwaarde-32)*0.5555)+273.15)});
		temp['kelvin'] 		= ({celcius:(beginwaarde-273.15),fahrenheit:(((beginwaarde-273.15)*1.8)+32),kelvin:beginwaarde});
	}
	else if(boxaction.value == 'calculatorafst')
	{
		temp['km']		=({km:beginwaarde,m:(beginwaarde*1000),dm:(beginwaarde*10000),cm:(beginwaarde*100000),mm:(beginwaarde*1000000),nm:(beginwaarde*1000000000),mil:(beginwaarde*39370079),miles:(beginwaarde/1.609344),yards:(beginwaarde/0.0009144),feet:(beginwaarde/0.0003048),inches:(beginwaarde/0.0000254)});
		temp['m']		=({km:(beginwaarde/1000),m:beginwaarde,dm:(beginwaarde*10),cm:(beginwaarde*100),mm:(beginwaarde*1000),nm:(beginwaarde*1000000),mil:(beginwaarde*39370.079),miles:(beginwaarde/1609.344),yards:(beginwaarde/0.9144),feet:(beginwaarde/0.3048),inches:(beginwaarde/0.0254)});
		temp['dm']		=({km:(beginwaarde/10000),m:(beginwaarde/10),dm:beginwaarde,cm:(beginwaarde*10),mm:(beginwaarde*100),nm:(beginwaarde*100000),mil:(beginwaarde*3937.0079),miles:(beginwaarde/16093.44),yards:(beginwaarde/9.144),feet:(beginwaarde/3.048),inches:(beginwaarde/0.254)});
		temp['cm']		=({km:(beginwaarde/100000),m:(beginwaarde/100),dm:(beginwaarde/10),cm:beginwaarde,mm:(beginwaarde*10),nm:(beginwaarde*10000),mil:(beginwaarde*393.7007),miles:(beginwaarde/160934.4),yards:(beginwaarde/91.44),feet:(beginwaarde/30.48),inches:(beginwaarde/2.54)});
		temp['mm']		=({km:(beginwaarde/1000000),m:(beginwaarde/1000),dm:(beginwaarde/100),cm:(beginwaarde/10),mm:beginwaarde,nm:(beginwaarde*1000),mil:(beginwaarde*39.370079),miles:(beginwaarde/1609344),yards:(beginwaarde/914.4),feet:(beginwaarde/304.8),inches:(beginwaarde/25.4)});
		temp['nm']		=({km:(beginwaarde/1000000000),m:(beginwaarde/1000000),dm:(beginwaarde/100000),cm:(beginwaarde/10000),mm:(beginwaarde/1000),nm:beginwaarde,mil:(beginwaarde*0.039370079),miles:(beginwaarde/1609344000),yards:(beginwaarde/914400),feet:(beginwaarde/304800),inches:(beginwaarde/25400)});
		temp['mil']		=({km:(beginwaarde/39370079),m:(beginwaarde/39370.079),dm:(beginwaarde/3937.0079),cm:(beginwaarde/393.70079),mm:(beginwaarde/39.370079),nm:(beginwaarde/0.039370079),mil:beginwaarde,miles:(beginwaarde/63360000),yards:(beginwaarde/36000),feet:(beginwaarde/12000),inches:(beginwaarde/1000)});
		temp['miles']		=({km:(beginwaarde*1.609344),m:(beginwaarde*1609.344),dm:(beginwaarde*16093.44),cm:(beginwaarde*160934.4),mm:(beginwaarde*1609344),nm:(beginwaarde*1609344000),mil:(beginwaarde*63360000),miles:beginwaarde,yards:((beginwaarde*1609344)/914.4),feet:((beginwaarde*1609344)/304.8),inches:((beginwaarde*1609344)/25.4)});
		temp['yards']		=({km:(beginwaarde*0.0009144),m:(beginwaarde*0.9144),dm:(beginwaarde*9.144),cm:(beginwaarde*91.44),mm:(beginwaarde*914.4),nm:(beginwaarde*914400),mil:(beginwaarde*36000),miles:((beginwaarde*914.4)/1609344),yards:beginwaarde,feet:((beginwaarde*914.4)/304.8),inches:((beginwaarde*914.4)/25.4)});
		temp['feet']		=({km:(beginwaarde*0.0003048),m:(beginwaarde*0.3048),dm:(beginwaarde*3.048),cm:(beginwaarde*30.48),mm:(beginwaarde*304.8),nm:(beginwaarde*304800),mil:(beginwaarde*12000),miles:((beginwaarde*304.8)/1609344),yards:((beginwaarde*304.8)/914.4),feet:beginwaarde,inches:((beginwaarde*304.8)/25.4)});
		temp['inches']		=({km:(beginwaarde*0.0000254),m:(beginwaarde*0.0254),dm:(beginwaarde*0.254),cm:(beginwaarde*2.54),mm:(beginwaarde*25.4),nm:(beginwaarde*25400),mil:(beginwaarde*1000),miles:((beginwaarde*25.4)/1609344),yards:((beginwaarde*25.4)/914.4),feet:((beginwaarde*25.4)/304.8),inches:beginwaarde});
	}
	else if(boxaction.value == 'calculatorarea')
	{
		temp['km2']		=({km2:beginwaarde,hectares:(beginwaarde*100),m2:(beginwaarde*10000),cm2:(beginwaarde*100000000),mm2:(beginwaarde*1000000000000),miles2:(beginwaarde*0.386102159),acres:(beginwaarde*247.105381),yrd2:(beginwaarde*1195990.05),ft2:(beginwaarde*10763910.4),in2:((beginwaarde*1.5500031)/1000000000)});
		temp['hectares']	=({km2:(beginwaarde/100),hectares:beginwaarde,m2:(beginwaarde*10000),cm2:(beginwaarde*100000000),mm2:(beginwaarde*10000000000),miles2:(beginwaarde*0.00386102158542446),acres:(beginwaarde*2.47105381467165),yrd2:(beginwaarde*11959.9004630108),ft2:(beginwaarde*107639.104167097),in2:(beginwaarde*15500031.000062)});
		// temp['hectares']	=({km2:(beginwaarde/100),hectares:beginwaarde,m2:(beginwaarde*1000000),cm2:(beginwaarde*10000000000),mm2:(beginwaarde*100000000000000),miles2:((beginwaarde*3.86102159)/1000),acres:(beginwaarde*2.47105381),yrd2:(beginwaarde*11959.9005),ft2:(beginwaarde*107639.104),in2:(beginwaarde*15500031)});
		temp['m2']		=({km2:(beginwaarde/1000000),hectares:(beginwaarde/10000),m2:beginwaarde,cm2:(beginwaarde*10000),mm2:(beginwaarde*1000000),miles2:((beginwaarde*3.86102159)/10000000),acres:((beginwaarde*2.47105381)/10000),yrd2:(beginwaarde*1.19599005),ft2:(beginwaarde*10.7639104),in2:(beginwaarde*1550.0031)});
		temp['cm2']		=({km2:(beginwaarde/10000000000),hectares:(beginwaarde/100000000),m2:(beginwaarde/10000),cm2:beginwaarde,mm2:(beginwaarde*10000),miles2:((beginwaarde*3.86102159)/100000000000),acres:((beginwaarde*2.47105381)/100000000),yrd2:((beginwaarde*1.19599005)/10000),ft2:((beginwaarde*1.07639104)/1000),in2:(beginwaarde*0.15500031)});
		temp['mm2']		=({km2:(beginwaarde/1000000000000),hectares:(beginwaarde/10000000000),m2:(beginwaarde/1000000),cm2:(beginwaarde/100),mm2:beginwaarde,miles2:((beginwaarde*3.86102159)/10000000000000),acres:((beginwaarde*2.47105381)/10000000000),yrd2:((beginwaarde*1.19599005)/1000000),ft2:((beginwaarde*1.07639104)/100000),in2:((beginwaarde*1.5500031)/1000)});
		temp['miles2']		=({km2:(beginwaarde*2.58998811),hectares:(beginwaarde*258.998811),m2:(beginwaarde*2589988.11),cm2:(beginwaarde*(2.58998811*10000000000)),mm2:(beginwaarde*258998811),miles2:beginwaarde,acres:(beginwaarde*640),yrd2:(beginwaarde*3097600),ft2:(beginwaarde*27878400),in2:(beginwaarde*4014489600)});
		temp['acres']		=({km2:(beginwaarde*0.00404685642),hectares:(beginwaarde*0.404685642),m2:(beginwaarde*4046.85642),cm2:(beginwaarde*40468564.2),mm2:(beginwaarde*(4.04685642*1000000000)),miles2:(beginwaarde*0.0015625),acres:beginwaarde,yrd2:(beginwaarde*4840),ft2:(beginwaarde*43560),in2:(beginwaarde*6272640)});
		temp['yrd2']		=({km2:((beginwaarde*8.3612736)/10000000),hectares:((beginwaarde*8.3612736)/100000),m2:(beginwaarde*0.83612736),cm2:(beginwaarde*8361.2736),mm2:(beginwaarde*836127.36),miles2:((beginwaarde*3.22830579)/10000000),acres:(beginwaarde*0.00020661157),yrd2:beginwaarde,ft2:(beginwaarde*9),in2:(beginwaarde*1296)});
		temp['ft2']		=({km2:((beginwaarde*9.290304)/100000000),hectares:((beginwaarde*9.290304)/1000000),m2:(beginwaarde*0.09290304),cm2:(beginwaarde*929.0304),mm2:(beginwaarde*92903.04),miles2:((beginwaarde*3.58700643)/100000000),acres:((beginwaarde*2.29568411)/100000),yrd2:(beginwaarde*0.111111111),ft2:beginwaarde,in2:(beginwaarde*144)});
		temp['in2']		=({km2:((beginwaarde*6.4516)/10000000000),hectares:((beginwaarde*6.4516)/100000000),m2:((beginwaarde*6.4516)/10000),cm2:(beginwaarde*6.4516),mm2:(beginwaarde*645.16),miles2:((beginwaarde*2.49097669)/10000000000),acres:((beginwaarde*1.59422508)/10000000),yrd2:(beginwaarde*0.000771604938),ft2:(beginwaarde*0.00694444444),in2:beginwaarde});
	}
	else if(boxaction.value == 'calculatorvolume')
	{
		temp['m3']		=({m3:beginwaarde,liters:(beginwaarde*1000),cl:(beginwaarde*100000),cm3:(beginwaarde*1000000),yrd3:(beginwaarde*1.30795062),ft3:(beginwaarde*35.3146667),UK_gallon:(beginwaarde*219.969157),US_gallon:(beginwaarde*264.172051),UK_pints:(beginwaarde*1759.75326),US_pints:(beginwaarde*2113.37641),UK_ounces:(beginwaarde*35195.0652),US_ounces:(beginwaarde*33814.0226),in3:(beginwaarde*61023.7441)});
		temp['liters']		=({m3:(beginwaarde/1000),liters:beginwaarde,cl:(beginwaarde*100),cm3:(beginwaarde*1000),yrd3:(beginwaarde/764.554858),ft3:(beginwaarde/28.3168466),UK_gallon:(beginwaarde/4.54609188),US_gallon:(beginwaarde/3.7854118),UK_pints:(beginwaarde*1.75975326),US_pints:(beginwaarde*2.11337641),UK_ounces:(beginwaarde*35.1950652),US_ounces:(beginwaarde*33.8140226),in3:(beginwaarde*61.0237441)});
		temp['cl']		=({m3:(beginwaarde/100000),liters:(beginwaarde/100),cl:beginwaarde,cm3:(beginwaarde*10),yrd3:(beginwaarde/76455.4858),ft3:(beginwaarde/2831.68466),UK_gallon:(beginwaarde/454.609188),US_gallon:(beginwaarde/378.54118),UK_pints:(beginwaarde/56.8261485),US_pints:(beginwaarde/47.3176475),UK_ounces:(beginwaarde/2.84130742),US_ounces:(beginwaarde/2.95735297),in3:(beginwaarde/1.6387064)});
		temp['cm3']		=({m3:(beginwaarde/1000000),liters:(beginwaarde/1000),cl:(beginwaarde/10),cm3:beginwaarde,yrd3:(beginwaarde/764554.858),ft3:(beginwaarde/28316.8466),UK_gallon:(beginwaarde/4546.09188),US_gallon:(beginwaarde/3785.4118),UK_pints:(beginwaarde/568.261485),US_pints:(beginwaarde/473.176475),UK_ounces:(beginwaarde/28.4130742),US_ounces:(beginwaarde/29.5735297),in3:(beginwaarde/16.387064)});
		temp['yrd3']		=({m3:(beginwaarde/1.30795062),liters:(beginwaarde*764.554858),cl:(beginwaarde*76455.4858),cm3:(beginwaarde*764554.858),yrd3:beginwaarde,ft3:(beginwaarde*27),UK_gallon:(beginwaarde*168.178488),US_gallon:(beginwaarde*201.974025),UK_pints:(beginwaarde*1345.4279),US_pints:(beginwaarde*1615.7922),UK_ounces:(beginwaarde*26908.5581),US_ounces:(beginwaarde*25852.6752),in3:(beginwaarde*46656)});
		temp['ft3']		=({m3:(beginwaarde/35.3146667),liters:(beginwaarde*28.3168466),cl:(beginwaarde*2831.68466),cm3:(beginwaarde*28316.8466),yrd3:(beginwaarde/27),ft3:beginwaarde,UK_gallon:(beginwaarde*6.22883288),US_gallon:(beginwaarde*7.48051945),UK_pints:(beginwaarde*49.8306631),US_pints:(beginwaarde*59.8441556),UK_ounces:(beginwaarde*996.613262),US_ounces:(beginwaarde*957.506489),in3:(beginwaarde*1728)});
		temp['UK_gallon']	=({m3:(beginwaarde/219.969157),liters:(beginwaarde*4.54609188),cl:(beginwaarde*454.609188),cm3:(beginwaarde*4546.09188),yrd3:(beginwaarde/168.178488),ft3:(beginwaarde/6.22883288),UK_gallon:beginwaarde,US_gallon:(beginwaarde*1.20095042),UK_pints:(beginwaarde*8),US_pints:(beginwaarde*9.60760333),UK_ounces:(beginwaarde*160),US_ounces:(beginwaarde*153.721653),in3:(beginwaarde*277.419547)});
		temp['US_gallon']	=({m3:(beginwaarde/264.172051),liters:(beginwaarde*3.7854118),cl:(beginwaarde*378.54118),cm3:(beginwaarde*3785.4118),yrd3:(beginwaarde/201.974025),ft3:(beginwaarde/7.48051945),UK_gallon:(beginwaarde/1.20095042),US_gallon:beginwaarde,UK_pints:(beginwaarde*6.66139075),US_pints:(beginwaarde*8),UK_ounces:(beginwaarde*133.227815),US_ounces:(beginwaarde*128),in3:(beginwaarde*231.000001)});
		temp['UK_pints']	=({m3:(beginwaarde/1759.75326),liters:(beginwaarde/1.75975326),cl:(beginwaarde*56.8261485),cm3:(beginwaarde*568.261485),yrd3:(beginwaarde/1345.4279),ft3:(beginwaarde/49.8306631),UK_gallon:(beginwaarde/8),US_gallon:(beginwaarde/6.66139075),UK_pints:beginwaarde,US_pints:(beginwaarde*1.20095042),UK_ounces:(beginwaarde*20),US_ounces:(beginwaarde*19.2152067),in3:(beginwaarde*34.6774434)});
		temp['US_pints']	=({m3:(beginwaarde/2113.37641),liters:(beginwaarde/2.1133764),cl:(beginwaarde*47.3176475),cm3:(beginwaarde*473.176475),yrd3:(beginwaarde/1615.7922),ft3:(beginwaarde/59.8441556),UK_gallon:(beginwaarde/9.60760333),US_gallon:(beginwaarde/8),UK_pints:(beginwaarde/1.20095042),US_pints:beginwaarde,UK_ounces:(beginwaarde*16.6534769),US_ounces:(beginwaarde*16),in3:(beginwaarde*28.8750001)});
		temp['UK_ounces']	=({m3:(beginwaarde/35195.0652),liters:(beginwaarde/35.1950652),cl:(beginwaarde*2.84130742),cm3:(beginwaarde*28.4130742),yrd3:(beginwaarde/26908.5581),ft3:(beginwaarde/996.613262),UK_gallon:(beginwaarde/160),US_gallon:(beginwaarde/133.227815),UK_pints:(beginwaarde/20),US_pints:(beginwaarde/16.6534769),UK_ounces:beginwaarde,US_ounces:(beginwaarde/1.0408423),in3:(beginwaarde*1.73387217)});
		temp['US_ounces']	=({m3:(beginwaarde/33814.0226),liters:(beginwaarde/33.8140226),cl:(beginwaarde*2.95735297),cm3:(beginwaarde*29.5735297),yrd3:(beginwaarde/25852.6752),ft3:(beginwaarde/957.506489),UK_gallon:(beginwaarde/153.721653),US_gallon:(beginwaarde/128),UK_pints:(beginwaarde/19.2152067),US_pints:(beginwaarde/16),UK_ounces:(beginwaarde*1.0408423),US_ounces:beginwaarde,in3:(beginwaarde*1.80468751)});
		temp['in3']		=({m3:(beginwaarde/61023.7441),liters:(beginwaarde/61.0237441),cl:(beginwaarde*1.6387064),cm3:(beginwaarde*16.387064),yrd3:(beginwaarde/46656),ft3:(beginwaarde/1728),UK_gallon:(beginwaarde/277.419547),US_gallon:(beginwaarde/231.000001),UK_pints:(beginwaarde/34.6774434),US_pints:(beginwaarde/28.8750001),UK_ounces:(beginwaarde/1.73387217),US_ounces:(beginwaarde/1.80468751),in3:beginwaarde});
	}	
	else if(boxaction.value == 'calculatorweight')
	{
		temp['tons']		=({tons:beginwaarde,kg:(beginwaarde*1000),g:(beginwaarde*1000000),carats:(beginwaarde*5000000),mg:(beginwaarde*1000000000),pounds:(beginwaarde*2204.62262),tr_oz:(beginwaarde*32150.7466),ounces:(beginwaarde*35273.9619),pennyweigths:(beginwaarde*643014.931),grains:(beginwaarde*15432358.4)});
		temp['kg']		=({tons:(beginwaarde/1000),kg:beginwaarde,g:(beginwaarde*1000),carats:(beginwaarde*5000),mg:(beginwaarde*1000000),pounds:(beginwaarde*2.20462262),tr_oz:(beginwaarde*32.1507466),ounces:(beginwaarde*35.2739619),pennyweigths:(beginwaarde*643.014931),grains:(beginwaarde*15432.3584)});
		temp['g']		=({tons:(beginwaarde/1000000),kg:(beginwaarde/1000),g:beginwaarde,carats:(beginwaarde*5),mg:(beginwaarde*1000),pounds:(beginwaarde/453.59237),tr_oz:(beginwaarde/31.1034768),ounces:(beginwaarde/28.3495231),pennyweigths:(beginwaarde/1.55517384),grains:(beginwaarde*15.4323584)});
		temp['carats']		=({tons:(beginwaarde/5000000),kg:(beginwaarde/5000),g:(beginwaarde/5),carats:beginwaarde,mg:(beginwaarde*200),pounds:(beginwaarde/2267.96185),tr_oz:(beginwaarde/155.517384),ounces:(beginwaarde/141.747616),pennyweigths:(beginwaarde/7.7758692),grains:(beginwaarde*3.08647167)});
		temp['mg']		=({tons:(beginwaarde/1000000000),kg:(beginwaarde/1000000),g:(beginwaarde/1000),carats:(beginwaarde/200),mg:beginwaarde,pounds:(beginwaarde/453592.37),tr_oz:(beginwaarde/31103.4768),ounces:(beginwaarde/28349.5231),pennyweigths:(beginwaarde/1555.17384),grains:(beginwaarde/64.79891)});
		temp['pounds']		=({tons:(beginwaarde/2204.62262),kg:(beginwaarde/2.20462262),g:(beginwaarde*453.59237),carats:(beginwaarde*2267.96185),mg:(beginwaarde*453592.37),pounds:beginwaarde,tr_oz:(beginwaarde*14.5833333),ounces:(beginwaarde*16),pennyweigths:(beginwaarde*291.666667),grains:(beginwaarde*7000)});
		temp['tr.oz']		=({tons:(beginwaarde/32150.7466),kg:(beginwaarde/32.1507466),g:(beginwaarde*31.1034768),carats:(beginwaarde*155.517384),mg:(beginwaarde*31103.4768),pounds:(beginwaarde/14.5833333),tr_oz:beginwaarde,ounces:(beginwaarde*1.09714286),pennyweigths:(beginwaarde*20),grains:(beginwaarde*480)});
		temp['ounces']		=({tons:(beginwaarde/35273.9619),kg:(beginwaarde/35.2739619),g:(beginwaarde*28.3495231),carats:(beginwaarde*141.747616),mg:(beginwaarde*28349.5231),pounds:(beginwaarde/16),tr_oz:(beginwaarde/1.09714286),ounces:beginwaarde,pennyweigths:(beginwaarde*18.2291667),grains:(beginwaarde*437.5)});
		temp['pennyweights']	=({tons:(beginwaarde/643014.931),kg:(beginwaarde/643.014931),g:(beginwaarde*1.55517384),carats:(beginwaarde*7.7758692),mg:(beginwaarde*1555.17384),pounds:(beginwaarde/291.666667),tr_oz:(beginwaarde/20),ounces:(beginwaarde/18.2291667),pennyweigths:beginwaarde,grains:(beginwaarde*24)});
		temp['grains']		=({tons:(beginwaarde/15432358.4),kg:(beginwaarde/15432.3584),g:(beginwaarde/15.4323584),carats:(beginwaarde/3.08647167),mg:(beginwaarde*64.79891),pounds:(beginwaarde/7000),tr_oz:(beginwaarde/480),ounces:(beginwaarde/437.5),pennyweigths:(beginwaarde/24),grains:beginwaarde});
	}
		

	var waarde = temp[van.value][naar.value];
	waarde = Math.round(100*waarde)/100;
	//vul de waarde antwoord in tenzij enter leeg is dan moet antwoord ook leeg zijn.
	if(enter.value == '' || waarde == 'undefined')  waarde = '';
	
	answer.value = waarde;
}

function verfgebruik()
{
	// het gaat om waarden 1 2 3 en 4
	
	var textA = document.forms['frmForm'].firstValue;
	var textB = document.forms['frmForm'].secondValue;
	var textC = document.forms['frmForm'].thirdValue;
	var textD = document.forms['frmForm'].fourthValue;
	
	// controleer of het eerste getal is wat wordt ingevuld
	var index = 0;
	if (textA.value == '' || textA.disabled == true) index++;
	if (textB.value == '' || textB.disabled == true) index++;
	if (textC.value == '' || textC.disabled == true) index++;
	if (textD.value == '' || textD.disabled == true) index++;
	
	if (index < 2)
	{
		if (textA.value == '' || textA.disabled == true)
		{
			textA.value = '';
			//textA.value = Math.round(textA.value * 100) / 100;
			//textA.disabled = true;
			//textA.className = 'text-disabled';
		}
		else if (textB.value == '' || textB.disabled == true)
		{
			textB.value = (textD.value / (textC.value * 100 * (100 / textA.value))) * 100000
			textB.value = Math.round(textB.value * 100) / 100;
			textB.disabled = true;
			textB.className = 'text-disabled';
		}
		else if (textC.value == '' || textC.disabled == true)
		{
			textC.value = textD.value / (100 * (textB.value / 100000) * (100 / textA.value))
			textC.value = Math.round(textC.value * 100) / 100;
			textC.disabled = true;
			textC.className = 'text-disabled';
		}
		else
		{
			textD.value = textC.value * 100 * (textB.value / 100000) * (100 / textA.value)
			textD.value = Math.round(textD.value * 100) / 100;
			textD.disabled = true;
			textD.className = 'text-disabled';
		}
	}
	/*
	A = ?
	B = (D / (C * 100 * (100 / A))) * 100000
	C = D / (100 * (B / 100000) * (100 / A))
	D = C * 100 * (B / 100000) * (100 / A)
	*/
}

function allesaan()
{
	var textA = document.forms['frmForm'].firstValue;
	var textB = document.forms['frmForm'].secondValue;
	var textC = document.forms['frmForm'].thirdValue;
	var textD = document.forms['frmForm'].fourthValue;
	
	textA.disabled = false;
	textB.disabled = false;
	textC.disabled = false;
	textD.disabled = false;
	
	textA.className = 'text';
	textB.className = 'text';
	textC.className = 'text';
	textD.className = 'text';
}

function controle(naam,tekst){
	//controleer eerst of alle tekens die ingevuld zijn letters zijn.
	var goed = tekst.match(/[^0-9.]/gi);
	//als er iets in zit zorg dan dat alle rare dingen eruit worden gehaald en zet de waarde terug in het goede vakje.

	var nieuwe_tekst = tekst;

	if(goed != null)
	{
		nieuwe_tekst = tekst.replace(/[^0-9.]/gi,'');
		var v = document.forms['frmForm'][naam];
		v.value = nieuwe_tekst;
		
		var taal = document.forms['frmForm'].language;
		/*
		if(taal.value == 'nl') alert("Vul alleen cijfers in");
		if(taal.value == 'en') alert("Vul alleen cijfers in(en)");
		if(taal.value == 'de') alert("Vul alleen cijfers in(de)");*/
	}
}

function calcPressure(input) {

    unitin = input.name



    input.value = parseFloat(input.value)

    if(input.value == null || input.value == "NaN") {

       input.value = "1"

    }

    if(input.value < 0) {

       input.value -= (2*input.value)

    }

    flowfactor = new Array()

    flowfactor["MPa"] = 1000000    

    flowfactor["psi"] = 6894.64975



    if (unitin != "psi"){

       document.forms['frmForm'].psi.value = format(input.value*flowfactor[input.name]/flowfactor["psi"], 0)

    }

    if (unitin != "MPa"){

       document.forms['frmForm'].MPa.value = format(input.value*flowfactor[input.name]/flowfactor["MPa"], 2)

    }

}

// Format results to defines decimals



function format(expr, decplaces){

   if (expr < 0.001 || expr > 9999999){

      if (expr < 0.001){

         number = "<0.001"

      }

      if (expr > 9999999){

         number = ">9.9 million"

      }

   }

   else {

      number = parseFloat(Math.round(expr*Math.pow(10, decplaces))/Math.pow(10, decplaces))

   }

   return number

}

function calcViscose()
{
	var kinematisch		= document.forms['frmForm'].kinematisch;
	var dynamisch		= document.forms['frmForm'].dynamisch;
	var soort		= document.forms['frmForm'].soortelijk;
	/*
	var kinematischantw	= document.forms['frmForm'].kinematischantw;
	var dynamischantw	= document.forms['frmForm'].dynamischantw;
	var unitantw		= document.forms['frmForm'].unitantw;*/
	/*if(kinematisch.value == '') kinematisch.value =0;
	if(dynamisch.value == '') dynamisch.value =0;
	if(soort.value == '') soort.value =0;*/
	
	//antwoord kinematisch = dynamisch/soortelijk
	if(dynamisch.value > 0 && soort.value > 0)
	document.forms['frmForm'].kinematischantw.value = (dynamisch.value/soort.value);
	else
	document.forms['frmForm'].kinematischantw.value = 0
	
	//antwoord dynamisch =ALS(C5="";C4*C6;C5)
	if(dynamisch.value != '')
	document.forms['frmForm'].dynamischantw.value = dynamisch.value;
	else
	document.forms['frmForm'].dynamischantw.value = (kinematisch.value*soort.value)
	
	// antwoord unit =ALS(C9<2100;MACHT(2,71828182845904;(1,1187+(0,8542*(LN((0,1938*C9)+36))-0,0443*(MACHT(LN((0,1938*C9)+36);2)))));MACHT(2,71828182845904;(1,8118+(0,596*(LN((0,1938*C9)+36))-0,0206*(MACHT(LN((0,1938*C9)+36);2))))))
	var macht = 0;
	if(document.forms['frmForm'].dynamischantw.value < 2100)
	macht = (1.1187+(0.8542*(Math.log((0.1938*document.forms['frmForm'].dynamischantw.value)+36))-0.0443*(Math.pow(Math.log((0.1938*document.forms['frmForm'].dynamischantw.value)+36),2))));
	else
	macht = (1.8118+(0.596*(Math.log((0.1938*document.forms['frmForm'].dynamischantw.value)+36))-0.0206*(Math.pow(Math.log((0.1938*document.forms['frmForm'].dynamischantw.value)+36),2))));
	
	if(macht > 0)
	document.forms['frmForm'].unitsantw.value = Math.round(Math.pow(2.71828182845904,macht));
	else
	document.forms['frmForm'].unitsantw.value = 0;

}

/*-----------------------------------------------------------------------------
 * Function     : (EXTERNAL)   f32Dewpoint 
 * Description  : Berechnet den Taupunkt
 *
 * Parameter    :  float32 f32Humi  | Feuchte
 *                 float32 f32Temp  | Temperatur
 * Return Value :                   | Resultat 
 *-------------------------------------------------------------------------- */
function dauwpunt()
{
	// alert("voorlopig is deze functie nog niet in werking");
	
	var textA = document.forms['frmForm'].firstValue; // temperatuur °C (float32 f32Temp)
	var textB = document.forms['frmForm'].secondValue; // luchtvochtigheid % (float32 f32Humi)
	var textC = document.forms['frmForm'].thirdValue; // dauwpunt °C (f32Dewpoint)
	
	// zet de variabelen weer terug naar die van het script
	var f32Temp = textA.value;
	var f32Humi = textB.value;
	var f32Dewpoint = textC.value;

	var f32Dewpoint = f32DP(f32Humi, f32Temp);

	if (textA.value != '' && textB.value != '') {
		textC.value = f32Dewpoint;
	}
	else {
		textC.value = 0;
	}
	
	/* OUD SCRIPT
	if (textA.value != '' && textB.value != '') {
		textC.value = (237.7 * ((17.27 * textA.value)/(237.7 + parseInt(textA.value))) + Math.log(textB.value/100))   /   (17.27 - ((17.27 * textA.value)/(237.7 + parseInt(textA.value))) + Math.log(textB.value/100));
		textC.value = Math.round(textC.value * 10) / 10;
	}
	else {
		TextC.value = 0;
	}
	*/	
}
/*-----------------------------------------------------------------------------
 * Function     : (INTERNAL)   f32DP 
 * Description  : Berechnet den Taupunkt
 *
 * Parameter    :  float32 f32Humi  | Feuchte
 *                 float32 f32Temp  | Temperatur
 * Return Value :  float32 f32TN    | Resultat 
 *-------------------------------------------------------------------------- */
function f32DP(f32Humi, f32Temp)
{
  var f32TN; 
  var f32FA;
  var f32FAH;
  var f32ADJ;
  var f32PartialDr;
  var f32Store_PS;
  
  // De formule om Celsius in Kelvin om te zetten is K = C + 273.16
  var KELVIN = 273.16;
  f32TN = (parseInt(f32Temp) + KELVIN);
  
  var f32PartialDr = f32Partial_Pressure_E (f32Humi, f32Temp);
  
  do
  {
		f32Store_PS = f32Calc_PS(f32TN);
    f32FA = f32Store_PS - f32PartialDr;
    f32TN = f32TN + 0.05;
    f32Store_PS = f32Calc_PS(f32TN);
    f32FAH = f32Store_PS - f32PartialDr;
    f32TN = f32TN - 0.05;
    f32ADJ = 0.05 * f32FA / (f32FAH - f32FA);
    f32TN = f32TN - f32ADJ;
    //TODO: Protection from continuous loop insert here
  } while (Math.abs(f32ADJ) >= 0.02);
		f32TN = f32TN - KELVIN;
		return f32TN;
}

/*-----------------------------------------------------------------------------
 * Function     : (INTERNAL)   f32Partial_Pressure_E 
 * Description  : Berechnet den Partialdruck
 *                (Partial Pressure of Water Vapor, E)
 *
 * Parameter    :  float32 f32Humi  | Feuchte
 *                 float32 f32Temp  | Temperatur
 * Return Value :                   | Partialdruck
 *-------------------------------------------------------------------------- */
function f32Partial_Pressure_E (f32Humi, f32Temp)
{
	var f32Result;
  if (parseInt(f32Humi) < 0.001) f32Humi = 0.001;
  f32Result = f32Saturation_Pressure_Ew (f32Temp); 
  return f32Humi / 100 * f32Result; 
}

/*-----------------------------------------------------------------------------
 * Function     : (EXTERNAL)   f32Saturation_Pressure_Ew 
 * Description  : Liefert den Wasserdampf-Sättigungsdruck
 *                (Water Vapor Saturation Pressure, Ew)
 *
 * Parameter    :  float32 f32Humi  | Feuchte
 *                 float32 f32Temp  | Temperatur
 * Return Value :                   | Sättigungsdruck
 *-------------------------------------------------------------------------- */
function f32Saturation_Pressure_Ew (f32Temp)
{
	var KELVIN = 273.16;
  return f32Calc_PS(parseInt(f32Temp) + KELVIN); 
}

/*-----------------------------------------------------------------------------
 * Function     : (INTERNAL)   f32Calc_PS 
 * Description  : Berechnet den Sättigungsdruck
 *
 * Parameter    :  float32 f32TX   | die Temperatur in Kelvin
 * Return Value :  float32 f32PN   | Sättigungsdruck 
 *-------------------------------------------------------------------------- */
function f32Calc_PS(f32TX){
  var f32LNP;
  var f32PN;
  var f32temp = f32TX;
  
	var f32KC = -2892.3693;
	var f32KD = -2.892736;
	var f32KE = -4.9369728E-3;
	var f32KF = 5.606905E-6;
	var f32KG = -4.645869E-9;
	var f32KH = 3.7874E-12;
	var f32KI = 19.4260451;

  // var fTMMK51 = 1;
  f32LNP  =  f32KC / f32TX;
	f32LNP  += f32KD * log10(f32TX); 								
  f32LNP  += f32KE * f32TX;
  f32temp *= f32TX;
  f32LNP  += f32KF * f32temp; 
  f32temp *= f32TX;
  f32LNP  += f32KG * f32temp;
  f32temp *= f32TX;  
  f32LNP  += f32KH * f32temp;
  f32LNP  += f32KI;
	f32PN    = Math.pow(10, f32LNP);	//  was exp10, maar geen javascript synoniem van kunnen vinden
  // fTMMK51 = 0;
	return f32PN;
}
function log10(x) { return Math.LOG10E * Math.log(x); }