var Font = "Verdana, Arial, sans-serif";

Quiz = new Object();

Quiz.Title = "Ahti-visa";
Quiz.Questions = new Array();

Quiz.Questions[0] = new Object();
Quiz.Questions[0].Question = "Ahti Karjalainen on kotoisin..."
Quiz.Questions[0].Answers = new Array();
Quiz.Questions[0].Answers[0] = "Pielavedeltä"
Quiz.Questions[0].Answers[1] = "Hirvensalmelta"
Quiz.Questions[0].Answers[2] = "Riistavedeltä"
Quiz.Questions[0].Correct = 1;

Quiz.Questions[1] = new Object();
Quiz.Questions[1].Question = "Ahdin äidin nimi oli Anna Lyydia os. Viherlehto. Mikä oli kyläkauppiaana ja pienviljelijänä toimineen isä-Karjalaisen etunimi?"
Quiz.Questions[1].Answers = new Array();
Quiz.Questions[1].Answers[0] = "Anshelm"
Quiz.Questions[1].Answers[1] = "Teotori"
Quiz.Questions[1].Answers[2] = "Juutas"
Quiz.Questions[1].Correct = 0;

Quiz.Questions[2] = new Object();
Quiz.Questions[2].Question = "Missä opppilaitoksessa nuori Ahti ei opiskellut?"
Quiz.Questions[2].Answers = new Array();
Quiz.Questions[2].Answers[0] = "Evon metsäkoululla"
Quiz.Questions[2].Answers[1] = "Luther-opistolla"
Quiz.Questions[2].Answers[2] = "Alkio-opistolla"
Quiz.Questions[2].Correct = 2;

Quiz.Questions[3] = new Object();

Quiz.Questions[3].Question = "Opiskeluaikanaan valtiotieteen ylioppilas, myöhempi ulkoministeri Karjalainen opiskeli useita kieliä. Niistä itselleen hyödyllisimpänä hän pitii..."
Quiz.Questions[3].Answers = new Array();
Quiz.Questions[3].Answers[0] = "latinaa"
Quiz.Questions[3].Answers[1] = "saksaa"
Quiz.Questions[3].Answers[2] = "venäjää"
Quiz.Questions[3].Correct = 0;

Quiz.Questions[4] = new Object();
Quiz.Questions[4].Question = "Karjalaisen poliittinen nousukierre alkoi vuonna 1950, kun hänestä tuli pääministeri Urho Kekkosen poliittinen sihteeri. Kuinka monta kertaa hän itse toimi pääministerinä?"
Quiz.Questions[4].Answers = new Array();
Quiz.Questions[4].Answers[0] = "kaksi"
Quiz.Questions[4].Answers[1] = "kolme"
Quiz.Questions[4].Answers[2] = "neljä"
Quiz.Questions[4].Correct = 0;

Quiz.Questions[5] = new Object();
Quiz.Questions[5].Question = "Milloin Ahti Karjalainen ehdotti ensimmäistä kertaa, että presidentti Kekkosen toimikautta tulisi jatkaa poikkeuslailla?"
Quiz.Questions[5].Answers = new Array();
Quiz.Questions[5].Answers[0] = "joulukuussa 1970"
Quiz.Questions[5].Answers[1] = "tammikuussa 1972"
Quiz.Questions[5].Answers[2] = "marraskuussa 1973"
Quiz.Questions[5].Correct = 1;

Quiz.Questions[6] = new Object();
Quiz.Questions[6].Question = "Ahti Karjalainen sulkeutui eräällä valtiovierailulla useaksi päiväksi hotellihuoneeseen Suomenmaa-lehden toimittajan kanssa. Missä tämä syvähaastattelu tapahtui?"
Quiz.Questions[6].Answers = new Array();
Quiz.Questions[6].Answers[0] = "Jaltalla"
Quiz.Questions[6].Answers[1] = "Sotsissa"
Quiz.Questions[6].Answers[2] = "Bakussa"
Quiz.Questions[6].Correct = 2;

Quiz.Questions[7] = new Object();
Quiz.Questions[7].Question = "Karjalainen ajoi 1980-luvun taitteessa pienessä maistissa autoaan ja poliisi pysäytti hänet. Rangaistukseksi Karjalainen sai..."
Quiz.Questions[7].Answers = new Array();
Quiz.Questions[7].Answers[0] = "25.000 markan sakot"
Quiz.Questions[7].Answers[1] = "kolme päivää yhteiskuntapalvelua vanhainkodissa"
Quiz.Questions[7].Answers[2] = "ankarat nuhteet poliisilta ja potkut Suomen Pankista"
Quiz.Questions[7].Correct = 0;

Quiz.Questions[8] = new Object();
Quiz.Questions[8].Question = "Mikä valtionyhtiö oli Karjalaisen lempilapsi?"
Quiz.Questions[8].Answers = new Array();
Quiz.Questions[8].Answers[0] = "Neste"
Quiz.Questions[8].Answers[1] = "Enso-Gutzeit"
Quiz.Questions[8].Answers[2] = "Rautaruukki"
Quiz.Questions[8].Correct = 2;

