/*
 * Author : Hiroyasu Yukutake
 * Date   : 1998-4-30
 * Copyright(c) 1998 Hiroyasu Yukutake
 * 無断で、複製及び転用する事を禁じます。
 * E-mail : yukkun@writeme.com
 */
var winname = "";

function Validation(){
/*if (document.Form.from.value==""){
    alert("E-mail addressを入力して下さい。");
    document.Form.from.focus();
    return false;
}else if ( document.Form.from.value.indexOf("@") == -1 ){
    alert("E-mail addressを @ 付きで入力して下さい。");
    document.Form.from.focus();
    return false;
}else*/ if (!document.Form.QD58[0].checked && !document.Form.QD58[1].checked &&
          !document.Form.QD58[2].checked){
    alert("質問には全部答えて下さい。");
    return false;
}

document.Form.browser.value=navigator.appName+navigator.appVersion;
Analyze();
if ( document.Form.browser.value == "null error" ){
    if (!confirm("すべての質問に答えられていません。データの信頼性に欠けますが、このまま続けますか。")){
        return false;
    }
}
alert("いまから判定を行います。少々お待ち下さい。");

if ( document.Form.ResultA.value == "1" ){
    winname = "answer1.htm";
}else if ( document.Form.ResultA.value == "2"){
    winname = "answer2.htm";
}else if ( document.Form.ResultA.value == "3"){
    winname = "answer3.htm";
}else if ( document.Form.ResultA.value == "4"){
    winname = "answer4.htm";
}else if ( document.Form.ResultA.value == "5"){
    winname = "answer5.htm";
}else if ( document.Form.ResultA.value == "6"){
    winname = "answer6.htm";
}else if ( document.Form.ResultA.value == "7"){
    winname = "answer7.htm";
}else if ( document.Form.ResultA.value == "8"){
    winname = "answer8.htm";
}else if ( document.Form.ResultA.value == "9"){
    winname = "answer9.htm";
}else if ( document.Form.ResultA.value == "10"){
    winname = "answer10.htm";
}else
    winname = "answer11.htm";

//setTimeout("window.open(winname,'Window1','')",5000); revised 02/02/08
location.href=winname;

return true;

}

function RadioAdd(r_name){
    var rval = r_name;
    if ( rval[0].checked ) return 2;
    if ( rval[1].checked ) return 1;
    if ( rval[2].checked ) return 0;
    else                   return 0; // for NullCheck()
}
function NullCheck(r_name){
    var nval = r_name;
    if ( !nval[0].checked && !nval[1].checked && !nval[2].checked ) {
        document.Form.browser.value = "null error";
        return 1;
    }else
        return 0;
}

