<!--

var kwota = 0;
var rat = 0;
var opr = 0;

var opm = 0;
var strata = 0;
var kap = 0;

var zkrat = 0;
var zkdoch = 0;
var zksamoch = 0;
var zkzob = 0;
var zkosob = 0;

var okno = null;

function doKropki( cos )
{
  var p = "" + cos;
  var p1 = null;
  var p2 = null;
  if ( p.indexOf(",") > -1 )
  {  var p1=p.substring( 0, p.indexOf( "," ) );
     var p2=p.substring( p.indexOf( "," ) + 1 );
     p=p1 + "." + p2;
  };
  p = parseFloat(p);
  if (isNaN(p)) {p = 0};
  return p;
}


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 rowno(Liczba)
{
  if(Liczba == 0) return "0.00";
  var W = Math.round(Liczba*100);
  var W_str = "" + W;
  var W_len = W_str.length;
  return W_str.substring(0, W_len - 2) + "." + W_str.substring(W_len - 2, W_len);
}

function male( )
{
  okno.document.write("<b class=h2>raty malejące</b></H1>");
  okno.document.write("<TABLE border=0 cellspacing=0 cellpadding=0><TR><TD class=oknotd1>numer raty</TD><TD class=oknotd1>część kapitałowa</TD><TD class=oknotd1>część odsetkowa</TD><TD class=oknotd11>wysokość raty</TD></TR>");
  var kumu = 0;
  var skap = 0;
  var sods = 0;
  var srat = 0;
  for( var i = 1; i < rat; i++ )
  {
    var cz_kap = kap;
    skap = skap + cz_kap;
    var cz_odset = zaokr( ( kwota - (( i -1 ) * kap ) ) * opm, 0.01 );
    sods = sods + cz_odset;
    var rata = cz_kap + cz_odset;
    srat = srat + rata;
    kumu = kumu + cz_kap;
    str = "<TR><TD class=oknotd2>" + i + "</TD><TD class=oknotd2>" + rowno(cz_kap) + "</TD><TD class=oknotd2>" + rowno(cz_odset) + "</TD><TD class=oknotd22>" + rowno(rata) + "</TD></TR>";
    okno.document.write( str );
  }
  cz_kap = zaokr( kwota - kumu, 0.01 );
  skap = skap + cz_kap;
  cz_odset = zaokr( cz_kap * opm, 0.01 );
  sods = sods + cz_odset;
  var rata = zaokr( cz_kap + cz_odset, 0.01 );
  srat = srat + rata;
  str = "<TR><TD class=oknotd2>" + i + "</TD><TD class=oknotd2>" + rowno(cz_kap) + "</TD><TD class=oknotd2>" + rowno(cz_odset) + "</TD><TD class=oknotd22>" + rowno(rata) + "</TD></TR>";
  okno.document.write( str );
  str = "<TR><TD class=oknotd3>SUMA</TD><TD class=oknotd3>" + rowno(skap) + "</TD><TD class=oknotd3>" + rowno(sods) + "</TD><TD class=oknotd33>" + rowno(srat) + "</TD></TR></TABLE>";
  okno.document.write( str );
}

function stale( )
{
  okno.document.write("<b class=h2>raty stałe</b></H1>");
  okno.document.write("<TABLE border=0 cellspacing=0 cellpadding=0><TR><TD class=oknotd1>numer raty</TD><TD class=oknotd1>część kapitałowa</TD><TD class=oknotd1>część odsetkowa</TD><TD class=oknotd11>wysokość raty</TD></TR>");
  var kumu = 0;
  var rata = strata;
  var kapital = kwota;
  var skap = 0;
  var sods = 0;
  var srat = 0;
  for( var i = 1; i < rat; i++ )
  {
    var cz_odset = zaokr( kapital * opm, 0.01 );
    sods = sods + cz_odset;
    var cz_kap = zaokr( rata - cz_odset, 0.01 );
    skap = skap + cz_kap;
    srat = srat + rata;
    kumu = kumu + cz_kap;
    kapital = kapital - cz_kap;
    str = "<TR><TD class=oknotd2>" + i + "</TD><TD class=oknotd2>" + rowno(cz_kap) + "</TD><TD class=oknotd2>" + rowno(cz_odset) + "</TD><TD class=oknotd22>" + rowno(rata) + "</TD></TR>";
    okno.document.write( str );
  }
  cz_kap = zaokr( kwota - kumu, 0.01 );
  skap = skap + cz_kap;
  cz_odset = zaokr( cz_kap * opm, 0.01 );
  sods = sods + cz_odset;
  rata = zaokr( cz_kap + cz_odset, 0.01 );
  srat = srat + rata;
  str = "<TR><TD class=oknotd2>" + i + "</TD><TD class=oknotd2>" + rowno(cz_kap) + "</TD><TD class=oknotd2>" + rowno(cz_odset) + "</TD><TD class=oknotd22>" + rowno(rata) + "</TD></TR>";
  okno.document.write( str );
str = "<TR><TD class=oknotd3>SUMA</TD><TD class=oknotd3>" + rowno(skap) + "</TD><TD class=oknotd3>" + rowno(sods) + "</TD><TD class=oknotd33>" + rowno(srat) + "</TD></TR></TABLE>";
  okno.document.write( str );
}