Quiz.Questions[9] = new Object();
Quiz.Questions[9].Question = "Mikä sanaparsi ei ole tunnettu myös Ahti Karjalaisen suusta?"
Quiz.Questions[9].Answers = new Array();
Quiz.Questions[9].Answers[0] = "Ceterum censeo..."
Quiz.Questions[9].Answers[1] = "Ennustaminen on vaikeaa, varsinkin tulevaisuuden ennustaminen"
Quiz.Questions[9].Answers[2] = "Kekkosen suunta on kokoava suunta"
Quiz.Questions[9].Correct = 2;


function AddQuiz() {
	document.writeln("<H1>" + Quiz.Title + "</H1>");
	document.writeln("<form name=\"quiz_form\">");
	for (x = 0; x < Quiz.Questions.length; x++) {
		document.writeln("<p><font face=\"" + Font + "\" size=\"-1\">" + (x + 1) + ") " + Quiz.Questions[x].Question + "</font></p>");
		//document.writeln("<p><select name=\"question_" + x +"\">");
		//document.writeln("<option>Select One ");
		for (y = 0; y < Quiz.Questions[x].Answers.length; y++) {

		// Lisätyt rivit
			document.writeln('<input type="radio" name="question_'+x+'" value="'+y+'">'+Quiz.Questions[x].Answers[y]);
			document.writeln('<br>');
		// tähän asti
		//	document.writeln("<option>" + Quiz.Questions[x].Answers[y]);
		}
		//document.writeln("</select></p>");
	}
	document.writeln("<p>");
	document.writeln("<input type=\"button\" value=\"Tarkista kekkoslaisuutesi\" onclick=\"SubmitQuiz();\">");
	document.writeln("<input type=\"reset\" value=\"Tyhjenn&auml;\">");
	document.writeln("</p>");
	document.writeln("</form>");

}

function SubmitQuiz() {
	Quiz.Score = 0;
	for (x = 0; x < Quiz.Questions.length; x++) {

	// Lisätyt rivit
		var rbName = 'question_'+x;
		var rbArray = document.quiz_form.elements[rbName];
		z = -1;
		for (y = 0; y < rbArray.length; y++) {
			if (rbArray[y].checked) z = y;
		}
 	// tähän asti
		//eval("var z = document.quiz_form.question_" + x + ".selectedIndex - 1;");
		if (z == Quiz.Questions[x].Correct) Quiz.Score++;
	}
	ScoreWindow = window.open("","score","height=400, width=350, scrollbars=no, resizable=no, status=no");
	ScoreWindow.document.writeln("<html><head><title>Itsekritiikki</title></head><body>");
	ScoreWindow.document.writeln("<p><font face=\"" + Font + "\" size=\"+3\">Itsekritiikin tulokset</font></p>");
	ScoreWindow.document.writeln("<p><font face=\"" + Font + "\" size=\"-1\">Pisteesi: <b>" + Quiz.Score + " / " + Quiz.Questions.length + "</b></p>");
	var sRank = Quiz.Score / Quiz.Questions.length;
	if (sRank >= 0.8) var Rank = "Uusitalolainen";
	if (sRank < 0.8) var Rank = "Repolainen";
	if (sRank < 0.6) var Rank = "Kanervalainen";
	if (sRank < 0.4) var Rank = "Leskisläinen";
	if (sRank < 0.2) var Rank = "Vennamolainen";
	if (sRank == 0) var Rank = "Honkalainen";
	ScoreWindow.document.writeln("<p>Kekkoslaisuutesi: <b>" + Rank + "</b></p>");


//vastaukset
//	for (x = 0; x < Quiz.Questions.length; x++) {
//	ScoreWindow.document.writeln("<font face=\"" + Font + "\" size=\"-1\">" + (x + 1) + ") </font><br>");}


	ScoreWindow.document.writeln("Oikeamieliset vastaukset: <br><br>")
	ScoreWindow.document.writeln("1) <b>Hirvensalmelta</b><br>")
	ScoreWindow.document.writeln("2) <b>Anshelm</b><br>")
	ScoreWindow.document.writeln("3) <b>Alkio-opistolla</b><br>")
	ScoreWindow.document.writeln("4) <b>latinaa, siihen pohjautuvat monet kansantaloustieteen termit</b><br>")
	ScoreWindow.document.writeln("5) <b>kaksi</b><br>")
	ScoreWindow.document.writeln("6) <b>tammikuussa 1972. Eduskunta hyväksyi lain 15.1.1973.</b><br>")
	ScoreWindow.document.writeln("7) <b>Bakussa</b><br>")
	ScoreWindow.document.writeln("8) <b>25.000 markan sakot</b><br>")
	ScoreWindow.document.writeln("9) <b>Rautaruukki</b><br>")
	ScoreWindow.document.writeln("10) <b>Kekkosen suunta on kokoava suunta (Rafael Paasio:'Paasion suunta on kokoava suunta.')</b><br>")


	ScoreWindow.document.writeln("<p><a href=\"javascript:window.close();\">Sulje ikkuna</a></p>");

}