// -------------------------------------------------------------------------------------------------
// Copyright(C) ZEROSKY All Rights Reserved.
// http://www.zero-sky.net/
// Copyright (C) SKYONLINE, Inc. All Rights Reserved.
// http://www.skyonline.co.jp/
// -------------------------------------------------------------------------------------------------
// このスクリプトは（株）スカイオンラインに著作権があり、ZERO-SKYにて無料配布しているものです。
// 法人・個人・商用目的などの制限なく利用は無料ですが、サポートや質問の受付は一切行っておりません。
// また、以下のルールを必ず守ってください。
//
// [1] 再配布（販売含む）・流用を禁止します。
// [2] 本スクリプト（sim.js）内に記載している著作権表示・署名（コピーライト）を改変・削除・見えなく
//     するなど、著作権の侵害行為を固く禁じます。
// [3] 本スクリプト（sim.js）の改変を固く禁じます。但し、各値の部分は自己責任において変更することを
//     認めます。
// [4] HTML部分に当サービスや著作者の署名（コピーライト）を表示する必要はありません。
// [5] 設置代行される場合は、必ず「事業者登録」を行ってください。登録料は【無料】です。
// [6] スクリプトの使用で起きた全ての損害に対し、弊社はその責任を一切負いません。
// [7] 使用の際は、フリーウェア利用規定（以下参照）を遵守してください。
//     http://www.zero-sky.net/html/rule_free.html
// -------------------------------------------------------------------------------------------------


function kariset2(){
//	f2.n_kari.value = k_delete(f2.n_buken.value) - k_delete(f2.n_jiko.value);
}


function k2_hensyu2(f2,b_kari){
	b_kari1 = f2.b_kari.value;
	f2.b_kari.value = k_delete(b_kari1);
	b_kari1 = f2.b_kari.value;
	return true;
}


function reset2(f2){
	f2.n_nenshu.value = "";
	f2.n_igai.value = "";
	f2.kinri.value  = "";
	f2.kikan.value  = "";
	}


//シミュレーションメインルーチン
function sim_main2(f2){
	f2.n_nenshu.value = k_delete2(f2.n_nenshu.value);
	f2.n_igai.value = k_delete2(f2.n_igai.value);
	f2.kikan.value = k_delete2(f2.kikan.value);
//	f2.kinri.value = k_delete2(f2.kinri.value);
//	if (!(n_nenshu_chk2(f2) && n_igai_chk2(f2) && kinri_chk2(f2) && kikan_chk2(f2))){
	if (!(n_nenshu_chk2(f2) && n_igai_chk2(f2) && kikan_chk2(f2))){
		return;
	}


	//	各返済額の計算
	wk_kanougaku = Math.round(kariire_calc(f2));
	wk_kanougaku2 = Math.round(kariire_calc2(f2));


	//	各返済額の出力
	f2.kanougaku.value = wk_kanougaku;
	f2.kanougaku2.value = wk_kanougaku2;

	f2.kanougaku.value = k_hensyu2(f2.kanougaku.value);
	f2.kanougaku2.value = k_hensyu2(f2.kanougaku2.value);
}


//ラジオボタンチェック
function radio2(part){
	if(part == "0"){
		document.f2.kinri.value = "";
		document.f2.kinri.focus();
	}
	return true;
}


//毎月返済利息の計算
function m_risoku_calc2(zandaka,f2){
	zandaka = 100 * Math.floor(zandaka / 100);
	m_risoku = Math.floor(zandaka * (f2.kinri.value) / 100 / 12);
	return(m_risoku);
}


//ボーナス返済利息の計算
function b_risoku_calc2(zandaka,f2){
	zandaka = 100 * Math.floor(zandaka / 100);
	b_risoku = Math.floor(zandaka * (f2.kinri.value) / 100 / 2);
	return(b_risoku);
}


//Numericチェック
function com_num_chk2(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 == "."){
			continue;
			}
		else{
			return false;
		}
	}
	return true;
}


//フォーカス喪失時のカンマ編集
function lost_hensyu2(obj){
	obj.value = k_delete(obj.value);
}


