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

Quiz = new Object();

Quiz.Title = "Tunne Vihollisesi 1. Länsi-Saksa -visa";
Quiz.Questions = new Array();


Quiz.Questions[0] = new Object();
Quiz.Questions[0].Question = "Minä vuonna Länsi-Saksan perustuslakituomioistuin kielsi kommunistisen puolueen?"
Quiz.Questions[0].Answers = new Array();
Quiz.Questions[0].Answers[0] = "1946"
Quiz.Questions[0].Answers[1] = "1956"
Quiz.Questions[0].Answers[2] = "1962"
Quiz.Questions[0].Answers[3] = "1971"
Quiz.Questions[0].Correct = 1;

Quiz.Questions[1] = new Object();
Quiz.Questions[1].Question = "Millä pilkkanimellä edistyksellistä nuorisojärjestö SDS:ää (Der Sozialistische Deutsche Studentenbund) kutsuttiin sosialalidemokraattisessa puolueessa SPD:ssä sen jälkeen, kun puolue hylkäsi sosialismin 1959?"
Quiz.Questions[1].Answers = new Array();
Quiz.Questions[1].Answers[0] = "Ulrichtin ulvova susilauma"
Quiz.Questions[1].Answers[1] = "Honeckerin sylikoira"
Quiz.Questions[1].Answers[2] = "Pankowin troijalainen aasi"
Quiz.Questions[1].Answers[3] = "Stalinin kulkukissat"
Quiz.Questions[1].Answers[4] = "Maon varpuset"
Quiz.Questions[1].Correct = 2;

Quiz.Questions[2] = new Object();
Quiz.Questions[2].Question = "Milloin Länsi-Saksa päätti hankkia ydinaseita?"
Quiz.Questions[2].Answers = new Array();
Quiz.Questions[2].Answers[0] = "Kun Saksan Demokraattinen Kansantasavalta osoitti 1953 vahvistumisen merkkejä."
Quiz.Questions[2].Answers[1] = "Kylmän sodan kylmettyä liittokansleri Konrad Adenauerin johdolla 1958."
Quiz.Questions[2].Answers[2] = "Presidentti Ronald Reaganin ehdotettua euro-ohjuksia Länsi-Saksaan vuonna 1983."
Quiz.Questions[2].Correct = 1;

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

Quiz.Questions[3].Question = "Spinger ja Erkko, kapitalismin verkko -mielenosoitushuuto on tuttu Suomessa. Miten suurta osaa Axel Caesar Springerin konsernin lehdistä hallitsi 1960-luvulla Länsi-Saksan lehdistä?"
Quiz.Questions[3].Answers = new Array();
Quiz.Questions[3].Answers[0] = "Kaikkien liittotasavaltojen sanomalehtien arkilevikistä 40% ja 100% Länsi-Berliinin sunnuntailevikistä."
Quiz.Questions[3].Answers[1] = "Liittovaltioiden arkilehtilevikistä 70% ja 85% Bonnin sunnuntailevikistä."
Quiz.Questions[3].Answers[2] = "Kokonaan."
Quiz.Questions[3].Correct = 0;

Quiz.Questions[4] = new Object();
Quiz.Questions[4].Question = "Mikä seuraavista mellakanhajoittamistaktiikoista ei kuulu Länsi-Saksan poliisin valikoimiin?"
Quiz.Questions[4].Answers = new Array();
Quiz.Questions[4].Answers[0] = "Leberwurst, maksamakkara"
Quiz.Questions[4].Answers[1] = "Kessel, kattila"
Quiz.Questions[4].Answers[2] = "Sauerkraut, hapankaali"
Quiz.Questions[4].Correct = 2;

Quiz.Questions[5] = new Object();
Quiz.Questions[5].Question = "Millä nimityksillä kristillisdemokraatti liittokansleri Ludwig Erhard ja hänen puoluetoverinsa eivät kutsuneet kirjailijoita 1960-luvulla?"
Quiz.Questions[5].Answers = new Array();
Quiz.Questions[5].Answers[0] = "Räkyttävät rakit"
Quiz.Questions[5].Answers[1] = "Hulttiot"
Quiz.Questions[5].Answers[2] = "Vampyyrilepakot"
Quiz.Questions[5].Answers[3] = "Rotat"
Quiz.Questions[5].Answers[4] = "Sonta"
Quiz.Questions[5].Correct = 2;