function jdformat( )
{
  if( isNaN( document.form1.kwota.value ) ) document.form1.kwota.value = 0;
  if( isNaN( document.form1.okres.value ) ) document.form1.okres.value = 0;
  if( isNaN( document.form1.stopa.value ) ) document.form1.stopa.value = 0;
  document.form1.kwota.value = rowno(Math.abs( zaokr( doKropki( document.form1.kwota.value ) , 0.01 )));
  document.form1.okres.value = Math.abs( zaokr( doKropki( document.form1.okres.value ) , 1 ));
  document.form1.stopa.value = rowno(Math.abs( zaokr( doKropki( document.form1.stopa.value ) , 0.01 )));
  kwota = document.form1.kwota.value;
  rat = document.form1.okres.value;
  opr = document.form1.stopa.value; 
}


function main( )
{
  jdformat( );
  opm = ( opr /12 /100 );
  strata = zaokr(opm * kwota /(1 - (Math.pow(opm + 1, -1 * rat))), 0.01);
  kap = zaokr( kwota / rat, 0.01 );

  if( okno != null )
  {
    okno.close( );
    okno = null;
  }
  
  okno = window.open( "", "NewWindow", "toollbar=0, location=0, width=480, height=480, resizable=0, scrollbars=1" );

  okno.document.write("<HTML><head><link href=style.css rel=stylesheet type=text/css></head><BODY bgcolor=#FCFCFC topmargin=0 leftmargin=0 marginwidth=0 marginheight=0><CENTER><div class=oknoheader><b class=oknonaw>Nawigator</b><b class=oknopt>.</b><b class=oknoinfo>info</b><br><b style=font-size:4pt;>&nbsp;</b><b class=oknoprz>Przewodnik dla kredytobiorców</b><br><br><b style=text-align:center;color:black;font-weight:normal;>http://www.nawigator.info  &middot; 337-12-80 &middot; 501-779-180 &middot; kredyty@nawigator.info</b></div> <H1 style=margin-bottom:10>Kalkulator Kredytowy ");
  
  if (document.form1.kapitalizacja.value == 1)
    stale( )
  else
    male( );

  okno.document.write("<br><div class=oknofooter><FORM><INPUT TYPE=BUTTON VALUE='Drukuj stronę'  style=font-size:9pt;font-family:Trebuchet MS;font-weight:bold; onClick='javascript:window.print()' name='ala'></FORM></div></CENTER></BODY></HTML>");
  okno.document.close();
}

function jdformat2( )
{
  if( isNaN( document.form2.okres.value ) ) document.form2.okres.value = 0;
  if( isNaN( document.form2.dochod.value ) ) document.form2.dochod.value = 0;
  if( isNaN( document.form2.wydatki_inne.value ) ) document.form2.wydatki_inne.value = 0;
  if( isNaN( document.form2.osob.value ) ) document.form2.osob.value = 0;
  document.form2.okres.value = Math.abs( zaokr( doKropki( document.form2.okres.value ) , 1 ));
  document.form2.dochod.value = rowno(Math.abs( zaokr( doKropki( document.form2.dochod.value ) , 0.01 )));
  document.form2.wydatki_inne.value = rowno(Math.abs( zaokr( doKropki( document.form2.wydatki_inne.value ) , 0.01 )));
  document.form2.osob.value = Math.abs( zaokr( doKropki( document.form2.osob.value ) , 1 ));
  zkrat = document.form2.okres.value * 12;
  zkdoch = document.form2.dochod.value;
  zksamoch = 0;
  if( document.form2[2].checked ) 
    zksamoch = 1; 
  zkzob = document.form2.wydatki_inne.value; 
  zkosob = document.form2.osob.value; 
}

function main2(zkopr, zkmiesz, zksam, zksm)
{
  jdformat2( );
  var opm = zkopr / 12 / 100;
  var ssm = 0;
  for( var i = 1; i <= zkosob; i++ )
  {
    switch( i )
    {
      case 1: ssm = ssm + zksm; break;
      case 2: ssm = ssm + zksm * 0.8; break;
      case 3: ssm = ssm + zksm * 0.7; break;
      default: ssm = ssm + zksm * 0.6;
    }
  }
  var rmax = zkdoch - zkmiesz - zkzob - ssm;
  if( zksamoch )
    rmax = rmax - zksam;
    rmax = parseFloat( rmax );
  if( rmax < 0 )
  {
    document.form2.kwota_stale.value = "Brak zdolnosci";  
    document.form2.kwota_male.value = "Brak zdolnosci";
    alert( "Przykro mi ale Twoje obciazenia miesieczne sa zbyt duze :(" );
  }
  else
  {
    kstale = 0;
    kstale = ( rmax * ( 1 - Math.pow( 1 + opm, -1 * zkrat ) ) ) / opm;
    kmale = 0;
    kmale = rmax * zkrat * 1200 / ( 1200 + zkopr * zkrat );
    document.form2.kwota_stale.value = rowno( zaokr( kstale, 0.01 ) );
    document.form2.kwota_male.value = rowno( zaokr( kmale, 0.01 ) );
  }
}

//-->