/*
 * Copyright (c) 2009 Acadium Bastion (http://www.acadiumbastion.nl)
 * 
 * Version 1.0
 *
 * $LastChangedDate: 2009-12-02 16:06:32 +0100 (Tue, 02 December 2009) $
 */
function SetupSlider(c,a,e,d,f,b){
	$(c).slider({min:a,max:e,orientation:"horizontal",range:"min",step:d,slide:function(g,h){$(f).val(h.value);calculateMortgage()},value:b});$(f).numeric(".");$(f).val($(c).slider("value"));calculateMortgage()}


function SetSliderValue(a,b) {
	var c=b.value;
	var d=$(a).slider("min");
	var e=$(a).slider("max");
	if(c>d||c<e){
		$(a).slider("option","value",c);
		calculateMortgage()
		}
		}
		
		var brutoRenteJaarlast;
		var jaarlastFactor = 1.08 * 0.053; //1.08 is vaste factor, 0.053 is vast rentepercentage
		var restBedragIB52;
		var maxBelastbaarInkomenBox3 = 54367;
		var belastingVoordeel42;
		var belastingVoordeel52;
		var overlijdensRisicoVerzekeringJaar;
		var premieBanksparen;
		var totaleKosten;
		var nettoMaandlastenMaand;
		
		var cFactorMax=5.1;
		var cFactorHaalbaar=1.08;
		var cBaseValue=150000;
		var rInkomenTotaal=0;
		var rHypotheekMax=0;
		var rHypotheekHaalbaar=0;
		var rIsHypotheekHaalbaar=false;
		
		//Nieuwe constanten voor premie banksparen
		var uitgangspuntAankoopprijsVoorMaandlasten = 200000;
		var inlegBanksparen = 1621; 
		var overlijdensRisicoVerzekering = 116;
		
		
		function todecimal(a){if(a.indexOf(",-")>-1){a=a.substring(0,a.indexOf(",-"))}while(a.indexOf(".")>-1){a=a.replace(".","")}while(a.indexOf(",")>-1){a=a.replace(",","")}while(a.indexOf("-")>-1){a=a.replace("-","")}return a}
		
		function toEuro(a){a=a.toString().replace(/\$|\,/g,"");if(isNaN(a)){a="0"}sign=(a==(a=Math.abs(a)));a=Math.floor(a*100+0.50000000001);cents=a%100;a=Math.floor(a/100).toString();if(cents<10){cents="0"+cents}for(var b=0;b<Math.floor((a.length-(1+b))/3);b++){a=a.substring(0,a.length-(4*b+3))+"."+a.substring(a.length-(4*b+3))}if(cents=="00"){cents="-"}return(((sign)?"":"-")+a+","+cents)}
		
		function calculateMortgage(){
			var b=parseInt(todecimal(document.getElementById("amountInkomen").value));
			var a=parseInt(todecimal(document.getElementById("amountInkomenPartner").value));
			var c=parseInt(todecimal(document.getElementById("amountKoopsom").value));
			
			brutoRenteJaarlast = c * jaarlastFactor;
			restBedragIB52 = b - maxBelastbaarInkomenBox3;
			restBedragIB52 = restBedragIB52 <= 0 ? 0:restBedragIB52; // indien uitkomst negatief is, zet dan op 0.
			
			belastingVoordeel42 = brutoRenteJaarlast - restBedragIB52 > 0 ? (brutoRenteJaarlast - restBedragIB52) * 0.58 : 0;
			
			belastingVoordeel52 = restBedragIB52 > brutoRenteJaarlast ? brutoRenteJaarlast * 0.48 : restBedragIB52 * 0.48;
			
			premieBanksparen = c / uitgangspuntAankoopprijsVoorMaandlasten * inlegBanksparen;
			overlijdensRisicoVerzekeringJaar = c / uitgangspuntAankoopprijsVoorMaandlasten * overlijdensRisicoVerzekering;
			
			totaleKosten = belastingVoordeel42 + belastingVoordeel52 + premieBanksparen + overlijdensRisicoVerzekeringJaar; //Constante Premie banksparen + overlijdensverzekering
			nettoMaandlastenMaand = totaleKosten / 12;
			
			rInkomenTotaal=b+a;
						
			rHypotheekMax=rInkomenTotaal*cFactorMax;						
			
			rHypotheekHaalbaar=rHypotheekMax/cFactorHaalbaar;
			rIsHypotheekHaalbaar=(c<=rHypotheekHaalbaar);
			outputResults()
			};