function get_selected(object){
	for (var i = 0; i < object.length; i++) {
			if (object[i].selected) return(object[i].value);
	}
}
function set_selected(object, t_value){
	for (var i = 0; i < object.length; i++) {
			if (object[i].value==t_value) object[i].selected="TRUE";
	}
}
function get_checked(objectName){
	var radios = document.getElementsByName(objectName);
	for (var i = 0; i < radios.length; i++)
	{
		if (radios[i].checked) return(radios[i].value);
	}
}
function set_checked(objectName, t_value){
	var radios = document.getElementsByName(objectName);
	for (var i = 0; i < radios.length; i++) {
			if (radios[i].value==t_value) radios[i].checked="TRUE";
	}
}
function changeLeasingType(type) {
		set_checked('leasing_type', type);
		if (type == 12) set_selected(document.getElementById('leasing_residualvalue'), 30);
		change();
}
function changeAdvance() {
		document.getElementById('leasing_advance').value=document.getElementById('leasing_advance_sum').value/document.getElementById('article_price').value * 100;
		change();
}
function changeAdvanceSum() {
		document.getElementById('leasing_advance_sum').value=document.getElementById('article_price').value*document.getElementById('leasing_advance').value / 100;
		change();
}
function change() {
	if(document.getElementById('leasing_interest').value.indexOf(','))
	{
		document.getElementById('leasing_interest').value=document.getElementById('leasing_interest').value.replace(",",'.');
	}
	if (get_checked('leasing_type') == 11)
	{
		set_selected(document.getElementById('leasing_residualvalue'), 0);
	}
	else if(get_selected(document.getElementById('leasing_residualvalue')) == 0)
	{
		set_selected(document.getElementById('leasing_residualvalue'), 30);
	}
	document.getElementById('leasing_advance_sum').value = document.getElementById('article_price').value * document.getElementById('leasing_advance').value / 100;
	if( (document.getElementById('leasing_interest').value == '') || (document.getElementById('article_price').value == '') )
	{
		document.getElementById('leasingBox').style.display = 'none';
		document.getElementById('noData').style.display = 'inline';
	}
	else
	{
	document.getElementById('leasingBox').style.display = 'inline';
	document.getElementById('noData').style.display = 'none';
	document.getElementById('month_payment').innerHTML = Math.round(((document.getElementById('leasing_interest').value / 100 / 12) * ((document.getElementById('article_price').value - document.getElementById('leasing_advance_sum').value)-((document.getElementById('article_price').value * get_selected(document.getElementById('leasing_residualvalue')) / 100) / (Math.pow((document.getElementById('leasing_interest').value / 100 / 12) + 1, get_selected(document.getElementById('leasing_period')))))) / (1 - (1 / Math.pow((document.getElementById('leasing_interest').value / 100 / 12) + 1, get_selected(document.getElementById('leasing_period')))))));
	}
}

function grafik(theURL,winName,features) {

var price = document.getElementById('article_price').value;
var advance = document.getElementById('leasing_advance').value;
var period = document.getElementById('leasing_period').value;
var interest = document.getElementById('leasing_interest').value;
var leasingType_check = get_checked('leasing_type');
if (leasingType_check == "11") {
var leasingType = "0";
}
if (leasingType_check == "12") {
var leasingType = "1";
}
var residualvalueselect = document.getElementById('leasing_residualvalue').value;

Calc(residualvalueselect, ((advance*price) / 100), price, interest, period, leasingType);

//alert(residualvalueselect);
//alert((advance*price) / 100);
//alert(price);
//alert(interest);
//alert(period);
//alert(leasingType);

/*window.open("https://hansa24.hansa.ee/cgi-bin/onliising/ongraph.jsp?leasingType=" + leasingType
+ "&price=" + price
+ "&carMakeNew=" + 26
+ "&carModel=" + 107
+ "&modelName=" + "00"
+ "&advance=" + advance
+ "&period=" + period
+ "&interest=" + interest
+ "&residualvalueselect=" + residualvalueselect
+ "", "hyundai_calc", "width=800,height=500,status=on,toolbar=no,scrollbars=1,menu=no");
*/
}  

//siit algab h�kk kristian 20.06.2005

 //compiled by Janis Zalitis
 //Vide Infra Grupa
 //2005.06.03
//
//Explanations:
//
//B1 - Leftover sum in %
//B2 - First payment
//B3 - Full sum of purchase
//B4 - Rate per year
//B5 - Term in months
//lease - Leasing type (0 => "Finance", 1 => "Operative")
//
//NOTE!!!
//1.NONE of the input values of function "Calc" should be rounded!
//Otherwise the calculator will show non-precise values.
//Rounding is built-in for the calulator.
//
//2.All values for Operative Leasing must contain PVN to be correct.
//
//3.To use this code correctly please see usage examples in HTML below.

function Calc(B1, B2, B3, B4, B5, lease) {

var B6, B7, pB1;



if (lease == 0)
B1 = 0;
else {
if (isNaN(B1))
	B1 = 0;
}

pB1 = B1;

B7 = B4 / 1200;
if (lease == 1){
B1 = B3 / 1.18 * B1 / 100;
B2 = B2 / 1.18;
B3 = B3 / 1.18;
B6 = ((B3 - B2) * B7) / (1 - Math.pow(1 + B7, -B5)) - (B1 * B7) / (Math.pow(1 + B7, B5) - 1);

} else {
B1 = B3 * B1 / 100;
B6 = ((B3 - B2) * B7) / (1 - Math.pow(1 + B7, -B5));

}	


 

Print(pB1, B2, B3, B4, B5, B6, lease);
}

function Print(rest, first, sum, prc, mn, pay, lease) {
var query = '?sum=' + sum + '&fst=' + first + '&prc=' + prc + '&mn=' + mn + '&pay=' + pay + '&tp=' + lease + '&obj=0&rest=' + rest + '&' + Math.random();
window.open('http://www.seb.lv/lv/private/services/trusts/leasinguni/calculators/leasing/graph-auto/' + query, null, "left=100,top=50,height=400,width=500,titlebar=no,status=no,toolbar=no,menubar=no,location=no,scrollbars=yes,resizable=yes");
}