var Miesiace = new Array();
	Miesiace[1] 			= 'styczeń';
	Miesiace[2] 			= 'luty';
	Miesiace[3] 			= 'marzec';
	Miesiace[4] 			= 'kwiecień';
	Miesiace[5] 			= 'maj';
	Miesiace[6] 			= 'czerwiec';
	Miesiace[7] 			= 'lipiec';
	Miesiace[8] 			= 'sierpień';
	Miesiace[9] 			= 'wrzesień';
	Miesiace[10] 			= 'październik';
	Miesiace[11] 			= 'listopad';
	Miesiace[12] 			= 'grudzień';
	
	
var MLen = new Array();
	MLen[0] 			= 0;
	MLen[1] 			= 31;
	MLen[2] 			= 28;
	MLen[3] 			= 31;
	MLen[4] 			= 30;
	MLen[5] 			= 31;
	MLen[6] 			= 30;
	MLen[7] 			= 31;
	MLen[8] 			= 31;
	MLen[9] 			= 30;
	MLen[10] 			= 31;
	MLen[11] 			= 30;
	MLen[12] 			= 31;

/* liczenie odsetek */
function interest(K,P,t,n){
//	document.write('Ods: '+K+' : '+P+' : '+t+' : '+n);
	// K stan zadluzenie
	// P roczna stopa procentowa
	// t liczba dni w okresie za ktory obliczne sa odsetki
	// n wielkosc stala dla stopy procentowej - domyslnie 365
	var O=K*(P/100)*(t/n);
	return O;
}



/* liczenie odsetek annuitetowych */
function interest_ann(K,P,t){
//	document.write(K+' : '+P);
	// K stan zadluzenie
	// P roczna stopa procentowa
	// t liczba dni w okresie za ktory obliczne sa odsetki
	// n wielkosc stala dla stopy procentowej - domyslnie 365
	var O =(K*(P/100)*t)/365;
	return O;
}

/* raty annuitetowe */
function fann(Ka,S,n){
//	document.write(Ka+' : '+S+' : '+n+'<br>');
	Fann=(Ka*S)/(1-Math.pow((1+S),(n*-1)));
	return Fann;
}



/* liczenie pierwszej raty malejacej */
function fmal(K,N,Type) {
	if(Type==0) {
		var R=(K-((Math.round((K/N)*100)/100)*(N-1)));
	}
	else {
		var R=K/N;
	}
	return R;
}

