
function chkNum( chkstr )
{
	return charcheck( chkstr, "1234567890");
}

function chkNum2( chkstr )
{
	return charcheck( chkstr, ".1234567890");
}

function charcheck( str, value )
{
	var chkdata;
	for( var i = 0; i < str.length; i++ ){
		chkdata = str.charAt( i );
		for( var j = 0; j < value.length; j++ ){
			if( chkdata == value.charAt( j )){
				break;
			}
		}
		if( j == value.length ){
			return false;
		}
	}
	return true;
}


function simulation() {
	if ( !document.sim.sim_loan.value ) { alert("希望金額に正しい数値を入れてください");return};
	if ( chkNum( document.sim.sim_loan.value ) != true ){ alert("希望金額に正しい数値を入れてください");return};
	if ( document.sim.sim_loan.value < 1 || document.sim.sim_loan.value > 500 ) { alert("希望金額は1〜500までの数値を入れてください");return};
	
	if ( !document.sim.sim_riritsu.value ) { alert("利率に正しい数値を入れてください");return};
	if ( chkNum2( document.sim.sim_riritsu.value ) != true ){ alert("利率に正しい数値を入れてください");return};
	//if ( document.sim.sim_riritsu.value < 1 || document.sim.sim_riritsu.value > 60 ) { alert("利率は1〜60までの数値を入れてください");return};

	if ( !document.sim.sim_monthly.value ) { alert("毎月の返済金額に正しい数値を入れてください");return};
	if ( chkNum( document.sim.sim_monthly.value ) != true ){ alert("希望金額に正しい数値を入れてください");return};
	

	var s_loan = parseInt ( document.sim.sim_loan.value ) * 10000;
	var s_riritsu = document.sim.sim_riritsu.value * 0.01;
	if (s_riritsu > 0.292) {alert("利率が法定金利以上です\n29.2％以下の利率を入力して下さい");return}
	var s_monthly = parseInt ( document.sim.sim_monthly.value );
	
	var s_rMonth = Math.floor((s_loan* s_riritsu) / 365 * 30);
	var s_riritsupercent = document.sim.sim_riritsu.value;
	
	if ( (s_loan* s_riritsu) / 365 * 30 >= (s_monthly) ){ alert("毎月の返済金額が少なすぎます\n" + "借入金額が" + s_loan + "円、\n" + "利率が" + s_riritsupercent +  "％の場合、\n毎月" + (s_rMonth + 1) + "円以上返済しないと返済が終わりません。"); return};
	
	
	
	var s_monthlytmp = s_monthly
	var s_times = 0;
	var s_gankin = s_loan;
	var s_gankinMonth;
	var s_rDay;
 	

	while ( s_gankin != 0 ) {
		s_rDay = parseInt(((s_gankin* s_riritsu ) /365 ) * 30);
		if ( s_monthly > s_rDay + s_gankin ) { s_monthly = s_rDay + s_gankin };

		s_gankinMonth = s_monthly - s_rDay;
		s_gankin = s_gankin - s_gankinMonth;
		s_times++;
	}
	document.sim.sim_times.value = s_times;
	document.sim.sim_total.value =  (s_monthlytmp * ( s_times - 1 )) + s_monthly;
}


  var ua = navigator.userAgent
	if((ua.indexOf('MSIE 4.5')  !=-1   ||
	    ua.indexOf('MSIE 5.01') !=-1 ) && 
	    (unescape('%u3042') == 'あ'))
	{
	  //mac-e4.5,win-e5.01用読み込み
	  document.write('<scr'+'ipt src="./testA1utf8.js"></scr'+'ipt>')
	} else { 
	  //その他用読み込み
	  document.write('<scr'+'ipt src="./testA1.js"></scr'+'ipt>')
	}