﻿function Question (qname,
type,
qstring,
response,
comment,
corrects,
explan,
score,
ifcorrect,ifwrong,ifnull,
img)
{this.qname=qname;
this.type=type;
this.qstring=qstring;
this.response=response;
this.comment=comment;
this.corrects=corrects;
this.explan=explan;
this.score=score;
this.ifcorrect=ifcorrect;
this.ifwrong=ifwrong;
this.ifnull=ifnull;
this.img=img;
}

var zin=1,top=0, mycount=0, waitTime=0, qright=0, mycomment;
var global=new Array(3);
var recent, recent2, recdone=false, opera7, opera=CheckOpera56();
function cachewrite(s,idx){global[idx]+=s;}
function CheckOpera56()
{
var version;
if (navigator.userAgent.toLowerCase().indexOf('opera') == -1) return false;
version=parseInt(navigator.appVersion.toLowerCase());
if (version>6) {opera7=true; return false;}
if (version<5) return false;
return true;
}
resp=new Array("<font face=\"Verdana\" size=2>Italia</font>","<font face=\"Verdana\" size=2>Spania</font>","<font face=\"Verdana\" size=2>Portugal</font>","<font face=\"Verdana\" size=2>Frankrike</font>")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"<font face=\"Verdana\" size=2>Buenos Aires er en flott by med klare influenser fra Europa. Hvilket land kommer de fleste innbyggerne med Europeisk herkomst fra?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Sant","Usant")
corr=new Array("1","0")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"<font face=\"Verdana\" size=2>Argentina er blant de land i Sør-Amerika med høyest prisnivå</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Brasil</font>","<font face=\"Verdana\" size=2>Uruguay</font>","<font face=\"Verdana\" size=2>Chile</font>","<font face=\"Verdana\" size=2>Paraguay</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"<font face=\"Verdana\" size=2>Buenos Aires ligger ved den brede elven Rio de la Plata på Atlanterhavskysten. Elven utgjør grensen mellom Argentina og et annet kjent Sør-Amerikansk land. Hvilket?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Ca 1 million mennesker</font>","<font face=\"Verdana\" size=2>Ca 2,8 millioner mennesker</font>","<font face=\"Verdana\" size=2>Ca 4,2 millioner mennesker</font>","<font face=\"Verdana\" size=2>Ca 8,6 millioner mennesker</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"<font face=\"Verdana\" size=2>Buenos Aires ble på tidlig 1900-tall et yndet sted for Europeiske utvandrere, men de senere år har befolkningen stabilisert seg. Hvor mange mennesker bor egentlig sånn omtrent i selve byen Buenos Aires?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>1788</font>","<font face=\"Verdana\" size=2>1816</font>","<font face=\"Verdana\" size=2>1905</font>","<font face=\"Verdana\" size=2>1951</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"<font face=\"Verdana\" size=2>Buenos Aires har sammen med Argentina gjennomgått mye og det enorme torget Plaza de Mayo har klar relevans med selvstendighetsrevolusjonen. Når ble forresten Argentina en selvstendig nasjon?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Boca Juniors</font>","<font face=\"Verdana\" size=2>River Plate</font>","<font face=\"Verdana\" size=2>Club Aires</font>","<font face=\"Verdana\" size=2>Argentinas</font>")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"<font face=\"Verdana\" size=2>Du finner flere svært gode fotball-lag i Buenos Aires, men det er kanskje et lag som er mer kjent enn alle andre. Dette er arbeiderklasselaget hvor blant annet Maradona spilte i begynnelsen av sin fantastiske karriere. Hva heter dette laget?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Palermo</font>","<font face=\"Verdana\" size=2>San Telmo</font>","<font face=\"Verdana\" size=2>Retiro</font>","<font face=\"Verdana\" size=2>Belgrano</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"<font face=\"Verdana\" size=2>Buenos Aires er en stor by med kvadratiske bykvartaler. Litt sør for sentrum finner du en meget kjent og gammel bydel som bl.a. huser kirker og muséer. Bydelens hjerte er Plaza Dorrego. Hva heter bydelen?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Det går direkte fly, men kun fra Gardermoen. Turen tar ca 14 timer</font>","<font face=\"Verdana\" size=2>Du må fly med en av de større internasjonale selskapene. Regn med minst en mellomlanding og en samlet reisetid på over 20 timer</font>","<font face=\"Verdana\" size=2>Det er kun KLM som i dag har ruter til Buenos Aires. Flyreisen tar mer enn 20 timer med mellomlanding.</font>","<font face=\"Verdana\" size=2>Reisetiden er omtrent som til New York. Du kan fly via Paris, London eller Amsterdam</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"<font face=\"Verdana\" size=2>De som besøker Buenos Aires og kommer fra Skandinavia ankommer mest sannsynlig med fly. Hvilket utsagn stemmer best hvis du ønsker å fly raskest mulig fra Norge til Buenos Aires?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>De demonstrerer mot totalitære regimer og hedrer selvstendigheten til Argentina</font>","<font face=\"Verdana\" size=2>Dette er mødrene til personer som forsvant under militærjuntaens regime og som krever svar på hvor barna har blitt av</font>","<font face=\"Verdana\" size=2>Det er kvinnelige fotballsupportere som ønsker det beste for byens fotballag kommende helg</font>","<font face=\"Verdana\" size=2>Det er tilhengere av militærregimet og de demonstrerer for at den sittende demokratiske regjeringen skal gå av</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"<font face=\"Verdana\" size=2>Hver torsdag vil du se en gruppe mennesker som demonstrerer på den store plassen Plaza de Mayo. De kaller seg Asociación Madres de Plaza de Mayo. Hvorfor står de her hver torsdag?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Maria Eva Duarte Peron</font>","<font face=\"Verdana\" size=2>Eva Maria Pinochet</font>","<font face=\"Verdana\" size=2>Emilié Duarte Pinochet</font>","<font face=\"Verdana\" size=2>Evita Peron Sangrie</font>")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"<font face=\"Verdana\" size=2>Evita er en legende i Argentina og for oss i Europa kanskje udødeliggjort i sangen don't cry for me Argentina. Hva var Evitas virkelige navn?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Sant","Usant")
corr=new Array("1","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"<font face=\"Verdana\" size=2>Argentina er en av verdens 5 - 6 største vinprodusenter</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Bossanova</font>","<font face=\"Verdana\" size=2>Flamenco</font>","<font face=\"Verdana\" size=2>Tango</font>","<font face=\"Verdana\" size=2>Lambada</font>")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"<font face=\"Verdana\" size=2>Hva slags musikk er sjelen til Argentina? Du vil møte den over alt, spesielt i de gamle bydelene.</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Det er biff</font>","<font face=\"Verdana\" size=2>Det er sjømat i form av krabbe og skjell</font>","<font face=\"Verdana\" size=2>Det er sterkt krydrede taco-retter</font>","<font face=\"Verdana\" size=2>Det er supper med mange forskjellige ingredienser</font>")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest013 = new Question(
"Question 13",
0,
"<font face=\"Verdana\" size=2>En spesialitet i Argentina og Buenos Aires er urtedrikken Mate. Også på matfronten er Argentina kjent for en spesiell rett. Hvilken?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Fotball</font>","<font face=\"Verdana\" size=2>Pato</font>","<font face=\"Verdana\" size=2>Polo</font>","<font face=\"Verdana\" size=2>Tennis</font>")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest014 = new Question(
"Question 14",
0,
"<font face=\"Verdana\" size=2>Hva er nasjonalsporten i Argentina?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("<font face=\"Verdana\" size=2>Det er muséet hvor rekvisittene om legenden Evita er samlet</font>","<font face=\"Verdana\" size=2>Det er Argentinas nasjonalmuseum</font>","<font face=\"Verdana\" size=2>Det er et av verdens mest berømte operahus</font>","<font face=\"Verdana\" size=2>Det er byens rådhus</font>")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest015 = new Question(
"Question 15",
0,
"<font face=\"Verdana\" size=2>Hvis du bare skal kjenne til en attraksjon/severdighet i Buenos Aires så er det Teatro Colón. Hva er det?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

questions = new Array (
quest001,quest002,quest003,quest004,quest005,quest006,quest007,quest008,quest009,quest010,quest011,quest012,quest013,quest014,quest015)

function doQuestion(quest)
{
var numdo;
var numord=eval(quest+1);
var i=-1, ii, type, myname, gadget;
type=questions[quest].type;
numdo=type>=3?1:questions[quest].response.length;
if (type<3) {
respcopy=new Array(numdo);corrcopy=new Array(numdo);
for (i=0; i<numdo; i++) respcopy[i]=questions[quest].response[i];
respcopy.sort(myrandom);
for (i=0; i<numdo; i++) {
for (ii=0; ii<numdo; ii++) {
if (respcopy[i]==questions[quest].response[ii]) {
corrcopy[i]=questions[quest].corrects[ii];break;}}}
questions[quest].response=respcopy;
questions[quest].corrects=corrcopy;}

document.writeln ("<a name=\""+questions[quest].qname+"\"></a>")
document.write("\n")
document.write("       ")
if (questions[quest].img!="") {
document.write("\n")
document.write("          <p><img border=\"0\" src=\"")
document.write(questions[quest].img)
document.write("\"></p>\n")
document.write("       ")
}
document.write("\n")
document.write("       <p><big><font face=\"Verdana,Arial\">")
document.write(numord)
document.write(". ")
document.writeln(questions[quest].qstring)
document.write("</font></big></p>\n")
document.write("       ")
for (i=0; i<numdo; i++) {
myname=questions[quest].qname;
gadget="radio";
if (type>=3) gadget="text";
else if (type==1) {
myname+="_"+(i<9?"0":"")+(i+1);
gadget="checkbox";}
document.write("\n")
document.write("          ")
document.write(type==7?"<textarea name=\""+myname+"\" rows=5 cols=30 class=\"input\">":" <input type="+gadget+" name=\""+myname);
if (type<3) document.write("\" value=\""+i+"\">\n")
else document.write(type==7?"</textarea>":"\" class=\"input\" value=\"\">\n")
document.write(" <small><font face=\"Verdana,Arial\">")
if (type<3) document.write(questions[quest].response[i]);
document.write("</font></small><br>\n")
document.write("       ")
}
document.write("\n")
document.write("    ")
}
function doTest() {
var count, i;
questions.sort(myrandom);
for (i=0; i<questions.length; i++) {
questions[i].qname="Spørsmål "+(i+1);}
count=questions.length;
for (i=0; i<count; i++) doQuestion(i);
}
function fill(s,l){
s=s+""
for (y=1;y<=l;y++)
if (s.length>=l) break; else s="0"+s;
return s
}
function CheckQName(wapf,ii,i,multi,selection){
var len;
if (!multi) return(wapf.elements[ii].name==questions[i].qname);
len=questions[i].qname.length;
if (wapf.elements[ii].name.substring(0,len)!=questions[i].qname) return false;
if (wapf.elements[ii].name.substring(len,len+1)!="_") return false;
if (eval(wapf.elements[ii].name.substring(len+1,len+3))==(selection+1)) return true;
return false;
}
function errore(uno,due,tre)
{
if (!errori) global[1]="<H3>Du har gjort følgende feil</H3>";
++errori;
cachewrite("<p><b>"+uno+"</b><br>"+due+"<br>"+mycomment+tre+"</p>",2);
mycomment="";
}
function testIE5plus(){
var pos=navigator.appVersion.lastIndexOf('MSIE ');
if (pos != -1) {
pos+=5;
if (eval(navigator.appVersion.charAt(pos))>4)
return true;}
return false;}
function correct(wapf)
{
var i, ii, t, re, tmp, selection, multi, multipage=0, type, isnull, iswrong, iscorrect, evaluation=0, total=0, udat;
errori=waitTime=0;
udat=new Array();
for (i=0, ii=0; i<wapf.elements.length; i++)
{tmp=wapf.elements[i];
if (tmp.name.substring(0,13)=="Quiz.UserData"){
t=tmp.name.substring(14,tmp.name.length);
re=new RegExp("_", "g");
t=t.replace(re," ");
udat[ii++]=t+": <i>"+tmp.value+"</i><br>";
if (opera) tmp.value="";}}
global[0]=global[2]="";
global[1]="<h3>Gratulerer - alle spørsmål er riktig besvart</h3>";
cachewrite("<html><head><title>Resultat for reisequiz til Buenos Aires</title><BASE target='_blank'></head><body bgcolor='#FFFFFF'><font face='Verdana, Arial'><table border=0 cellpadding=0 cellspacing=0 width='100%' bgcolor='#C0C0C0'><tr><td width='100%'><font face='Verdana, Arial' size=5 color='#FFFFFF'><b>&nbsp;Resultat på Buenos Aires reisequiz</b></font></td></tr></table>",0)
now= new Date()
cachewrite("<small><p>"+fill((now.getMonth()+1),2)+"/"+fill(now.getDate(),2)+"/"+now.getYear()+"&nbsp;&nbsp;"+fill(now.getHours(),2)+":"+fill(now.getMinutes(),2)+"</p>",0)
cachewrite("<big>Buenos Aires Reisequiz hos Reiseplaneten.no</big><br><br>\n",0);
if (udat.length>0) {
cachewrite("<b>Informasjon</b><br>\n",0);
for (i=0; i<udat.length; i++) cachewrite(udat[i],0);}
if (opera7 && multipage) {
for (i=0; i<questions.length; i++) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
id.style.display=id2.style.display="block";}
document.getElementById('wq_final').style.display='block';
}

for (i=0; i<questions.length; i++) {
if (opera && multipage) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
id.style.visibility=id2.style.visibility="visible";}
type=questions[i].type;
if (type==1) multi=1;
else multi=0;
isnull=true;
iscorrect=false;iswrong=false;
selection=0;
evaluation=0;
mycomment="";
for (ii=0; ii<wapf.elements.length; ii++) {
if (CheckQName(wapf,ii,i,multi,selection)) {
if (type>=3 && wapf.elements[ii].value!="") {
isnull=false;
if (wapf.elements[ii].value.toLowerCase()==questions[i].corrects.toLowerCase()) iscorrect=true;
else iswrong=true;
++selection;}
else if (wapf.elements[ii].checked) {
if (questions[i].score!="") evaluation+=questions[i].score[selection];
if (isnull) isnull=false;
if (questions[i].corrects[selection]=="1") iscorrect=(iswrong==false)?true:false;
else {
iswrong=true;
if (multi && questions[i].corrects!='') errore(questions[i].qname,"The checkbox  <i>"+questions[i].response[selection]+"</i>  skulle ikke vært valgt.",questions[i].explan)
}
if (questions[i].comment!="" && questions[i].comment[selection]!="")
mycomment+=((iscorrect || questions[i].corrects=='')?"<b>"+questions[i].qname+"</b><br>":"")+"<small>"+questions[i].comment[selection]+"</small><br>";
} else {
if (questions[i].corrects[selection]=="1") {
iswrong=true;
if (multi && questions[i].corrects!='') errore(questions[i].qname,"The checkbox  <i>"+questions[i].response[selection]+"</i>  skulle blitt valgt.",questions[i].explan);
}}
++selection;
}}
if (multi==false && (isnull || iswrong)) {
var okresp="", z;
if (type>=3) okresp=questions[i].corrects;
else {
for (z=0; z<questions[i].corrects.length; z++) {
if (questions[i].corrects[z]==1) {
okresp=questions[i].response[z];
break;
}}}
if (okresp!="") errore(questions[i].qname,"Riktig svar: <i>"+okresp+".</i>",questions[i].explan);
}
if (mycomment!="") cachewrite(mycomment,2);
if (questions[i].corrects!="") ++qright;
if (isnull) evaluation+=questions[i].ifnull;
else if (iswrong) evaluation+=questions[i].ifwrong;
else if (iscorrect) evaluation+=questions[i].ifcorrect;
total+=evaluation;}
if (qright==0) global[1]="<br>";
if (errori) cachewrite("<br><b>Du har "+errori+" "+(errori==1?"feil":"feil")+".</b>",2);
cachewrite("<br><b>Total poengsum: "+total+".</b><br>",2);

