function click_check()
{
document.f.kariire.focus();
}
function kariire_chenge()
{
var number=document.f.kariire.value;
if(number<=0||!ck_int(number)){
alert("借入金額には0以上の整数を入れてください。");
document.f.kariire.value="";
document.f.kariire.focus();
}
else {
document.f.kariire.value = keta(document.f.kariire.value);
}
}
function kaisuu_chenge()
{
var number=document.f.kaisuu.value;
if(number<=0||number>120||!ck_int(number)){
alert("回数には0以上120以下の整数を入れてください。");
document.f.kaisuu.value="";
document.f.kaisuu.focus();
}
}
function riritu_chenge()
{
var number=document.f.riritu.value;
if(number<=0||isNaN(number)){
alert("利率には0以上の数値を入れてください。");
document.f.riritu.value="";
document.f.riritu.focus();
}
}
function keisan()
{
var text1 = "";
var text2 = "";
var risoku;
var hensai;
var risoku_g = 0;
var hensai_g = 0;
var i;
if(document.f.kariire.value==""){ alert("借入金額を入力してください"); }
else if(document.f.kaisuu.value==""){ alert("返済回数を入力して下さい"); }
else if(document.f.riritu.value==""){ alert("利率を入力して下さい"); }
else{
kariire = eval(keta_del(document.f.kariire.value));
kaisuu = eval(document.f.kaisuu.value);
riritu = eval(document.f.riritu.value);
kappu = parseInt( kariire / kaisuu );
zandaka = kariire;
for(i=1 ; i<=kaisuu ; i++ ) {
risoku = parseInt( zandaka * riritu / 1200 );
hensai = kappu + risoku;
zandaka = zandaka - kappu;
text2 = text2 + "" + i
+ " | " + keta(kappu)
+ " | " + keta(risoku)
+ " | " + keta(hensai)
+ " | " + keta(zandaka) + " |
";
risoku_g = risoku_g + risoku
}
document.f.risoku.value = keta(risoku_g);
hensai_g = risoku_g + kariire;
document.f.goukei.value = keta(hensai_g);
// document.f.kariire.value = keta(document.f.kariire.value);
parent.marukei.document.open();
parent.marukei.document.write("");
parent.marukei.document.write("");
parent.marukei.document.write("");
parent.marukei.document.write("");
parent.marukei.document.write("回数 | 元金返済 | 利息 | 返済額(元利合計) | 借入金残高 |
");
parent.marukei.document.write(text2);
parent.marukei.document.write("
");
}
}
function keta(atai)
{
var len;
var ret = "";
var kugiri = 3;
var kcnt;
var atai2 = atai.toString();
len=atai2.length;
kcnt = 0;
for( i = len ; i >=0 ; i--){
ret = atai2.substr(i,1) + ret;
if ( kcnt == 3 && i>0) {
ret = "," + ret;
kcnt = 0;
}
kcnt = kcnt + 1;
}
return(ret)
}
function keta_del(atai)
{
var len;
var ret = "";
len=atai.length;
for( i = len ; i >=0 ; i--){
// if ( isNaN(atai.substr(i,1)) == "false") { ret = atai.substr(i,1) + ret; }
if ( atai.substr(i,1) != ",") { ret = atai.substr(i,1) + ret; }
}
return(ret)
}
function ck_int(str)
{
var i;
var len;
var num=0;
len=str.length;
for(i=0;i