//カンマ編集
function k_hensyu2(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_delete2(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 n_nenshu_chk2(f2) {
	wk = f2.n_nenshu.value;
	if (wk == ""){
		alert("年収が入力されていません。");
		f2.n_nenshu.focus();
		return false;
	}
	if (!com_num_chk2(wk)){
		alert ("年収は半角数字で入力してください。");
		f2.n_nenshu.focus();
		return false;
	}
	if(wk < 0 || wk > 9999){
		alert ("年収は0万円〜9999万円の間で入力してください。");
		f2.n_nenshu.focus();
		return false;
	}
	return true;
}


//住宅ローン以外の借入額の入力チェック
function n_igai_chk2(f2) {
	wk = f2.n_igai.value;
	if (wk == ""){
		f2.n_igai.value = "0";
		return true;
	}
	if (!com_num_chk2(wk)){
		alert ("住宅ローン以外の借入額は半角数字で入力してください。");
		f2.n_igai.focus();
		return false;
	}
	return true;
}


//金利の入力チェック
function kinri_chk2(f2) {
	wk = f2.kinri.value;
	if (wk == ""){
		alert("金利が入力されていません。");
		f2.kinri.focus();
		return false;
	}
	if (!com_num_chk(wk)){
		alert ("金利は半角数字で入力してください。");
		f2.kinri.focus();
		return false;
	}
	if(wk < 0.001 || wk > 15.00){
		alert ("金利は0.001〜15.00%の間で入力して下さい。");
		f2.kinri.focus();
		return false;
	}
	return true;
}


//借入期間の入力チェック
function kikan_chk2(f2) {
	wk = f2.kikan.value;
	if (wk == ""){
		alert("返済期間が入力されていません。");
		f2.kikan.focus();
		return false;
	}
	if (!com_num_chk2(wk)){
		alert ("返済期間は半角数字で入力して下さい。");
		f2.kikan.focus();
		return false;
	}
	if(wk < 3 || wk > 35){
		alert ("返済期間は３〜３５年の間で入力して下さい。");
		f2.kikan.focus();
		return false;
	}
	return true;
}


//ブラウザのチェック
function br_chk2(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 kariire_calc(f2){
	wk_nenshu = eval(f2.n_nenshu.value * 10000);
	wk_igai = eval(f2.n_igai.value);
//	wk_kinri = eval(f2.kinri.value / 100);
	wk_kinri = eval(4.0 / 100);
	wk_kaisu = eval(f2.kikan.value * 12);
	wk_bunsi = (wk_nenshu / 12 * 0.4 - wk_igai) * (Math.pow((1 + wk_kinri / 12), wk_kaisu) - 1);
	wk_bunbo = (wk_kinri / 12) * Math.pow((1 + wk_kinri / 12), wk_kaisu);
	kingaku = wk_bunsi / wk_bunbo;
	return(kingaku);
}

//借入可能額の計算（下限）
function kariire_calc2(f2){
	wk_nenshu = eval(f2.n_nenshu.value * 10000);
	wk_igai = eval(f2.n_igai.value);
//	wk_kinri = eval(f2.kinri.value / 100);
	wk_kinri = eval(3.55 / 100);
	wk_kaisu = eval(f2.kikan.value * 12);
	wk_bunsi = (wk_nenshu / 12 * 0.4 - wk_igai) * (Math.pow((1 + wk_kinri / 12), wk_kaisu) - 1);
	wk_bunbo = (wk_kinri / 12) * Math.pow((1 + wk_kinri / 12), wk_kaisu);
	kingaku = wk_bunsi / wk_bunbo;
	return(kingaku);
}


//フォーカス処理
function init_focus2(f2){
	f2.n_jiko.value = 0;//自己資金初期値
	f2.kikan.value = 35;//借入期間初期値
	init_focus.string = '';
	init_focus.string = unescape(window.location.search.substring(1));//?をサプレス
	if (!(init_focus.string == '')){
		f2.n_buken.value = init_focus.string;
		kariset();
		f2.n_jiko.focus();
		f2.n_jiko.select();
	}else{
		f2.n_buken.focus();
	}
}

//ブラウザの判別 
var agent = navigator.userAgent; var nv = 0;
if(agent.indexOf("Mozilla/2") == 0){var nv= 1}