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

Quiz = new Object();

Quiz.Title = "Ruppeetko marxilaiseksi - osa II";
Quiz.Questions = new Array();

Quiz.Questions[0] = new Object();
Quiz.Questions[0].Question = "Missä punainen patruuna Juuso Walden syntyi?"
Quiz.Questions[0].Answers = new Array();
Quiz.Questions[0].Answers[0] = "Myllykoskella"
Quiz.Questions[0].Answers[1] = "Pietarissa"
Quiz.Questions[0].Answers[2] = "Viipurissa"
Quiz.Questions[0].Correct = 1;

Quiz.Questions[1] = new Object();
Quiz.Questions[1].Question = "Kuinka monta mitalisijaa Suomen joukkue saavutti II Työläisolympialaisten talvikisoissa vuonna 1931 Mürzzuschlagissa Itävallassa 5.2.-8.2.1931?"
Quiz.Questions[1].Answers = new Array();
Quiz.Questions[1].Answers[0] = "7"
Quiz.Questions[1].Answers[1] = "17"
Quiz.Questions[1].Answers[2] = "25"
Quiz.Questions[1].Correct = 2;

Quiz.Questions[2] = new Object();
Quiz.Questions[2].Question = "Vuosi 1976 oli suomalaisen lakkoliikkeen huippuvuosi. Kuinka monta lakkoa tuolloin oli?"
Quiz.Questions[2].Answers = new Array();
Quiz.Questions[2].Answers[0] = "538"
Quiz.Questions[2].Answers[1] = "1141"
Quiz.Questions[2].Answers[2] = "3300"
Quiz.Questions[2].Correct = 2;

Quiz.Questions[3] = new Object();
Quiz.Questions[3].Question = "Kuka lausui nämä kuolemattomat sanat: 'Tulos ei voi koskaan tuoda täyttä tyydytystä, vain teko voi?'"
Quiz.Questions[3].Answers = new Array();
Quiz.Questions[3].Answers[0] = "Hella Wuolijoki"
Quiz.Questions[3].Answers[1] = "Helvi Hämäläinen"
Quiz.Questions[3].Answers[2] = "Hertta Kuusinen"
Quiz.Questions[3].Correct = 2;

Quiz.Questions[4] = new Object();
Quiz.Questions[4].Question = "SKYP:n edeltäjän yhtenäisenä työtätekevien puolueena, Suomen Työväenpuolueen ensimmäinen puheenjohtaja oli..."
Quiz.Questions[4].Answers = new Array();
Quiz.Questions[4].Answers[0] = "Nils Robert af Ursin"
Quiz.Questions[4].Answers[1] = "Matti Kurikka"
Quiz.Questions[4].Answers[2] = "Otto-Wille Kuusinen"
Quiz.Questions[4].Correct = 0;

Quiz.Questions[5] = new Object();
Quiz.Questions[5].Question = "Kuinka monta ääntä SKYP:n Eino Haikala sai vuoden 1978 presidentinvaaleissa?"
Quiz.Questions[5].Answers = new Array();
Quiz.Questions[5].Answers[0] = "5650"
Quiz.Questions[5].Answers[1] = "13244"
Quiz.Questions[5].Answers[2] = "18543"
Quiz.Questions[5].Correct = 2;

Quiz.Questions[6] = new Object();
Quiz.Questions[6].Question = "Minne moskovalaiset vastanaineet menevät mustissa, koristelluissa, vuokra-tsiguli -autoissaan Avioliittopalatsin juhlamenojen jälkeen?"
Quiz.Questions[6].Answers = new Array();
Quiz.Questions[6].Answers[0] = "Kansantalouden saavutusten näyttelyyn, jonka 70 näyttelypaviljonkia esittelevät Neuvostoliiton maatalouden ja tekniikan kehitystä, kosmonauttien koulutusta ja ensimmäisiä avaruusmatkoja sekä maailman ensimmäistä atomijäänsärkijää 'Leniniä', josta näyttelyssä on pienoismalli."
Quiz.Questions[6].Answers[1] = "Lenin-vuorelle, josta on mainio näkymä koko Moskovan yli."
Quiz.Questions[6].Answers[2] = "Pioneeripalatsiin, jossa on 400 huonetta, paraatikenttä sekä urheilu- ja uimahalleja. Viikonloppuisin siellä näytetään piirrettyjä filmejä, ja pioneerit esittävät tanssia sekä nukketeatteria."
Quiz.Questions[6].Correct = 1;

