function fnAlkohol() {
  var A_Mnozstvo = eval(document.FCalc.A_Mnozstvo.value);
  var A_Percento = eval(document.FCalc.A_Percento.value);
  var A_Hmotnost = eval(document.FCalc.A_Hmotnost.value);
  var A_Cas = eval(document.FCalc.A_Cas.value);
  var result = ((A_Mnozstvo * A_Percento * 0.79) / (A_Hmotnost* 0.7)) - (A_Cas* 0.15);
  var Timezero = ((A_Mnozstvo * A_Percento * 0.79) / (A_Hmotnost* 0.7)) / 0.15;
  if (result < 0) {
    result = "0";
    Timezero = "0";
  }
  else {
    if (isNaN(result) || (A_Mnozstvo>200) || (A_Percento>100) || (A_Hmotnost>250) || (A_Cas>72)) {
    if(alert('Chybné vstupné údaje. Ešte raz prosím.  \n\nPozor: nepoužívať desatinnú čiarku, ale bodku !'));
    return;
    }
    if (result > 0)  result = (Math.round(result*100))/100;
    if (Timezero > 0)  Timezero = Math.round(Timezero);
  }

  Timezero = Timezero - A_Cas;       //do vytriezvenia od teraz
  if (Timezero < 0) Timezero = "0";  //Už je triezvy

  document.FCalc.bacamount.value = result + " ‰";
  if (document.FCalc.bacamount.value.charAt(0) == '.')  {
	document.FCalc.bacamount.value = "0" + document.FCalc.bacamount.value;  //nulu pred des. čiarku
  }
  document.FCalc.Caszero.value = Timezero;
}

function fnPorod() {
  var den = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
  var mesiac = new Array("január","február","marec","apríl","máj","jún","júl","august","september","október","november","december");
  var r = eval(document.FCalc.P_Rok.options[document.FCalc.P_Rok.selectedIndex].value);
  var m = eval(document.FCalc.P_Mesiac.options[document.FCalc.P_Mesiac.selectedIndex].value);
  var d = eval(document.FCalc.P_Den.options[document.FCalc.P_Den.selectedIndex].value);
  var c = eval(document.FCalc.P_Cyklus.options[document.FCalc.P_Cyklus.selectedIndex].value);
  var cas = 280+c-28;

  if (r%4==0)
    { if ( ((m==1)&&(d>29)) || ((m!=1)&&(d>den[m])) ) { document.FCalc.porod.value="Chybný dátum"; return; } }
  else
    { if (d>den[m]) { document.FCalc.porod.value="Chybný dátum"; return; } }
  while (cas>den[m])
  {
    cas-=den[m];
    if ((m==1) && (r%4==0)) cas-=1;
    m+=1;
    if (m==12) { m=0; r+=1 };
  }
  d=d+cas;
  if (d>den[m]) { d-=den[m]; if ((m==1)&&(r%4==0)) d-=1; m+=1; if (m==12) { m=0; r+=1; } }
  datum=d+". "+mesiac[m]+" "+r;
  document.FCalc.porod.value=datum;
}

function fnPlodne_dni() {
  var den = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
  var mesiac = new Array("január","február","marec","apríl","máj","jún","júl","august","september","október","november","december");
  var r = eval(document.FCalc.Pd_Rok.options[document.FCalc.Pd_Rok.selectedIndex].value);
  var m = eval(document.FCalc.Pd_Mesiac.options[document.FCalc.Pd_Mesiac.selectedIndex].value);
  var d = eval(document.FCalc.Pd_Den.options[document.FCalc.Pd_Den.selectedIndex].value);
  var c1 = eval(document.FCalc.Pd_Cyklus1.options[document.FCalc.Pd_Cyklus1.selectedIndex].value);
       min=c1; max=c1;
  min = min-20; max = max-12;

  if (r%4==0)
    { if ( ((m==1)&&(d>29)) || ((m!=1)&&(d>den[m])) ) { document.FCalc.plodne_dni.value="Chybný dátum"; return; } }
  else
    { if (d>den[m]) { document.FCalc.plodne_dni.value="Chybný dátum"; return; } }

  rx=r; mx=m; dx=d;
  while (min>den[m])
  {
    min-=den[m];
    if ((m==1) && (r%4==0)) min-=1;
    m+=1;
    if (m==12) { m=0; r+=1 };
  }
  d=d+min;
  if (d>den[m]) { d-=den[m]; if ((m==1)&&(r%4==0)) d-=1; m+=1; if (m==12) { m=0; r+=1; } }
  datum1=d+". "+mesiac[m]+" "+r;

  while (max>den[mx])
  {
    max-=den[mx];
    if ((mx==1) && (rx%4==0)) max-=1;
    mx+=1;
    if (mx==12) { mx=0; rx+=1 };
  }
  dx=dx+max;
  if (dx>den[mx]) { dx-=den[mx]; if ((mx==1)&&(rx%4==0)) dx-=1; mx+=1; if (mx==12) { mx=0; rx+=1; } }
  datum2=dx+". "+mesiac[mx]+" "+rx;
  document.FCalc.plodne_dni.value=datum1+" - "+datum2;
}

function fnBMI() {
  var B_Hmotnost = eval(document.FCalc.BMI_Hmotnost.value);
  var B_Vyska = eval(document.FCalc.BMI_Vyska.value);
  var result = ((B_Hmotnost/B_Vyska/B_Vyska)*10000);

  if (isNaN(result) || (B_Hmotnost>280) || (B_Vyska<105) || (B_Vyska>235)) {
    result = "Chybné vstupné údaje.Znovu prosím."; }
  else {
  if (result > 0) {
    result = (Math.round(result*100))/100; }
  }
  document.FCalc.BMI.value = result;
}