<!--
    today=new Date();
    y0=today.getFullYear();

    
function zaokr( Liczba, Dokladnosc)
{
  if ( Dokladnosc < 0.0001 ) { Dokladnosc = 0.0001 };
  var Liczba_str = "" + Math.round(Liczba / Dokladnosc);
  var Liczba_len = Liczba_str.length;
  var poz = Math.log(1/Dokladnosc)/Math.log(10);
  if (Dokladnosc < 1)
  {
    return parseFloat(Liczba_str.substring(0, Liczba_len - poz) + "." + Liczba_str.substring(Liczba_len - poz, Liczba_len));
  }
  else
  {
    return Math.round(Dokladnosc * Liczba_str);
  }

}
function waluta_scr(Liczba)
{
  var Waluta = Math.round(Liczba*100);
  var Waluta_str = "" + Waluta;
  var Waluta_len = Waluta_str.length;
  return Waluta_str.substring(0, Waluta_len - 2) + "." + Waluta_str.substring(Waluta_len - 2, Waluta_len);
}

function Analizuj(info)
{
  var p_temp = ""+info;
  var p1_temp = null;
  var p2_temp = null;
  if (p_temp.indexOf(",")>-1)
  {  var p1_temp=p_temp.substring(0,p_temp.indexOf(","));
     var p2_temp=p_temp.substring(p_temp.indexOf(",")+1);
     p_temp=p1_temp+"."+p2_temp;
  };
  p_temp = parseFloat(p_temp);
  if (isNaN(p_temp)) {p_temp = 0};
  return p_temp;
}

function WyliczRaty()
{
  document.Kalkulator.Kredyt.value = document.Kalkulator.Wartosc.value-document.Kalkulator.Wplatawlasna.value;
  document.Kalkulator.Kredyt.value = waluta_scr(Math.abs( zaokr( Analizuj( document.Kalkulator.Kredyt.value ) , 0.01 )));
  document.Kalkulator.Rat.value = Math.abs( zaokr( Analizuj( document.Kalkulator.Rat.value ) , 1 ));
  if ( document.Kalkulator.Rat.value < 1 )
  {
     document.Kalkulator.Rat.value = 1;
  };
  document.Kalkulator.Stopa_r.value = waluta_scr(Math.abs( zaokr( Analizuj( document.Kalkulator.Stopa_r.value ) , 0.01 )));
  if (document.Kalkulator.Stopa_r.value > 0)
   {var Stopa_m =  document.Kalkulator.Stopa_r.value / 100 / 12;
     document.Kalkulator.Rata_const.value = waluta_scr(zaokr( Stopa_m * document.Kalkulator.Kredyt.value * ( 1 + 1 / ( Math.pow(Stopa_m + 1, document.Kalkulator.Rat.value) -1)) , 0.01));
     fLiczRatyVar( Stopa_m );}
  else
    {document.Kalkulator.Rata_const.value = waluta_scr(zaokr( document.Kalkulator.Kredyt.value / document.Kalkulator.Rat.value , 0.01));
     document.Kalkulator.Ods_sum_const.value = 0;
     fLiczRatyVar( 0 );}
}

function fLiczRatyVar( Sm )
{
  document.Kalkulator.Rata_max.value = waluta_scr(zaokr( document.Kalkulator.Kredyt.value * ( Sm + 1 / document.Kalkulator.Rat.value ) , 0.01));
  document.Kalkulator.Rata_min.value = waluta_scr(zaokr( document.Kalkulator.Kredyt.value * ( Sm + 1 ) / document.Kalkulator.Rat.value , 0.01));
}
//-->