Quiz.Questions[7] = new Object();
Quiz.Questions[7].Question = "Suomen Demokraattisen Nuorisoliiton SDNL:n lehti Terä ei vastusta..."
Quiz.Questions[7].Answers = new Array();
Quiz.Questions[7].Answers[0] = "Pitkiä alushousuja, porvarien salajuonia, Ylioppilaslehteä, hienoa rusettikauluskulttuuria, paatuneimpien imperialistien katalimpia kätyreitä, Suomen armeijaa, vesien saastumista, pimeiden hinnan korottamista"
Quiz.Questions[7].Answers[1] = "James Bondia, muovikierukoita, pornografiaa, sexpommia, rotestilauluja, valkoisia puluja, kuubalaista serenadia"
Quiz.Questions[7].Answers[2] = "Sinfonioita ja kuorolaulua, steatobygiaa, poliisia, elokuvasensuuria, abortteja (kuuden kuukauden jälkeen), kirjailijaoikeudenkäyntejä, atomipommia, pahoja aikeita"
Quiz.Questions[7].Correct = 1;

Quiz.Questions[8] = new Object();
Quiz.Questions[8].Question = "Mitkä tieteelliset teoriat eivät ole Neuvostoliitossa ei-niin-suvaittuja?"
Quiz.Questions[8].Answers = new Array();
Quiz.Questions[8].Answers[0] = "Big bang -teoria, testipsykologia ja tilastollisten menetelmien soveltaminen psykologiaan"
Quiz.Questions[8].Answers[1] = "Psykoanalyysi, moderni perinnöllisyystiede ja testipsykologia"
Quiz.Questions[8].Answers[2] = "Klassinen mekaniikka"
Quiz.Questions[8].Correct = 2;

Quiz.Questions[9] = new Object();
Quiz.Questions[9].Question = "Kuka seuraavista ei ollut mukana Ilkka Kanervan SKP:lle 23.3.1979 toimittamassa muistiossa, missä hän määritteli kokoomuksen eduskuntaryhmän itäluotettavuuden?"
Quiz.Questions[9].Answers = new Array();
Quiz.Questions[9].Answers[0] = "Juuso Häikiö, 62, 4500 ääntä, Kuopio. Hovioikeuden neuvos, kansanedustaja - täysin kanervalainen."
Quiz.Questions[9].Answers[1] = "Pertti Salolainen, 38, 26500, Helsinki. Kauppat. maist., kansanedustaja, (STK) - ollut Savoy-ryhmässä [oikeistol.], pelkkä opportunisti, hakenut kontaktia kanervalaisiin"
Quiz.Questions[9].Answers[2] = "Kimmo Sasi, 24, 4200 ääntä, Tampere. Oik. Maist., kansanedustaja - Savoy-ryhmästä oikealle, poliittisesti jyrkkä"
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 marxilaisuutesi\" 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 = "Luokkakantainen";
	if (sRank < 0.8) var Rank = "Saarislainen";
	if (sRank < 0.6) var Rank = "Kanervalainen";
	if (sRank < 0.4) var Rank = "Kansandemokraattinen";
	if (sRank < 0.2) var Rank = "Trotskilainen";
	if (sRank == 0) var Rank = "Luokkavihollinen";
	ScoreWindow.document.writeln("<p>Marxilaisuutesi: <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>Pietarissa</b><br>")
	ScoreWindow.document.writeln("2) <b>25 kpl </b><br>")
    ScoreWindow.document.writeln("3) <b>3300 kpl </b><br>")
    ScoreWindow.document.writeln("4) <b>Hertta Kuusinen</b><br>")
	ScoreWindow.document.writeln("5) <b>Nils Robert af Ursin</b><br>")
	ScoreWindow.document.writeln("6) <b>18543</b><br>")
	ScoreWindow.document.writeln("7) <b>Lenin-vuorelle, josta on mainio näkymä koko Moskovan yli.</b><br>")
	ScoreWindow.document.writeln("8) <b>James Bondia, muovikierukoita, pornografiaa, sexpommia, rotestilauluja, valkoisia puluja, kuubalaista serenadia</b><br>")
	ScoreWindow.document.writeln("9) <b>Klassinen mekaniikka</b><br>")
	ScoreWindow.document.writeln("10) <b>Kimmo Sasi<b><br>")

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

}