
function recorta(n,d){if(d==0){return Math.round(n);}else{var p=Math.pow(10,d);n=n*p;n=Math.round(n);return n/p;}}
function type1sel()
{var e=document.getElementById('type1');if(e.selectedIndex>=0){var key=e.options[e.selectedIndex].value;var l=document.getElementById('type2');switch(key){case'm':l.options.length=0;for(var i in med_names[key]){l.options[l.length]=new Option(med_names[key][i][1],med_names[key][i][0],false,(i==0));}
l.style.visibility='visible';type2sel();break;case'd':l.style.visibility='hidden';var l1=document.getElementById('units1');l1.options.length=0;var l2=document.getElementById('units2');l2.options.length=0;for(var i in cur_values){l1.options[l1.length]=new Option(cur_values[i][2],cur_values[i][1],false,i==0);l2.options[l2.length]=new Option(cur_values[i][2],cur_values[i][1],false,i==1);}
break;default:l.style.visibility='hidden';break;}}}
function type2sel()
{var e=document.getElementById('type2');if(e.selectedIndex>=0){var key=e.options[e.selectedIndex].value;var l=document.getElementById('units1');l.options.length=0;for(var i in med_units[key]){var s=med_units[key][i][0];if(s!='')s=' ('+s+')';l.options[l.length]=new Option(med_units[key][i][2]+s,i,false,med_units[key][i][3]);}
l=document.getElementById('units2');l.options.length=0;for(var i in med_units[key]){var s=med_units[key][i][0];if(s!='')s=' ('+s+')';l.options[l.length]=new Option(med_units[key][i][2]+s,i,false,(i==0));}}}
function convert_med(input)
{var result=0;var e=document.getElementById('type2');var key=e.options[e.selectedIndex].value;var u1=document.getElementById('units1');if(u1.selectedIndex==-1)
return;var unit_a=u1.options[u1.selectedIndex].value;u2=document.getElementById('units2');if(u2.selectedIndex==-1)
return;var unit_b=u2.options[u2.selectedIndex].value;if(key=='tm'){switch(med_units[key][unit_a][1]){case'k':result=input-273.15;break;case'c':result=input;break;case'f':result=((input-32)*5)/9
break;case'r':result=1.25*input;break;case'R':result=((5*input)/9)-273.15;break;}
switch(med_units[key][unit_b][1]){case'k':result+=273.15;break;case'f':result=((result*9)/5)+32;break;case'r':result=result/1.25;break;case'R':result=((result*9)/5)+491.67;break;}
result=recorta(result,2);}else{var factor_a=med_units[key][unit_a][1];var factor_b=med_units[key][unit_b][1];result=(input*factor_b)/factor_a;}
return result;}
function convert_cur(input)
{var result=0;var u1=document.getElementById('units1');if(u1.selectedIndex==-1)
return;var unit_a=u1.options[u1.selectedIndex].value;u2=document.getElementById('units2');if(u2.selectedIndex==-1)
return;var unit_b=u2.options[u2.selectedIndex].value;result=(input*unit_b)/unit_a;return(recorta(result,3)==0?result:recorta(result,3));}
function convert(){var result=0;var input=document.getElementById('ival').value;if(!(/^((([-\+]?\d+)|([-\+]?\d+[,.]\d*))([eE][-\+]?\d+)?)$/.test(input))){alert(txt_nan);return;}
input=input.replace(/,/,'.');input=input.replace(/E/,'e');input=parseFloat(input);if(!isFinite(input)){alert(txt_nan);return;}
var e=document.getElementById('type1');var key1=e.options[e.selectedIndex].value;switch(key1){case'm':result=convert_med(input);break;case'd':result=convert_cur(input);break;}
var output=document.getElementById('ires');var original=parseFloat(result);result=Math.round(original*1000)/1000;output.value=result;}
function interchange()
{var u1=document.getElementById('units1');var u2=document.getElementById('units2');var sel1=u1.selectedIndex;var sel2=u2.selectedIndex;if(sel1<0||sel2<0)return false;u1.selectedIndex=sel2;u2.selectedIndex=sel1;}
if(window.addEventListener)window.addEventListener("load",type1sel,false);else if(window.attachEvent)window.attachEvent("onload",type1sel);else window.onload=type1sel;