function loan_pro1() {

	document.in_loan.month_hensai.value = "";
	document.in_loan.bonus_hensai.value = "";
	document.in_loan.year_hensai.value = "";
	document.in_loan.all_hensai.value = "";


	if (numCheck(document.in_loan.kinri.value) == false) {
		alert("金利を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.okariiregaku.value) == false) {
		alert("お借入金額を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.kikan.value) == false) {
		alert("お借入期間を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.bonus.value) == false) {
		alert("ボーナス返済額を半角数字で入力して下さい。\n"); return false;
	}

	if (document.in_loan.kinri.value == 0 || document.in_loan.kinri.value == "" || document.in_loan.kinri.value > 15) {
		alert("金利は、0～15(0は除く)までの数字を入力して下さい。\n"); return false;
	}

	if (document.in_loan.okariiregaku.value < (document.in_loan.bonus.value * 2)) {
		alert("ボーナス返済額はお借入金額の50%以内で入力ください。\n"); return false;
	}

	if (document.in_loan.kikan.value <= 0 || document.in_loan.kikan.value == "" || document.in_loan.kikan.value > 35) {
		alert("お借入期間は、1～35の半角数字を入力して下さい。\n"); return false;
	}

	if (document.in_loan.okariiregaku.value <= 0 || document.in_loan.okariiregaku.value == "" || document.in_loan.okariiregaku.value > 10000) {
		alert("お借入金額は、1～6000の半角数字を入力して下さい。\n"); return false;
	}

	if (document.in_loan.bonus.value <= 0 || document.in_loan.bonus.value == "") {
		document.in_loan.bonus.value = 0;
	}


	// ローンの計算

	b0 = document.in_loan.okariiregaku.value * 10000;
	a0 = document.in_loan.kinri.value / 100;
	c0 = document.in_loan.kikan.value;
	d0 = document.in_loan.bonus.value * 10000;

	r1 = a0 / 12;
	n1 = c0 * 12;
	r0 = a0 * (6 / 12);
	n0 = c0 * 2;
	
	p1 = Math.pow((1+r1), n1)
	p0 = Math.pow((1+r0), n0);
	p0_1 = Math.pow((1+r0), (n0-1));


	x = (b0 - d0) * r1 * p1 / (p1 - 1);
	y = d0 * r0 * p0_1 * (1+r0) / (p0 - 1);

	// alert(x);
	// alert(y);

	month_hensai = Math.floor(x); month_hensai = f_keta2(month_hensai);
	bonus_hensai = Math.floor(y); bonus_hensai = f_keta2(bonus_hensai);
	year_hensai = Math.floor(x) * 12 + Math.floor(y) * 2; year_hensai = f_keta2(year_hensai);
	all_hensai = Math.floor(x) * n1 + Math.floor(y) * n0; all_hensai  = f_keta2(all_hensai);

	document.in_loan.month_hensai.value = month_hensai;
	document.in_loan.bonus_hensai.value = bonus_hensai;
	document.in_loan.year_hensai.value = year_hensai;
	document.in_loan.all_hensai.value = all_hensai;

}

function loan_pro2() {
	
	document.in_loan.all_hensai.value = "";
	document.in_loan.all_bonus.value = "";
	// document.in_loan.gendo.value = "";


	if (numCheck(document.in_loan.kinri.value) == false) {
		alert("金利を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.hensai.value) == false) {
		alert("返済希望金額を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.kikan.value) == false) {
		alert("お借入期間を半角数字で入力して下さい。\n"); return false;
	}

	if (numCheck(document.in_loan.bonus.value) == false) {
		alert("ボーナス返済額を半角数字で入力して下さい。\n"); return false;
	}

	if (document.in_loan.kinri.value == 0 || document.in_loan.kinri.value == "" || document.in_loan.kinri.value > 100) {
		alert("金利は、0～15(0は除く)までの数字を入力して下さい。\n"); return false;
	}


	if (document.in_loan.kikan.value <= 0 || document.in_loan.kikan.value == "" || document.in_loan.kikan.value > 35) {
		alert("お借入期間は、1～35の半角数字を入力して下さい。\n"); return false;
	}

	if (document.in_loan.hensai.value <= 0 || document.in_loan.hensai.value == "") {
		alert("返済希望金額は、0より大きい角数字を入力して下さい。\n"); return false;
	}

	if (document.in_loan.bonus.value <= 0 || document.in_loan.bonus.value == "") {
		document.in_loan.bonus.value = 0;
	}


	// ローンの計算

	x1 = document.in_loan.hensai.value;
	y1 = document.in_loan.bonus.value;
	a0 = document.in_loan.kinri.value / 100;
	c0 = document.in_loan.kikan.value;


	r1 = a0 / 12;
	n1 = c0 * 12;
	r0 = a0 * (6 / 12);
	n0 = c0 * 2;

	
	p1 = Math.pow((1+r1), n1)
	p0 = Math.pow((1+r0), n0);
	p0_1 = Math.pow((1+r0), (n0-1));


	d0 = y1 * (p0 - 1) / (r0*p0_1*(1+r0));
	b0 = x1 * (p1 - 1) / (r1 * p1) + d0;


	// alert("総額="+b0+"\n"+"ボーナス="+d0);
	// alert();

	all_hensai = Math.floor(b0); all_hensai = f_keta2(all_hensai);
	all_bonus  = Math.floor(d0); all_bonus = f_keta2(all_bonus);

	document.in_loan.all_hensai.value = all_hensai;
	document.in_loan.all_bonus.value = all_bonus;

	if(d0*2 > b0){
		alert("【ご注意】ボーナスの返済金額が借入金額の50％がを超えていますので、ボーナス返済金額を減らして再度試算してください。");
		//alert(gendo);
	}

}

function numCheck(n){
    for(i=0; i<n.length; i++){
        t = n.charAt(i);
        if(("0" <= t && t <= "9") || t=="." ){
        }else{
            return false;
        }
    }
    return true;
}

function f_keta2(m){
	keta = m;
	// alert(keta);
	if(m>0){
		m = ""+m;
		m_len = m.length;
		k = Math.floor(m_len/3);
		if((m_len%3)==0){k--;}

		if(k<=0){keta=m;}
		else{keta = "";}
		i=0;
		for(i=0; i<k; i++){
			t = m.substring(m.length-3, m.length+1);
			
			if(keta==""){keta = t;}
			else{keta = t + "," + keta;}
			
			m = m.substring(0, m.length-3);
		}
		if(i>0){keta = m + "," + keta;}
	}
	return keta;
}