<html><head><title>Calcolo del mutuo © br1 - 2002</title>
<script>
if (self.name==top.name)
{
nomeFile=document.location.href.substr(document.lo cation.href.lastIndexOf("/")+1)
document.write('<frameset cols="300,*">' )
document.write('<frame name=frame1 src='+nomeFile+'?a>' )
document.write('<frame name="riep" src="about
:blank">')
document.write('</frameset>')
}
// (c) br1 - 2002
// calcolo rata costante posticipata
function rata_CP(bf_cr,bf_ir,bf_ar,bf_nr) {
// parametri capitale,interesse,anni,nrateanno
return (bf_cr * A_N_I(bf_ir / bf_nr / 100,bf_nr * bf_ar) + .5)
}
// fattore per il calcolo dell'ammortamento
function A_N_I(bf_ip,bf_np) {
// PARAMETRI interesse del periodo, numero di periodi
return (bf_ip * Math.pow((1 + bf_ip), bf_np)) / (Math.pow((1 + bf_ip), bf_np) - 1)
}
function calcola() {
c = parseFloat("0"+document.myForm.capitale.value); // capitale
i = parseFloat("0"+document.myForm.interesse.value); // interesse
a = parseFloat("0"+document.myForm.anni.value); // numero anni
n = parseFloat("0"+document.myForm.nrateanno.value); // N.rate all'anno
r = Math.floor(rata_CP(c,i,a,n)); // rata calcolata
document.myForm.rata.value=r;
// creazione della pagina di stampa
riga="<style>TD{text-align:right;padding:2 10 2 10;}</style>"
riga+="<table border=1 cellspacing=0><th>N.</th><th>Rata</th><th>Q.Int.</th><th>Q.Cap.</th><th>Cap.Res.</th></tr>"
ti=0; tr=0; tk=0;
m = n*a; // numero rate
for (z=1;z<=m;z++) {
q = Math.floor((c*i/n/100)+.5) // quota interessi
k = r - q // quota capitale
c = c - k // capitale residuo
if (z==m) { // ultima rata
k = k + c
r = r + c
c = 0
}
ti += q // totale interessi
tr += r // totale rate
tk += k // totale capitale
riga += "<tr><td>"+z+"</td><td>"+r+"</td><td>"+q+"</td><td>"+k+"</td><td>"+c+"</td></tr>"
}
riga += "<tr><td>Tot.</td><td>"+tr+"</td><td>"+ti+"</td><td>"+tk+"</td><td></td></tr>"
riga += "</table>"
w=window.open("about
:blank","riep");
w.document.write(riga);
w.document.close();
}
</script>
</head>
<body>
<form name=myForm>
<table>
<tr><th colspan=2>Piano di Ammortamento</th></tr>
<tr>
<th colspan=2>© Hollyna - 2009</th>
</tr>
<tr><td align=right>Capitale:</td><td><input type=text name=capitale></td></tr>
<tr><td align=right>Interesse:</td><td><input type=text name=interesse></td></tr>
<tr><td align=right>N. Anni:</td><td><input type=text name=anni></td></tr>
<tr><td align=right>N. Rate/Anno:</td><td><input type=text name=nrateanno></td></tr>
<tr><td align=right><input type=button value="Calcola!" onClick="calcola();"></td>
<td align=right></td></tr>
<tr><td align=right>Importo Rata:</td><td><input type=text name=rata></td></tr>
</table>
</form>
</body>
</html>
Rispondi quotando
