<!-- JavaScript未対応のブラウザの為の対処//リセットルーチンfunction reset(f){	f.i_m_siha.value = "";	f.i_b_siha.value = "";	f.i_kanri.value = "";	f.i_park.value = "";	f.i_y_syuu.value = "";	f.i_kikan.value = "";	f.i_sikin.value = "";	}//シミュレーションメインルーチンfunction sim_main(f){	f.i_m_siha.value = k_delete(f.i_m_siha.value);	f.i_b_siha.value = k_delete(f.i_b_siha.value);	f.i_kanri.value = k_delete(f.i_kanri.value);	f.i_park.value = k_delete(f.i_park.value);	f.i_y_syuu.value = k_delete(f.i_y_syuu.value);	f.i_kikan.value = k_delete(f.i_kikan.value);	f.i_sikin.value = k_delete(f.i_sikin.value);	if (!(i_m_siha_chk(f) && i_b_siha_chk(f) && i_kanri_chk(f) && i_park_chk(f) && i_y_syuu_chk(f) && i_sikin_chk(f) && i_syohi_ritu_chk(f) && i_kinri_chk(f)))	{		return;	}//諸費用返済用変数宣言//	wk_i_m_siha.value = eval(f.i_m_siha.value);//	wk_i_b_siha.value = eval(f.i_b_siha.value);//	wk_i_kanri.value = eval(f.i_kanri.value);//	wk_i_park.value = eval(f.i_park.value);//	wk_i_y_syuu.value = eval(f.i_y_syuu.value);//	wk_i_kikan.value = eval(f.i_kikan.value)*12;//	wk_i_sikin.value = eval(f.i_sikin.value)*10000;//	各返済額の計算	bukken_kakaku = Math.ceil(bukken_kakaku_calc(f));	syohiyou = Math.ceil(syohiyo_calc(f));	hiritu = hiritu_calc(f);//預入金変換	f.i_m_siha.value = k_hensyu(f.i_m_siha.value);	f.i_b_siha.value = k_hensyu(f.i_b_siha.value);	f.i_kanri.value = k_hensyu(f.i_kanri.value);	f.i_park.value = k_hensyu(f.i_park.value);	f.i_y_syuu.value = k_hensyu(f.i_y_syuu.value);//	f.i_kikan.value = k_hensyu(f.i_kikan.value);	f.i_sikin.value = k_hensyu(f.i_sikin.value);//	各返済額の出力	f.bukken_kakaku.value = bukken_kakaku;	f.syohiyou.value = syohiyou;//	f.tot_hensai.value = bukken_kakaku+syohiyou;	f.hiritu.value = hiritu;	f.bukken_kakaku.value = k_hensyu(f.bukken_kakaku.value);	f.syohiyou.value = k_hensyu(f.syohiyou.value);//	f.tot_hensai.value = k_hensyu(f.tot_hensai.value);	f.hiritu.value = f.hiritu.value;}//Numericチェックfunction com_num_chk(n) {	for(i = 0; i <  n.length; i++){		t = n.substring(i,i+1);		if (t == "0" || t == "1" || t == "2" || t == "3" || t == "4" ||		t == "5" || t == "6" || t == "7" || t == "8" || t == "9" ||		t == "." || t == ","){ 			continue;			}		else{			return false;		}	}	return true;}//カンマ編集function k_hensyu(n) {        cnt = 0;        ans = "";        len = n.length;        for(i = 0; i < n.length; i++){                t = n.substring(i,i+1);                ans = ans + t;                cnt = cnt + 1;                if(n.length - cnt == 9 || n.length - cnt == 6 || n.length - cnt == 3){                        ans = ans + ",";                }        }        return(ans);}//カンマ編集(削除)function k_delete(n) {		ans = "";		len = n.length;		for(i = 0; i < n.length; i++){			t = n.substring(i,i+1);			if(t == ","){				t = "";			}			ans = ans + t;		}		return(ans);}//お借入額の入力チェックfunction i_m_siha_chk(f) {	wk = f.i_m_siha.value;	if (wk == ""){		alert("月々お支払い可能額が入力されていません。");		f.i_m_siha.focus();		return false;	}	if (!com_num_chk(wk)){		alert ("月々お支払い可能額は半角数字で入力してください。");		f.i_m_siha.focus();		return false;	}	if (wk < 1){		alert ("月々お支払い可能額は１万円〜で入力して下さい。");		f.i_m_siha.focus();		return false;	}	if (wk % 1 != 0){		alert ("氏Xお支払い可能額は１万円単位で入力して下さい。");		return false;	}	return true;}//ボーナス返済額の入力チェックfunction i_b_siha_chk(f) {	wk_b = f.i_b_siha.value;	if (wk_b == ""){		f.i_b_siha.value = "0";		return true;	}	if (!com_num_chk(wk_b)){		alert ("ボーナス返済額は半角数字で入力してください。");		f.i_b_siha.focus();		return false;	}	return true;}function i_kanri_chk(f) {	wk_b = f.i_kanri.value;	if (wk_b == ""){		f.i_kanri.value = "0";		return true;	}	if (!com_num_chk(wk_b)){		alert ("管理費は半角数字で入力してください。");		f.i_kanri.focus();		return false;	}	return true;}function i_park_chk(f) {	wk = f.i_park.value;	if (wk == ""){		f.i_park.value = "0";		return true;	}	if (!com_num_chk(wk)){		alert ("駐車場代は半角数字で入力してください。");		f.i_park.focus();		return false;	}	return true;}function i_y_syuu_chk(f) {	wk = f.i_y_syuu.value;	if (wk == ""){		alert("年収が入力されていません。");		f.i_y_syuu.focus();		return false;	}	if (!com_num_chk(wk)){		alert ("年収は半角数字で入力してください。");		f.i_y_syuu.focus();		return false;	}	return true;}//借入期間の入力チェックfunction i_kikan_chk(f) {	wk = f.i_kikan.value;	if (wk == ""){		alert("返済期間が入力されていません。");		f.i_kikan.focus();		return false;	}	if (!com_num_chk(wk)){		alert ("返済期間は半角数字で入力してください。");		f.i_kikan.focus();		return false;	}	if(wk < 1 || wk > 50){		alert ("返済期間は１〜５０年の間で入力して下さい。");		f.i_kikan.focus();		return false;	}	return true;}function i_sikin_chk(f) {	wk = f.i_sikin.value;	if (wk == "")	{		f.i_sikin.value = "0";		return true;	}	if (!com_num_chk(wk))	{		alert ("自己資金は半角数字で入力してください。");		f.i_sikin.focus();		return false;	}	return true;}//金利の入力チェックfunction i_kinri_chk(f) {	wk = f.i_kinri.value;	if (wk == ""){		alert("金利が入力されていません。");		f.i_kinri.focus();		return false;	}	if (!com_num_chk(wk)){		alert ("金利は半角数字で入力してください。");		f.i_kinri.focus();		return false;	}	if(wk < 0.001 || wk > 99.999){		alert ("金利は0.001〜99.999%の間で入力して下さい。");		f.i_kinri.focus();		return false;	}	return true;}function i_syohi_ritu_chk(f) {	wk = f.i_syohi_ritu.value;	if (wk == ""){		f.i_syohi_ritu.value = "0";		return true;	}	if (!com_num_chk(wk)){		alert ("管理費は半角数字で入力してください。");		f.i_syohi_ritu.focus();		return false;	}	return true;}//ブラウザのチェックfunction br_chk(m){	e_lit = "";	ee_lit = "";	msg = "";	e_msg = "";	ee_msg = "";	flg = "off";	if(navigator.appName == "Netscape" && navigator.appVersion.substring(0,3) == "3.0"){		for(i=0; i<m.length; i++){			lit = m.substring(i,i+1);			e_lit = escape(lit);			e_len = e_lit.length;			for(j=0; j<e_lit.length; j++){				ee_lit = e_lit.substring(j,j+1);				if(ee_lit == "%" && e_len == 3){					ee_lit = e_lit.substring(j,j+3);					j = j + 3;				}				if(ee_lit == "%8E"){					e_msg = e_msg + "%8E%8E";				}				e_msg = e_msg + e_lit;			}			msg = unescape(e_msg);		}		return(msg);	}else{		return(m);	}}//計算function bukken_kakaku_calc(f){	wk_pmt = (-1)*((eval(f.i_m_siha.value) *12 + eval(f.i_b_siha.value) *2)/12-eval(f.i_kanri.value)-eval(f.i_park.value));	wk_rate = eval(f.i_kinri.value) / 100;	wk_ritu = eval(f.i_syohi_ritu.value) / 100;	wk_nper = eval(f.i_kikan.value) * 12;	wk_bunsi = wk_pmt /(wk_rate/12)*(1-(Math.pow((1 + (wk_rate / 12)),wk_nper)));	wk_bunbo = Math.pow((1 + (wk_rate / 12)),wk_nper);	kingaku = ((wk_bunsi / wk_bunbo)+eval(f.i_sikin.value)*10000)/(wk_ritu+1);//	kingaku = 100000;	return(kingaku);	}function syohiyo_calc(f){	wk_pmt = (-1)*((eval(f.i_m_siha.value) *12 + eval(f.i_b_siha.value) *2)/12-eval(f.i_kanri.value)-eval(f.i_park.value));	wk_rate = eval(f.i_kinri.value) / 100;	wk_ritu = eval(f.i_syohi_ritu.value) / 100;	wk_nper = eval(f.i_kikan.value) * 12;	wk_bunsi = wk_pmt /(wk_rate/12)* (1-(Math.pow((1 + (wk_rate / 12)),wk_nper)));	wk_bunbo = Math.pow((1 + (wk_rate / 12)),wk_nper);	kingaku = ((wk_bunsi / wk_bunbo)+eval(f.i_sikin.value)*10000)*wk_ritu/(wk_ritu+1);//	kingaku=1000000.876;	return(kingaku);	}function hiritu_calc(f){	wk_rat = (eval(f.i_m_siha.value) *12 + eval(f.i_b_siha.value) *2)/eval(f.i_y_syuu.value)/10000*100;//	wk_rat=27.5876;	wk_rat = Math.round(wk_rat*10);	wk_rat = wk_rat/10	return(wk_rat);	}//フォーカス処理function init_focus(f){	f.forms[0].elements[0].focus();	}// end script -->