/* liczenie wspolczynnika dla rat annuitetowych */
function sskFactor(P) {
	// P  roczna stopa procentowa
	// C  czestotliwosc platnosci (w miesiacach)
	// t1 liczba dni od wylaty kredytu do terminu pierwszej wplaty
	// t1360

	//	DS	= mktime(0,0,0,DStart[2],DStart[3],DStart[1]);				// czas unixowy daty zlozenia kredytu
	//	DE	= mktime(0,0,0,(DStart[2]+DEnd),DStart[3],DStart[1]);		// czas unixowy daty zlozenia kredytu
	//	t 	= round((DE-DS)/86400);
	var S=(P/100)*(30.45/365); 
	return S;
}
/* obliczanie rat i symulacja */
function CountRate(KrSum,KrOpr,KrOkr,Type,m,rsd) {
	
//	document.write(KrSum+' : '+KrOpr+' : '+KrOkr+' : '+Type);
	
	var S			= sskFactor(KrOpr);
	var Ods			= new Array();
	var Rate 		= new Array();
	var Sums 		= new Array();
	var A 		=    fann(KrSum,S,KrOkr)
	var ArrSum		= 0;
	var OdsSum		= 0;
	var TypRaty		= (Type=='Równe')?'ann':'mal';
    var CurM =m
	var Result	= new Array();
	restOfDays=rsd
	CurM=(CurM+2>12)? CurM+2-12 : CurM+2;
    A = countInterest(KrSum,KrOpr,KrOkr,A,CurM);
	 
	switch(TypRaty) {
		case 'ann':
		
		for(i=1;i<=KrOkr;i++) {
			
			if(CurM>12) {CurM=1;}
			Ods[i]	= 0;
			Rate[i]	= 0;
			
			if(restOfDays>0 && i==1)
			{
			MDays	= MLen[CurM]+restOfDays;
			}else{
			MDays	=MLen[CurM];
			}

				Ods[i]	= interest_ann((KrSum-ArrSum),KrOpr,MDays);
				if(i==KrOkr)
				{
				Sums[i]=	KrSum-ArrSum+Ods[i]
				Rate[i]	= KrSum-ArrSum//-Ods[i];
                }
				else
				{
				Sums[i]=A
				Rate[i]	= A-Ods[i];
				}
				ArrSum += Rate[i];
				OdsSum += Ods[i];
				CurM++;
			
		//document.write('       Odsetki: '+Sums[i]+'<br>');			
		}
		break;
		
		case 'mal':
		//CurM	= 1//;Miesiac;

		for(i=1;i<=KrOkr;i++) {

			if(CurM>12) {CurM=1;}

			Ods[i]	= 0;
			Rate[i]	= 0;
			//MDays	= 20;
			if(restOfDays>0 && i==1)
			{
			MDays	= MLen[CurM]+restOfDays;
			}else{
			MDays	= MLen[CurM];
			}

			if(i>1) {
				Rate[i]	= fmal(KrSum,KrOkr,1);
				Ods[i]	= interest_ann(KrSum-ArrSum,KrOpr,MDays);
			}
			else {
				Rate[1]	= fmal(KrSum,KrOkr,1);
				Ods[i]	= interest_ann(KrSum-ArrSum,KrOpr,MDays);
			}

			ArrSum  += Rate[i];
			OdsSum  += Ods[i];
			Sums[i]		= Math.round((Rate[i]+Ods[i])*100)/100;
			CurM++;
//			document.write('       Odsetki: '+Ods[i]+'<br>');
		}
		break;
	}
	Result[0]	= Sums;
	Result[1]	= Ods;
	Result[2]	= ArrSum;
	Result[3]	= Sums[1]
	Result[4]	= OdsSum;

	return Result;
}
function countInterest(KrSum,KrOpr,KrOkr,s,m)
{
	CurM	= m;
	var Rate 		= new Array();
	var Ods			= new Array();
	var d
	var ArrSum		= 0;
	
		for(i=1;i<4; i++) {
			if(CurM>12) {CurM=1;}
			Rate[i]	= 0;
			Ods[i]	= 0;
			if(restOfDays>0 && i==1)
			{
			MDays	= MLen[CurM]+restOfDays;
			}else{
			MDays	= MLen[CurM];
			}
			Ods[i]	= interest_ann((KrSum-ArrSum),KrOpr,MDays);
			Rate[i]	= s-Ods[i];
			ArrSum += Rate[i];
			d=(s<Ods[i])? Ods[i] : s
			CurM++;
			
		}
		
		return d
		
		

}

