function calc() {
	// 入力項目が空白の場合のアラート表示
	txt = document.CalcScript.price.value;
	if (txt == "") {
		alert("借入金額を入力して下さい");
	}
	if (isNaN(txt)) {
		alert("借入金額は半角数字で入力して下さい");
	}
	
	txt = document.CalcScript.period.value;
	if (txt == "") {
		alert("借入期間（1ヶ月単位）を入力して下さい");
	}
	if (isNaN(txt)) {
		alert("借入期間（1ヶ月単位）は半角数字で入力して下さい");
	}
	txt = document.CalcScript.ratio.value;
	if (txt == "") {
		alert("信用保証料率を入力して下さい");
	}
	if (isNaN(txt)) {
		alert("信用保証料率は半角数字で入力して下さい");
	}

	// 借入金額を百万円単位に換算
	price = parseInt(document.CalcScript.price.value) * 10000;
	if(price < 50000) {
		price = 50000;
	}
	// 借入期間を1ヶ月単位に換算
	period = parseInt(document.CalcScript.period.value);
	period2 = period / 12;
	ratio = parseFloat(document.CalcScript.ratio.value) / 100;

	// 返済方法の選択チェック
	flag = document.CalcScript.prosess[0].checked;
	if(flag) {
		charge = price * period2 * ratio;
	}else if(document.CalcScript.prosess[1].checked) {
		i = period;
		// 分割返済の場合の係数を設定
		if(i <= 6) {// 返済回数が6回以下
			factor = 0.70;
		}else if(i <= 12) {// 返済回数が7回以上12回以下
			factor = 0.65;
		}else if(i <= 24) {// 返済回数が13回以上24回以下
			factor = 0.60;
		}else {// 返済回数が25回以上
			factor = 0.55;
		}
		charge = price * factor * period2 * ratio;
	}else {
		alert("返済方法を選択して下さい");
	}

	// 信用保証料の百円未満を切り捨てる
	charge = Math.floor(charge/1) * 1;

	// 保証料計算実行処理
	if (isNaN(charge)) {
		document.CalcScript.result.value = "エラー !!";
	}else{
		document.CalcScript.result.value = charge;
		document.CalcScript.result.value = addComma(document.CalcScript.result.value);
	}
}

// 信用保証料の計算結果にカンマを付加する
function addComma(motoNum) {
	n=""; motoNum="" + eval(motoNum);
	len = motoNum.length;
	for(i = len - 1; i >= 0; i--) {
		n = motoNum.charAt(i) + n;
		if ((((len - i)%3) ==0) && (i!=0))n = ","+n;
	}
	return n;
}