// 診断テスト改 2005/8/2 // original by Mamiko.M(http://www.nmt.ne.jp/~mamiko/) function test2(theForm){ var radio_btn = 29; //ラジオボタンの数をセット。 var n_marks = 0; var cnt = 14; var n = new Array("Q1","Q2","Q3","Q4","Q5","Q6","Q7","Q8","Q9","Q10","Q11","Q12","Q13","Q14"); for(var i=0; i\n"); newWindow.document.write("

\n") if(n_marks > 20){ newWindow.document.write("診断結果
"); newWindow.document.write("
\n"); newWindow.document.write("テストの結果は\n"); newWindow.document.write( + n_marks_v + "点でした
"); newWindow.document.write("
\n"); newWindow.document.write("あなたは重篤問題飲酒群です
\n"); newWindow.document.write("
\n"); newWindow.document.write("あなたのアルコールの飲み方には非常に問題があります。アルコール依存症の疑いも持たれます。
"); newWindow.document.write("すみやかに専門の相談機関に行き、治療と教育を受けられることを強くお勧めいたします。"); newWindow.document.write("
\n"); } if(20 >=n_marks && n_marks >= 0){ newWindow.document.write("診断結果
"); newWindow.document.write("
\n"); newWindow.document.write("テストの結果は\n"); newWindow.document.write( + n_marks_v + "点でした
"); newWindow.document.write("
\n"); newWindow.document.write("あなたは問題飲酒群です
\n"); newWindow.document.write("
\n"); newWindow.document.write("あなたのアルコールの飲み方には問題があります。アルコール依存症の疑いも持たれます。
"); newWindow.document.write("すみやかに専門の相談機関に行き、治療と教育を受けられることをお勧めいたします。"); newWindow.document.write("
\n"); } if(0 > n_marks && n_marks > -50){ newWindow.document.write("診断結果
"); newWindow.document.write("
\n"); newWindow.document.write("テストの結果は\n"); newWindow.document.write( + n_marks_v + "点でした"); newWindow.document.write("
\n"); newWindow.document.write("あなたは問題飲酒予備軍です
\n"); newWindow.document.write("
\n"); newWindow.document.write("あなたのアルコールの飲み方には、若干の問題があります。このまま飲み続けるとアルコール依存症になる可能性も考えられます。
"); newWindow.document.write("今後困ったことが生じたら、すみやかに専門の相談機関にご相談ください。"); newWindow.document.write("
\n"); } if(n_marks <= -50){ newWindow.document.write("診断結果
"); newWindow.document.write("
\n"); newWindow.document.write("テストの結果は\n"); newWindow.document.write( + n_marks_v + "点でした"); newWindow.document.write("
\n"); newWindow.document.write("あなたは正常飲酒群です
\n"); newWindow.document.write("
\n"); newWindow.document.write("今のところ、あなたのアルコールの飲み方には問題はないと考えられます。
"); newWindow.document.write("飲み過ぎに注意して、このまま節度ある飲酒を続けられることが、健康維持にはとても重要となります。"); newWindow.document.write("
\n"); } newWindow.document.write("

\n"); newWindow.document.write("\n"); newWindow.document.close(); newWindow.focus(); return; } // 診断テストは、ここまで