function kalk(Data,k,m,r,P) {

	var Data0 = 0;
	var Data1 = 0;
	var txt
	if(P[2]=='Równe'){
		txt='Wysokość raty miesięcznej:'
	}else{
		txt='Wysokość pierwszej raty:'
	}
	var HTML  = 	'<style type="text/css">	A { text-decoration: none; font-weight: bold; font-family:Tahoma, Helvetica, sans-serif; color:#000; font-size:11px;} TR.Headers	{font-family:Tahoma, Helvetica, sans-serif; color:#000; font-size:10px;}	TR.Data 	{font-family:Tahoma, Helvetica, sans-serif; color:#000; font-size:11px; }</style>';
		HTML +=		'<table>';
		HTML +=		'	<tr class="Headers">';
		HTML +=		'		<td  align="center">Wynik symulacji kredytowej</td>';
		HTML +=		'	</tr>';		
		HTML +=		'<tr>';
		HTML +=		'	<td bgcolor="#FFFFFF"><br><br>';
		HTML +=		'		<table cellpadding="4" border="0">';
		HTML +=		'			<tr class="Data">';
		HTML +=		'				<td width="200" align="right">Zdolność kredytowa:</td>';				
		HTML +=		'				<td>'+P[0]+'</td>';				
		HTML +=		'			</tr>';				
		HTML +=		'			<tr class="Data">';
		HTML +=		'				<td width="200" align="right">Wnioskowany kredyt:</td>';				
		HTML +=		'				<td>'+P[1]+'</td>';				
		HTML +=		'			</tr>';				
		HTML +=		'			<tr class="Data">';
		HTML +=		'				<td width="200" align="right">'+txt+'</td>';				
		HTML +=		'				<td>'+P[3]+'</td>';				
		HTML +=		'			</tr>';		
		HTML +=     '           <tr class="Data">';
		HTML +=		'				<td width="200" align="right">Rzeczywista stopa procentowa:</td>';				
		HTML +=		'				<td>'+P[6]+'</td>';				
		HTML +=		'			</tr>';
 		HTML +=		'			<tr class="Data">';
		HTML +=		'				<td width="200" align="right">Rodzaj raty</td>';				
		HTML +=		'				<td>'+P[2]+'</td>';				
		HTML +=		'			</tr>';				
		HTML +=		'			<tr class="Data">';
		HTML +=		'				<td width="200" align="right">Koszt kredytu:</td>';				
		HTML +=		'				<td>'+P[5]+'</td>';				
		HTML +=		'			</tr>';				

		HTML +=		'		</table>';				
		HTML +=		'	</td>';		
		HTML +=		'</tr>';		
		HTML +=		'<tr>';
		HTML +=		'	<td bgcolor="#FFFFFF">';
		HTML +=		'		<table cellpadding="1" border="0">';
		HTML +=		'			<tr class="Headers">';
		HTML +=		'				  <td bgcolor="#999999" align="center">Rata</td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Miesiąc</td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Kapitał</td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Odsetki</td>';
		HTML +=		'				  <td bgcolor="#999999" align="center" width="160">Rata kredytu (w PLN)</td>';
		HTML +=		'			</tr>';
		HTML +=		'			<tr class="Headers">';
		HTML +=		'				  <td bgcolor="#999999" align="center" colspan="5" align="center">'+r+'</td>';
		HTML +=		'			</tr>';		

	for(i=1;i<Data[0].length;i++) {
		HTML +=		'			<tr class="Data">';
		HTML +=		'				  <td bgcolor="#CCCCCC">'+i+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC">'+Miesiace[m]+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC" width="100">'+(Math.round((Data[0][i]-Data[1][i])*100)/100)+' PLN'+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC" width="100">'+(Math.round(Data[1][i]*100)/100)+' PLN'+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC" width="100">'+(Math.round(Data[0][i]*100)/100)+' PLN'+'</td>';
		HTML +=		'			</tr>';		
		Data0+=parseFloat(Data[0][i]);
		Data1+=parseFloat(Data[1][i]);
		m++;
		
		if(m>12 && i<Data[0].length-1){
			m = 1;
			r++;		
			HTML +=		'			<tr class="Headers">';
			HTML +=		'				  <td  bgcolor="#999999" align="center" colspan="5">'+r+'</td>';
			HTML +=		'			</tr>';		
		}
	}
		HTML +=		'			<tr class="Headers">';
		HTML +=		'				  <td bgcolor="#999999" align="center"></td>';
		HTML +=		'				  <td bgcolor="#999999" align="center"></td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Kapitał </td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Suma odsetek</td>';
		HTML +=		'				  <td bgcolor="#999999" align="center">Suma rat (w PLN)</td>';
		HTML +=		'			</tr>';
		HTML +=		'			<tr class="Data">';
		HTML +=		'				  <td bgcolor="#CCCCCC"></td>';
		HTML +=		'				  <td bgcolor="#CCCCCC"></td>';
		HTML +=		'				  <td bgcolor="#CCCCCC">'+k+' PLN'+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC">'+(Math.round(Data1*100)/100)+' PLN'+'</td>';
		HTML +=		'				  <td bgcolor="#CCCCCC">'+(Math.round((parseFloat(k)+Data1)*100)/100)+' PLN'+'</td>';
		HTML +=		'			</tr>';
		HTML +=		'		</table>';

		HTML +=		'	</td>';
		HTML +=		'</tr>';
		HTML +=		'<tr><td colspan="5" align="center"><br><a href="javascript: print();">Kliknij, aby wydrukować dokument &raquo;&raquo;</a><br></td></tr>'
		HTML +=		'</table>';
		HTML +=		'<br><br>';		
//	document.write('nnno i git');	
	imgPopup(HTML)
}


function imgPopup(HTML) {
	x = "TITLEBAR=0,LOCATION=0,RESIZE=0, WIDTH=450, HEIGHT=500, SCROLLBARS=1";
	newwindow = window.open("","Kalkulacja",x);
	newwindow.document.open();
	newwindow.document.write('<html><head><title>Kalkulacja</title></head><body bgcolor="#FFFFFF">'+HTML+'</body></html>');
	newwindow.document.close();
}

