//Copyright czpiotr@poczta.onet.pl
function strzero(num,dec)
{
	if(isNaN(num))return'';
	//num=Number(num)
	
	var p=Math.pow(10,dec);
	num=(Math.round(num * p))/p;	
	if(num==0)
		return 0;
	st=num.toString(10);
	
	poz_kr = st.lastIndexOf('.'); //pozycja kropki
	if (poz_kr==-1) 
	{ 
		st+='.'; 
		qqq=dec; 
	}
	else 
		qqq = dec - st.length + poz_kr+1;
	
	for (p=0; p < qqq; p++)	
		st += '0';
	return st;
}

//Copyright czpiotr@poczta.onet.pl.nospam
//formatuje string. Na wyjsciu tylko liczby i '.'
function liczba99(wart)
{
	var kropka=0;
	var zwr='';
	var dl=wart.length;
	var zmiana=false;
	
	for (var j=0; j < dl; j++)
	{
		znak=wart.charAt(j);
	
		switch (znak)
			{
			case ",":
				zmiana=true;
			case ".":
				{if(kropka==0){zwr+="."; kropka++;}
				else zmiana=true;}
				break;
			default:
				if(isNaN(parseInt(znak)))zmiana=true;
				else zwr+=znak;
			}
	}
	
	if(zwr.charAt(0)=='.')	
		return(zwr="0"+zwr);
	//if(zwr.charAt(0)=='0' && zwr.charAt(1)!='.' && zwr.length>1) return(zwr=zwr.substring(1,zwr.length));
	
	if(!zmiana) 
		return(false);
	if(zwr=='') 
		zwr = ' ';
	return(zwr);
}

function check() 
{
	var err=false;
	var opl_not=0;
	var oplata_skarbowa=0;
	var VAT_od_taksy=0;
	var prowizja=0;
	var prowizja_procent=0;
	var oplata_sadowa=0;
	var oplaty_dod=0;
	var suma=0;
	var wyp;	//wypisy z akt w [zlotych]
	
	form=document.forms['f_kalk'];
	wartosc=form.elements['c_n'].value;
	waluta=form.elements['Wartosc_currency'].options[form.elements['Wartosc_currency'].selectedIndex].value;
	
	tmpq=liczba99(wartosc);
	if(tmpq)
	{
		wartosc=parseFloat(tmpq);
		form.elements['c_n'].value=tmpq;
	}
	
	if(wartosc.length==0) 
		c_n=0;
	else 
		c_n = parseFloat(wartosc) * parseFloat(waluta);
	
	oplata_skarbowa=c_n * 0.02;
	form.elements['oplataskarbowa'].value=strzero(oplata_skarbowa,2);
	
	
	if(c_n <= 0)	opl_not = 0;
	else if(c_n<=   3000)	opl_not= 100;
	else if(c_n<=  10000)	opl_not= 100+(c_n-   3000)*0.03;
	else if(c_n<=  30000)	opl_not= 310+(c_n-  10000)*0.02;
	else if(c_n<=  60000)	opl_not= 710+(c_n-  30000)*0.01;
	else if(c_n<=1000000)	opl_not=1010+(c_n-  60000)*0.005;
	else opl_not = 5710+(c_n-1000000)*0.0025;
	
	if(opl_not > 1829.24*6)
		opl_not = 1829.24*6;
	
	
	/* ROZPORZADZENIE MINISTRA SPRAWIEDLIWOSCI
	z dnia 28 czerwca 2004 r. w sprawie maksymalnych stawek taksy notarialnej.
	
	nie wiecej jednak niz szesciokrotnosc przecietnego miesiecznego wynagrodzenia w gospodarce narodowej w poprzednim roku,
	oglaszanego do celów emerytalnych w Dzienniku Urzedowym Rzeczypospolitej Polskiej "Monitor Polski"przez Prezesa Glównego UrzStat.,
	stosowanego poczynajac od drugiego kwartalu kazdego roku przez okres jednego roku.
	*/
	
	if(form.elements['oplata1'].checked) 
	{
		opl_not=opl_not/2;
	}
	//else if(form.elements['oplata2'].checked) {}
	
	opl_not=Math.round(opl_not*100)/100;
	
	form.elements['taxNotar'].value=strzero(opl_not,2);
	
	VAT_od_taksy=Math.round(opl_not * 22)/100;
	form.elements['vatodtaksy'].value=strzero(VAT_od_taksy,2);
	
	wyp= 400;
	form.elements['wypisy'].value=strzero(wyp,2);
	
	prowizja_procent=form.elements['prowizjaprocent'].value;
	tmpq=liczba99(prowizja_procent);
	if(tmpq)
	{
		prowizja_procent=parseFloat(tmpq)
		form.elements['prowizjaprocent'].value=tmpq;
	}
	
	prowizja_procent=parseFloat(prowizja_procent);
	if(prowizja_procent.length==0) prowizja_procent=0;
/*	
	if(form.elements['of_bezp'].checked)
	{
		form.elements['prowizjaprocent'].style.background='#eeeeee';
		prowizja=0;
	}
	else
	{
	*/
		form.elements['prowizjaprocent'].style.background='white';	
		prowizja=Math.round(c_n * prowizja_procent)/100;
		//if(prowizja<1500)prowizja=1500;
	
	
	form.elements['prowizja'].value=strzero(prowizja,2);
	
	
	form.elements['vat_prow'].value=strzero(prowizja*0.22,2);
	
	if(form.elements['oplata2'].checked)
		form.elements['wpis_do_kw'].checked = false;
	
	if(form.elements['oplata1'].checked && (!form.elements['wpis_do_kw'].checked))
	{
		oplata_sadowa=0;
		form.elements['oplatasadowa'].value="nie ma";
	}
	else //if(form.elements['oplata2'].checked)
	{
	/*
		if(c_n <=10000)	oplata_sadowa=c_n * 0.08;
	else if(c_n <=50000)	oplata_sadowa=800 + ((c_n - 10000) * 0.07);
	else if(c_n <=100000)	oplata_sadowa=3600 + ((c_n - 50000) * 0.06);
	else					oplata_sadowa=6600 + ((c_n - 100000) * 0.05);
	
		oplata_sadowa=oplata_sadowa * 0.2;
	
		if(oplata_sadowa < 20) oplata_sadowa=20;
		if(oplata_sadowa > 100000) oplata_sadowa=100000;
		if(c_n <=0) oplata_sadowa=0;
	*/
		
		oplata_sadowa=200;
		
		form.elements['oplatasadowa'].value=strzero(oplata_sadowa,2);
	}
	
	
	wyp=form.elements['wypisy'].value;
	
	tmpq=liczba99(wyp);
	if(tmpq)
	{
		wyp=tmpq;
		form.elements['wypisy'].value=strzero(wyp,2);
	}
	
	//alert("o_sk"+oplata_skarbowa +" on"+ opl_not +" Vat"+ VAT_od_taksy +" o_sa"+ oplata_sadowa +" prow"+ prowizja +" wypisy"+ wyp)
	
	oplaty_dod=oplata_skarbowa + opl_not + VAT_od_taksy + oplata_sadowa + prowizja*1.22 + Number(wyp);
	form.elements['oplatydod'].value=strzero(oplaty_dod,2);
	
	suma=c_n + oplaty_dod;
	form.elements['suma'].value=strzero(suma,2);
}

function wybrano(r1,r2)
{
	if(r1.checked)r2.checked=false;
}


function druk()
{
    window.open('kalkulator_druk.php', '', 'width=600,height=650,left=1,top=1,toolbar=no,status=no');
}