Quiz.Questions[6] = new Object();
Quiz.Questions[6].Question = "Kuka liittokansleri aloitti liennytyksen Saksojen välillä?"
Quiz.Questions[6].Answers = new Array();
Quiz.Questions[6].Answers[0] = "Konrad Adenauer"
Quiz.Questions[6].Answers[1] = "Helmut Kohl"
Quiz.Questions[6].Answers[2] = "Willy Brandt"
Quiz.Questions[6].Answers[3] = "Helmut Schmidt"
Quiz.Questions[6].Correct = 2;



Quiz.Questions[7] = new Object();
Quiz.Questions[7].Question = "Milloin Länsi-Saksa liittyi Natoon?"
Quiz.Questions[7].Answers = new Array();
Quiz.Questions[7].Answers[0] = "1955"
Quiz.Questions[7].Answers[1] = "1961"
Quiz.Questions[7].Answers[2] = "1989"
Quiz.Questions[7].Correct = 0;

Quiz.Questions[8] = new Object();
Quiz.Questions[8].Question = "Miten Länsi-Saksa menestyi Moskovan olympialaisissa?"
Quiz.Questions[8].Answers = new Array();
Quiz.Questions[8].Answers[0] = "Erinomaisesti. Se oli Britannian ohella ainoa länsiliittouneiden maa kisoissa ja kahmi 7 kultaa, 14 hopeaa ja 8 pronssia."
Quiz.Questions[8].Answers[1] = "Verrattuna Saksan Demokraattiseen Tasavaltaan Saksan Liittotasavalta menestyi vaatimattomasti. DDR voitti liki kaksinkertaisen määrän mitaleja."
Quiz.Questions[8].Answers[2] = "Länsi-Saksa boikotoi Moskovan kisoja jääden näin mitalitta."
Quiz.Questions[8].Correct = 2;

Quiz.Questions[9] = new Object();
Quiz.Questions[9].Question = "Vuoden 1976 talviolympialaisissa 12 parhaan jääkiekkomaan joukossa oli peräti 6 sosialistimaata: Neuvostoliitto (1.), Tshekkoslovakia (2.), Puola (6.), Romania (7.), Jugoslavia (10.) ja Bulgaria (12.). Länsi-Saksa oli paras kapitalistimaa pronssimitalillaan. Se päätyi tasapisteisiin Suomen ja USA:n kanssa, mutta sai pronssia parhaan keskinäisten ottelujen maalisuhteen vuoksi. Kuka oli Länsi-Saksan paras pistemies?"
Quiz.Questions[9].Answers = new Array();
Quiz.Questions[9].Answers[0] = "Erich Kühnhackl"
Quiz.Questions[9].Answers[1] = "Ernst Kopf"
Quiz.Questions[9].Answers[2] = "Lorenz Funk"
Quiz.Questions[9].Correct = 0;


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=\"-2\">" + (x + 1) + ") </font><br>");}


	ScoreWindow.document.writeln("Oikeamieliset vastaukset: <br><br>")
	ScoreWindow.document.writeln("1) <b>1956</b><br>")
	ScoreWindow.document.writeln("2) <b>Pankowin troijalainen aasi</b><br>")
	ScoreWindow.document.writeln("3) <b>Adenauerin johdolla 1958</b><br>")
	ScoreWindow.document.writeln("4) <b>Arkisin 40% ja sunnuntaisin 100%</b><br>")
	ScoreWindow.document.writeln("5) <b>Sauerkraut</b><br>")
	ScoreWindow.document.writeln("6) <b>Vampyyrilepakot</b><br>")
	ScoreWindow.document.writeln("7) <b>Willy Brandt</b><br>")
	ScoreWindow.document.writeln("8) <b>1955</b><br>")
	ScoreWindow.document.writeln("9) <b>Länsi-Saksa boikotoi</b><br>")
	ScoreWindow.document.writeln("10) <b>Erich Kühnhackl</b><br>")


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

}