/*************************************************************************************************************
*************************************************************************************************************
Copyright:
Eine Veröffentlichung meiner Scripte im Internet oder in Printmedien ist auch in Auszügen ohne meine Genehmigung nicht erlaubt. 
Meine Scripte und das Layout unterliegen dem Urheberrecht.  Bei einem Verstoss werde ich umgehend rechtliche Schritte einleiten. 
Ersparen Sie sich also Ärger und Kosten!
 
Dipl.-Ing. Norbert Heydorn
Onlinerecner für private Finanzen
http://www.nachrechnen.de

*************************************************************************************************************
*************************************************************************************************************/

var z=1;

darlehen=new Array();
zinssatz=new Array();
tilgung=new Array();
sondertilgung=new Array();
monatslast=new Array();
restschuld10=new Array();
restschuld15=new Array();
laufzeit_ende=new Array();
aufwand=new Array();

//--------------------------------------------------------------------------------------------------------

function clear_ergebnis(v)
{
document.h3_rechner.monatslast[v].value="";
document.h3_rechner.laufzeit_ende[v].value="";
document.h3_rechner.aufwand[v].value="";
document.h3_rechner.restschuld10[v].value="";
document.h3_rechner.restschuld15[v].value="";
}


//----------------------------------------------------------------------------------------
function auslesen(wert)
{
wert=wert.replace(/,/,".");wert=parseFloat(wert);if (isNaN(wert)) wert=0;
if (wert<0)wert=Math.abs(wert);
return wert
}
//--------------------------------------------------------------------------------------------------------


function berechnung()
{

for (v=0;v<=2;v++)
{
var restschuld10=0;
var restschuld15=0;

x=auslesen(document.h3_rechner.darlehen[v].value);document.h3_rechner.darlehen[v].value=x;
x=auslesen(document.h3_rechner.zinssatz[v].value);document.h3_rechner.zinssatz[v].value=x;
x=auslesen(document.h3_rechner.tilgung[v].value);document.h3_rechner.tilgung[v].value=x;
x=auslesen(document.h3_rechner.sondertilgung[v].value);document.h3_rechner.sondertilgung[v].value=x;

if(document.h3_rechner.tilgung[v].value <= 0)
{
alert("Tilgungsfreie Darlehen werden mit diesem Hypothekenrechner nicht berechnet!");
document.h3_rechner.tilgung[v].focus();
return;
}

var zinssatz=parseFloat(document.h3_rechner.zinssatz[v].value)/100;if(zinssatz<=0)zinssatz=0.000000001;
var tilgung=parseFloat (document.h3_rechner.tilgung[v].value)/100;
var sondertilgung=parseFloat (document.h3_rechner.sondertilgung[v].value);
var saldo0=parseFloat(document.h3_rechner.darlehen[v].value); 
var saldo=parseFloat(document.h3_rechner.darlehen[v].value);
var monatslast=(zinssatz+tilgung)*saldo0/12;

var mz=0,summesondertilgung=0,aufwand=0,laufzeit_ende=0;

var mz=1;
document.h3_rechner.monatslast[v].value=(Math.round(monatslast*100)/100);

for (i=1;i<=1200;i++)
{
	if(i== 1200){alert("Die Daten sind unrealistisch! Überprüfen Sie die Eingaben.");document.h3_rechner.zinssatz[i].focus();return;}
	if (saldo<=0){break;}
	if (mz==12)
	{
	saldo=saldo-sondertilgung;
	summesondertilgung=summesondertilgung+sondertilgung;	
	}
	mz=mz+1;
	if(mz==13)
	{mz=1};
	tilgung=monatslast-saldo*zinssatz/12;
	saldo=saldo-tilgung;
	aufwand=aufwand+monatslast;
	if (saldo<=0){aufwand=aufwand+saldo;saldo=0;}
	laufzeit_ende=i/12;


	if (i==120)restschuld10=saldo;
	if (i==180)restschuld15=saldo;
}


document.h3_rechner.laufzeit_ende[v].value=(Math.floor(laufzeit_ende*10))/10;
document.h3_rechner.aufwand[v].value=Math.round(aufwand+summesondertilgung);
document.h3_rechner.restschuld10[v].value=Math.round(restschuld10);
document.h3_rechner.restschuld15[v].value=Math.round(restschuld15);

}
}


/*---------------------------------------------------------------*/
function clear_ausgabe()
{
document.rl_rechner.rente67.value="";
document.rl_rechner.rente67i.value="";
document.rl_rechner.brutto67.value="";
document.rl_rechner.info.value="";
}



/*---------------------------------------------------------------*/
function auslesen(wert)
{
wert=wert.replace(/,/,".");wert=parseFloat(wert);if (isNaN(wert)) wert=0;
return wert
}

/*---------------------------------------------------------------*/

function berechne()
{
var rp=0;
var dm=30879;
var rw0=27.20;
var rv_grenz=5300;
var jetzt = new Date();
var jahr = jetzt.getFullYear();
var geb=eval(document.rl_rechner.geboren.value);
dauer=geb+68-jahr;
rp1=(jahr-geb-16)*2;
alter=(jahr-geb);

brutto=auslesen(document.rl_rechner.brutto30.value);document.rl_rechner.brutto30.value=brutto;
steigerung=eval(document.rl_rechner.steigerung.value)/100;
inr=eval(document.rl_rechner.inflation.value)/100;
rap=eval(document.rl_rechner.anpassung.value)/100;
rp0=auslesen(document.rl_rechner.rentenpunkte_bisher.value);document.rl_rechner.rentenpunkte_bisher.value=rp0;
if (rp0>rp1)
{
alert("Sie sind jetzt "+alter+" Jahre alt und können noch keine "+rp0+" Rentenpunkte erworben haben!"+"\n"+"Auch für den unwahrscheinlichen Fall, dass Sie seit dem 16. Lebensjahr bereits den Maximalbeitrag einzahlen, hätten Sie erst "+rp1+" Rentenpunkte!"); 
document.rl_rechner.rentenpunkte_bisher.focus();

return;

}
rp=rp0;rw=rw0;
if (dauer<1)dauer=1;
for (i=1;i<=dauer;i++)
{
brutto=Math.round(brutto+brutto*steigerung);
rvbrutto=brutto;
dm=dm+dm*0.0098;
if (rvbrutto>=rv_grenz)rvbrutto=rv_grenz;
rp=Math.round(100*(rp+12*rvbrutto/dm))/100;
rw=Math.round(100*(rw+rw*rap))/100;
rv_grenz=rv_grenz+rv_grenz*0.0098;
}

rente67=rp*rw;
rente67i=rente67/Math.pow(1+inr,dauer);
document.rl_rechner.brutto67.value=brutto;
document.rl_rechner.rente67.value=Math.round(rente67);
document.rl_rechner.rente67i.value=Math.round(rente67i);

document.rl_rechner.info.value="Berechnungsbasis: Summe der Rentenpunkte "+rp+" und Rentenwertprognose "+rw.toFixed(2)+" Euro";

}

// -->