function Analyze(){
//Author: Hiroyasu Yukutake
document.Form.Atotal.value = RadioAdd(document.Form.QA08) +
RadioAdd(document.Form.QA13) + RadioAdd(document.Form.QA22) +
RadioAdd(document.Form.QA23) + RadioAdd(document.Form.QA38) +
RadioAdd(document.Form.QA27) + RadioAdd(document.Form.QA43) +
RadioAdd(document.Form.QA52) + RadioAdd(document.Form.QA53) +
RadioAdd(document.Form.QA57) - 7.5;
document.Form.Atotal.value = eval(document.Form.Atotal.value) +
(NullCheck(document.Form.QA08) + NullCheck(document.Form.QA13) + NullCheck(document.Form.QA22) +
NullCheck(document.Form.QA23) + NullCheck(document.Form.QA38) +
NullCheck(document.Form.QA27) + NullCheck(document.Form.QA43) +
NullCheck(document.Form.QA52) + NullCheck(document.Form.QA53) +
NullCheck(document.Form.QA57))/10*7.5;

document.Form.Btotal.value = RadioAdd(document.Form.QB10) + 
RadioAdd(document.Form.QB15) + RadioAdd(document.Form.QB20) +
RadioAdd(document.Form.QB24) + RadioAdd(document.Form.QB25) +
RadioAdd(document.Form.QB40) + RadioAdd(document.Form.QB45) +
RadioAdd(document.Form.QB50) + RadioAdd(document.Form.QB54) +
RadioAdd(document.Form.QB55) - 14;
document.Form.Btotal.value = eval(document.Form.Btotal.value) + 
(NullCheck(document.Form.QB10) + NullCheck(document.Form.QB15) + NullCheck(document.Form.QB20) +
NullCheck(document.Form.QB24) + NullCheck(document.Form.QB25) +
NullCheck(document.Form.QB40) + NullCheck(document.Form.QB45) +
NullCheck(document.Form.QB50) + NullCheck(document.Form.QB54) +
NullCheck(document.Form.QB55))/10*14;

document.Form.Ctotal.value = RadioAdd(document.Form.QC06) + 
RadioAdd(document.Form.QC07) + RadioAdd(document.Form.QC14) +
RadioAdd(document.Form.QC17) + RadioAdd(document.Form.QC26) +
RadioAdd(document.Form.QC36) + RadioAdd(document.Form.QC37) +
RadioAdd(document.Form.QC44) + RadioAdd(document.Form.QC47) +
RadioAdd(document.Form.QC56) - 11;
document.Form.Ctotal.value = eval(document.Form.Ctotal.value) + 
(NullCheck(document.Form.QC06) + NullCheck(document.Form.QC07) + NullCheck(document.Form.QC14) +
NullCheck(document.Form.QC17) + NullCheck(document.Form.QC26) +
NullCheck(document.Form.QC36) + NullCheck(document.Form.QC37) +
NullCheck(document.Form.QC44) + NullCheck(document.Form.QC47) +
NullCheck(document.Form.QC56))/10*11;

document.Form.Dtotal.value = RadioAdd(document.Form.QD02) + 
RadioAdd(document.Form.QD04) + RadioAdd(document.Form.QD05) +
RadioAdd(document.Form.QD16) + RadioAdd(document.Form.QD28) +
RadioAdd(document.Form.QD32) + RadioAdd(document.Form.QD34) +
RadioAdd(document.Form.QD35) + RadioAdd(document.Form.QD46) +
RadioAdd(document.Form.QD58) - 11.5;
document.Form.Dtotal.value = eval(document.Form.Dtotal.value) + 
(NullCheck(document.Form.QD02) + NullCheck(document.Form.QD04) + 
NullCheck(document.Form.QD05) +
NullCheck(document.Form.QD16) + NullCheck(document.Form.QD28) +
NullCheck(document.Form.QD32) + NullCheck(document.Form.QD34) +
NullCheck(document.Form.QD35) + NullCheck(document.Form.QD46) +
NullCheck(document.Form.QD58))/10*11.5;

document.Form.Etotal.value = RadioAdd(document.Form.QE01) + 
RadioAdd(document.Form.QE11) + RadioAdd(document.Form.QE12) +
RadioAdd(document.Form.QE18) + RadioAdd(document.Form.QE21) +
RadioAdd(document.Form.QE31) + RadioAdd(document.Form.QE41) +
RadioAdd(document.Form.QE42) + RadioAdd(document.Form.QE48) +
RadioAdd(document.Form.QE51) - 8.5;
document.Form.Etotal.value = eval(document.Form.Etotal.value) + 
(NullCheck(document.Form.QE01) + NullCheck(document.Form.QE11) + NullCheck(document.Form.QE12) +
NullCheck(document.Form.QE18) + NullCheck(document.Form.QE21) +
NullCheck(document.Form.QE31) + NullCheck(document.Form.QE41) +
NullCheck(document.Form.QE42) + NullCheck(document.Form.QE48) +
NullCheck(document.Form.QE51))/10*8.5;

var Answer = new Array(10);
for (i=0;i<10;i++)
    Answer[i] = 0;

if ( document.Form.Atotal.value >= 0 ) Answer[0] = document.Form.Atotal.value;
else                                        Answer[1] = -document.Form.Atotal.value;
if ( document.Form.Btotal.value >= 0 ) Answer[2] = document.Form.Btotal.value;
else                                        Answer[3] = -document.Form.Btotal.value;
if ( document.Form.Ctotal.value >= 0 ) Answer[4] = document.Form.Ctotal.value;
else                                        Answer[5] = -document.Form.Ctotal.value;
if ( document.Form.Dtotal.value >= 0 ) Answer[6] = document.Form.Dtotal.value;
else                                        Answer[7] = -document.Form.Dtotal.value;
if ( document.Form.Etotal.value >= 0 ) Answer[8] = document.Form.Etotal.value;
else                                        Answer[9] = -document.Form.Etotal.value;

var ResultT = 0.0;
var ResultN = 10;
for (i=0;i<10;i++) {
    if ( ResultT < eval(Answer[i]) ) {
        ResultT = Answer[i];
        ResultN = i;
    }
}
ResultN++;
document.Form.ResultA.value = ResultN;
document.Form.subject.value = "Egogram result is "+ResultN+".";
//alert("結果は"+document.Form.ResultA.value+"です。");

}