function main(form){
//** 入力チェック部
	while(1){
		if ( form.kariirekin.value == ""){
			alert("「お借り入れ希望額」をご指定下さい。");
			form.kariirekin.focus();
			form.kariirekin.select();
			break;
		}else if( isNaN(form.kariirekin.value) == true ){
			alert("「お借り入れ希望額」は半角数字でお願いします。");
			form.kariirekin.focus();
			form.kariirekin.select();
			break;
		}
		if ( form.kariirekinri.value == ""){
			alert("「ご希望金利」をご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			break;
		}else if( isNaN(form.kariirekinri.value) == true){
			alert("「ご希望金利」は半角数字でお願いします。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			break;
		}else if ( eval(form.kariirekinri.value) < 0 || eval(form.kariirekinri.value) > 100 ){
			alert("「ご希望金利」は０〜１００．０００の範囲でご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			break;
		}
		kariirekinri_tmp =  ( Math.floor(eval( form.kariirekinri.value ) * 1000 ) ) / 1000
		if ( form.kariirekinri.value != kariirekinri_tmp ){
			alert("「ご希望金利」は小数点３桁までの範囲でご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			break;
		}



//* 計算部

	var kariire_all		= eval ( form.kariirekin.value ) * 10000;


	var kariire_kinri	= eval ( form.kariirekinri.value );

    var tmp_n = form.hensai_kikan.selectedIndex;

    var hensai_kikan	= eval ( form.hensai_kikan.options[tmp_n].text );

	var kariire_tsuki = kariire_all;

	//* PMT:元利均等返済

	//*　毎月返済額計算

	A = eval( kariire_tsuki );

	r = eval( kariire_kinri ) / 100 / 12;

	n = eval( hensai_kikan ) * 12 ;



	if( r == 0 ){

		var hensai_tsuki = Math.floor ( A / n );

	}else{

		var hensai_tsuki = Math.floor (( A * r * ( Math.pow( ( 1 + r ) , n )) )  / ( Math.pow( ( 1 + r ) , n ) - 1 ) );

	}





	//* 年間ご返済額

	var hensai_nenkan = eval( hensai_tsuki ) * 12;








//* 表示部

		form.hensai_tsuki.value		= currency( hensai_tsuki );

		form.hensai_nenkan.value	= currency( hensai_nenkan );

		break;

	}



}

function currency(n) {

	var result;
	var str = "" + n;
	var ary;

	if( !(ary = str.match(/^([\+-]|)(\d+)(\.\d+|)$/)) ){
		return "";
	}

	var int_part = ary[2];
	var len = int_part.length;
	var mod = (len - 1) % 3 + 1;

	result = int_part.substr(0, mod);
	for(var i = mod; i < len; i += 3)
		result += "," + int_part.substr(i, 3);
	result = ary[1] + result + ary[3];

	return result;
}
function main2(form){
//** 入力チェック部
	var returnflag = true;
	while(1){
		if ( form.kariirekin.value == ""){
			alert("「お借り入れ希望額」をご指定下さい。");
			form.kariirekin.focus();
			form.kariirekin.select();
			returnflag = false;
			break;
		}else if( isNaN(form.kariirekin.value) == true ){
			alert("「お借り入れ希望額」は半角数字でお願いします。");
			form.kariirekin.focus();
			form.kariirekin.select();
			returnflag = false;
			break;
		}
		if ( form.kariirekinri.value == ""){
			alert("「ご希望金利」をご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			returnflag = false;
			break;
		}else if( isNaN(form.kariirekinri.value) == true){
			alert("「ご希望金利」は半角数字でお願いします。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			returnflag = false;
			break;
		}else if ( eval(form.kariirekinri.value) < 0 || eval(form.kariirekinri.value) > 100 ){
			alert("「ご希望金利」は０〜１００．０００の範囲でご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			returnflag = false;
			break;
		}
		kariirekinri_tmp =  ( Math.floor(eval( form.kariirekinri.value ) * 1000 ) ) / 1000
		if ( form.kariirekinri.value != kariirekinri_tmp ){
			alert("「ご希望金利」は小数点３桁までの範囲でご指定下さい。");
			form.kariirekinri.focus();
			form.kariirekinri.select();
			returnflag = false;
			break;
		}
		if(returnflag){
			form.submit();
			return true;
		}
		return returnflag;
	}
}