cachewrite("<br><b>Evaluering av reisequiz om Buenos Aires:</b><br>"+GetEval(total)+"<br>",2);
cachewrite("</small><hr noshade><center><form>",2)
printest=(((navigator.appName=="Netscape") && (navigator.appVersion.charAt(0)>="4")) || (testIE5plus() == true))? "print()": "alert('This button can be used with Netscape Navigator 4 or Microsoft Internet Explorer 5 only. If you want to print with other browsers, please select the Print command in the File menu.')"
cachewrite("<input type='button' value='Print...' onClick='"+printest+"'>&nbsp;&nbsp;&nbsp;&nbsp;",2)
cachewrite("<input type='button' value='Close' onClick='window.close()'></form></center>",2)
cachewrite(aknw,2)
winr=window.open('','wapres', 'titlebar=1,location=0,directories=0,menubar=1,toolbar=0,scrollbars=1,resizable=1,status=1')
for (i=0; i<3; i++) winr.document.write(global[i]);winr.document.close()
if ((opera || opera7) && multipage) {
document.forms[0].elements[0].value='Print...';
document.forms[0].elements[1].value='Close';
for (i=0; i<questions.length; i++) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
opera?id.style.visibility=id2.style.visibility="hidden":id.style.display=id2.style.display="none";}}
}
aknw="<br><p align='center'><small><small>Created and managed with <a title='Click here to visit WebQuiz site' href='http://www.smartlite.it/go.asp?OLDLP' target = '_blank'>SmartLite WebQuiz</a></small></small></p>"
function myrandom(a,b)
{
var rc;
do {rc=Math.floor(Math.random()*3)-1;} while (rc==2);
return(rc);
}
function GetEval(total)
{
var minval, maxval, valstr, top, i;
minval=new Array(0,5,11,15);
maxval=new Array(5,10,14,15);
valstr=new Array("<font face=\"Verdana\" size=2>Dette var ikke s&aring; bra. Du m&aring; nok lese v&aring;r reiseguide om Buenos Aires grundig og gj&oslash;re testen p&aring; nytt. Les mer her </font><a href=http://www.reiseplaneten.no><font face=\"Verdana\" size=2><u>Reiseplaneten</u></font></a><font face=\"Verdana\" size=2>&nbsp;</font>","<font face=\"Verdana\" size=2>Ikke s&aring; verst,  men leser du Reiseplanetens guide om Buenos Aires blir du enda flinkere.</font>","<font face=\"Verdana\" size=2>Meget bra. Du m&aring; ha lest v&aring;re gode reiseguider? Man f&aring;r mye mer ut av en reise hvis man har brukt tid p&aring; &aring; sette seg litt inn i destinasjonen man bes&oslash;ker</font>","<font face=\"Verdana\" size=2>Helt fantastisk. Send oss dine reisetips!&nbsp; Eller har du jukset?</font>","non disponibile.");
top=minval.length;
for (i=0;i<top;i++) if (total>=minval[i] && total<=maxval[i]) break;
return(valstr[i]);}
