function calc_kinri() {
        //入力された値
        var gankin = Number(window.document.keisanForm.gankin.value);
        var shiharai = Number(window.document.keisanForm.shiharai.value);
        var kinri = Number(window.document.keisanForm.kinri.value);
        var nen = Number(window.document.keisanForm.nen.value);
        var tuki = Number(window.document.keisanForm.tuki.value);
        var nisuu = 31;
        var risoku = 0;
        //引きなおし用
        var a_gankin = gankin;
        var p_gankin = gankin;
        var p_risoku = 0;
        //基準金利
        var p_kinri = 0;
        //基準金利
        var p_nisuu = 30;

        //元金が10万以下の場合は15%
        if ( gankin < 100000 ) {
                p_kinri = 20;
        //元金が100万未満の場合は18%
        }else if ( gankin < 1000000 ) {
                p_kinri = 18;
        //元金が100万以上の場合は18%
        } else {
                p_kinri = 15;
        }

        /*
        //現在の日付
        var myD       = new Date();
        var myYear    = myD.getYear();
        myYear   = (myYear < 2000) ? myYear+1900 : myYear;
        var myMonth   = myD.getMonth() + 1;

        //支払い続けている年数
        var h_nen = myYear - nen;
        //支払い続けている月数
        var h_tuki = myMonth - tuki;
        */

        //支払回数
        var h_ans = nen * 12 + tuki;

        var testMessege = "";

        //利息が支払額より大きい場合
        if (Math.round( gankin * nisuu * ( kinri / 100) / 365 ) < shiharai) {
                //現在の状態
                for ( var i = 0; i < h_ans; i++ ) {
                        //利息を合計する
                        risoku = risoku + Math.round( gankin * nisuu * ( kinri / 100) / 365 );

                        //元金が支払額より大きい場合
                        if ( gankin > shiharai ) {
                                gankin = gankin - shiharai + Math.round( gankin * nisuu * ( kinri / 100) / 365 );
                        } else {
                                gankin = 0;
                        }

                        //支払完了
                        if ( gankin == 0 ) break;
                        
                }

                //引きなおしの状態
                for ( var i = 0; i < h_ans; i++ ) {
                        //利息を合計する
                        p_risoku = p_risoku + Math.round( p_gankin * p_nisuu * ( p_kinri / 100) / 365 );

                        //元金が支払額より大きい場合
                        if ( p_gankin > shiharai ) {
                                p_gankin = p_gankin - shiharai + Math.round( p_gankin * p_nisuu * ( p_kinri / 100) / 365 );
                        } else {
                                p_gankin = 0;
                        }

                        //支払完了
                        if ( p_gankin == 0 ) break;
                }
        }

        var messege = "";

        var flg ="1";

        if( a_gankin == "" ){
                messege ="<span class=\"calc_error\">借入金額が未入力です。</span>";
                flg="2";
        }else{
                if(isNaN(gankin)){
                        messege = "<span class=\"calc_error\">借入金額の入力は数値のみでお願いいたします。</span>";
                        flg="2";
                }
        }

        if( shiharai == "" && messege ==""){
                messege ="<span class=\"calc_error\">支払額が未入力です。</span>";
                flg="2";
        }else{
                if(isNaN(shiharai) && messege ==""){
                        messege = "<span class=\"calc_error\">支払額の入力は数値のみでお願いいたします。</span>";
                        flg="2";
                }
        }

        if( kinri == "" && messege ==""){
                messege ="<span class=\"calc_error\">金利が未入力です。</span>";
                flg="2";
        }else{
                if(isNaN(kinri) && messege ==""){
                        messege = "<span class=\"calc_error\">金利の入力は数値のみでお願いいたします。</span>";
                        flg="2";
                }
        }

        if( (nen == "" && tuki == "") && messege ==""){
                messege ="<span class=\"calc_error\">返済期間が未入力です。</span>";
                flg="2";
        }else{
                if( (isNaN(tuki) || isNaN(nen)) && messege ==""){
                        messege = "<span class=\"calc_error\">返済期間の入力は数値のみでお願いいたします。</span>";
                        flg="2";
                }
        }

        if ( p_kinri > kinri  && messege =="") {
                messege = "<span class=\"calc_error\">この金利では計算されません。</span>";
                flg="2";
        }
        if ( h_ans <= 0  && messege =="") {
                messege = "<span class=\"calc_error\">この年月では計算されません。</span>";
                flg="2";
        }
        if ( Math.round( gankin * nisuu * ( kinri / 100) / 365 ) > shiharai && messege =="") {
                messege = "<span class=\"calc_error\">過払い対象外もしくは、入力に誤りがありませんか？</span>";
                flg="2";
        }
        if(flg == 1){
                //元本が0でない場合は減額対象
                if ( ( gankin - (risoku-p_risoku) ) > 0 ) {
                        messege = "計算上元本が<span class=\"calc_gengaku\">" + (risoku-p_risoku) + "</span>円減額される見込みがあります。<br />詳しい計算・過払いについてご相談は<br />「0120-316-009」まで！！";
                } else {
                        messege = "計算上<span class=\"calc_gengaku\">" + (risoku-p_risoku) + "</span>円返ってくる見込みがあります。<br />詳しい計算・過払いについてご相談は<br />「0120-316-009」まで！！";
                }
        }

        document.getElementById("message").innerHTML = messege;
}