ÿþ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=1200, 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("In a shop","In a hotel","In a taxi")

corr=new Array("0","1","0")

comm=""

valu=""

quest001 = new Question(

"Question 1",

0,

"1. Where can you see this notice?....<br><br>Please leave your room key at reception.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("In a library","In a bank","In a police station")

corr=new Array("0","1","0")

comm=""

valu=""

quest002 = new Question(

"Question 2",

0,

"2. Where can you see this notice?...<br><br>Foreign money changed here.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("Outside a theatre.","Outside a supermarket","Outside a restaurant")

corr=new Array("1","0","0")

comm=""

valu=""

quest003 = new Question(

"Question 3",

0,

"3. Where can you see this notice?...<br><br>Afternoon show begins at 2PM.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("At a travel agent's","At a music school","At a restaurant")

corr=new Array("0","1","0")

comm=""

valu=""

quest004 = new Question(

"Question 4",

0,

"4. Where can you see this notice?...<br><br><font size=2><b>CLOSED FOR HOLIDAYS</b></font><br>Lessons start again on the 8th January",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("At a cinema","In a hotel","On a camp-site")

corr=new Array("0","0","1")

comm=""

valu=""

quest005 = new Question(

"Question 5",

0,

"5. Where can you see this notice?...<br><br><b>Price per night:</b><br>-¤ 10 a tent<br>-¤ 5 a person",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("on","in","at")

corr=new Array("0","1","0")

comm=""

valu=""

quest006 = new Question(

"Question 6",

0,

"<font size=2><b>In this section (questions 6 to 20) you must choose the word wich best fits each space in the text below.</b></font><br><br>Scotland is the north part of the island of Great Britain. The Atlantic Ocean is on the west and the North Sea on the east. Some people <b>(6)............</b> Scotland speak a different language called Gaelic. There are <b>(7)...........</b> five million people in Scotland, and Edinburgh is <b>(8).........</b> most famous city.<br><br>Scotland has many mountains; the highest one is called &quot;Ben Nevis&quot;. In the south of Scotland, there are a lot of sheep. A long time ago, there <b>(9)...........</b> many forests, but now there are only a <b>(10).............</b> .<br><br>Scotland is only a samll coutry, but it is quite beautiful.<br><br><br>6. Some people ...... Scotland speak a different language",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("about","between","among")

corr=new Array("1","0","0")

comm=""

valu=""

quest007 = new Question(

"Question 7",

0,

"7. There are .......... five million people in Scotland:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("his","your","its")

corr=new Array("0","0","1")

comm=""

valu=""

quest008 = new Question(

"Question 8",

0,

"8. and Edinburgh is ..... most famous city:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("is","were","was")

corr=new Array("0","1","0")

comm=""

valu=""

quest009 = new Question(

"Question 9",

0,

"9. A long time ago, there ......... many forests:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("few","little","lot")

corr=new Array("1","0","0")

comm=""

valu=""

quest010 = new Question(

"Question 10",

0,

"10. but now there are only a .........:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("bringing","including","containing","supporting")

corr=new Array("0","1","0","0")

comm=""

valu=""

quest011 = new Question(

"Question 11",

0,

"<font size=3><b>Alice Guy Blach&eacute;</b></font><br><br>Alice Guy Blach&eacute; was the first female film director. She first became involved in cinema whilst working for the Gaumont Film Company in the late 1890s. This was a period of great change in the cinema and Alice was the first to use many new inventions, <b>(11) .............</b> sound and colour.<br><br>In 1907 Alice <b>(12) ................</b> to New York where she started her own film company. She was <b>(13) ................. </b>succesful, but,when Hollywood became the centre of the film world, the best days of the independent New York film companies were <b>(14) ...............</b> . When Alice died in 1968, hardly anybody <b>(15) ............&nbsp;</b> her name.<br><br>11. Alice was the first to use many new inventions, ........ sound and colour.:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("moved","ran","entered","transported")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest012 = new Question(

"Question 12",

0,

"12. In 1907 Alice ..........&nbsp; to New York where she started her own film company.:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("next","once","immediately","recently")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest013 = new Question(

"Question 13",

0,

"13. She was .........&nbsp; succesful:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("after","down","behind","over")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest014 = new Question(

"Question 14",

0,

"14. The best days of the independent New York film companies were ......... :",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("remembered","realised","reminded","repeated")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest015 = new Question(

"Question 15",

0,

"15. When Alice died in 1968, hardly anybody ............&nbsp; her name:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("because","therefore","although","so")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest016 = new Question(

"Question 16",

0,

"<font size=3><b>UFOs- do they exist?</b></font><br><br>UFO is short for &quot;unidentified flying object&quot;. UFOs are popularly known as flying saucers, <b>(16) ................</b> that is often the <b>(17) .................. </b>they are reported to be. The <b>(18) ............... </b>&quot;flying saucers&quot; were seen in 1947 by an American pilot, but experts who studied his claim decided it had been a trick of the light.<br>Even people experienced at watching the sky, <b>(19) ................</b> as pilots, report seeing UFOs. In 1978 a pilot reported a collection of UFOs off the coast of New Zealand. A television <b>(20) ............... </b>went up with the pilot and filmed the UFOs. Scientists studying this phenomenon later discovered that in this case they were simply lights on boats out fishing.<br><br>16. UFOs are popularly known as flying saucers, ................ that is often...:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("look","shape","size","type")

corr=new Array("0","1","0","0")

comm=""

valu=""

quest017 = new Question(

"Question 17",

0,

"17. that is often the ........... they are reported to be.:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("last","next","first","oldest")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest018 = new Question(

"Question 18",

0,

"18. The ................ &quot;flying saucers&quot; were seen in 1947:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("like","that","so","such")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest019 = new Question(

"Question 19",

0,

"19. Even people experienced at watching the sky, ............. as pilots,:",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("cameraman","director","actor","announcer")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest020 = new Question(

"Question 20",

0,

"20. A television ........... went up with the pilot and filmed the UFOs.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("should write","write","wrote","to write")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest021 = new Question(

"Question 21",

0,

"<font size=2><b>In this section (questions 21 to 40) you must choose the word or phrase which best completes each sentence.</b></font><br><br><font size=2>21. The teacher encouraged her students ................ to an English pen-friend.</font>",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("looking","for looking","to look","to looking")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest022 = new Question(

"Question 22",

0,

"22. They spent a lot of time .............. at the pictures in the museum.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("turn","come","end","go")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest023 = new Question(

"Question 23",

0,

"23. Shirley enjoys science lessons, but all her experiments seem to ................ wrong.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("Except","Other","Besides","Apart")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest024 = new Question(

"Question 24",

0,

"24. ............... from Michael, all the group arrived on time.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("accused","complained","blamed","denied")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest025 = new Question(

"Question 25",

0,

"25. She ................ her neighbour's children for the broken window.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("by","after","over","on")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest026 = new Question(

"Question 26",

0,

"26. As I had missed the history lesson, my friend went .................... the homework with me.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("matter","subject","point","case")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest027 = new Question(

"Question 27",

0,

"27. Whether she's a good actress or not is a ............... of opinion.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("built","carried","held","supported")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest028 = new Question(

"Question 28",

0,

"28. The decorated roof of the ancient palace was ............. up by four thin columns.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("agree","suit","like","fit")

corr=new Array("0","1","0","0")

comm=""

valu=""

quest029 = new Question(

"Question 29",

0,

"29. Would it ................. you if we came on Thursday?",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("doesn't need","doesn't have","needn't","hasn't got")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest030 = new Question(

"Question 30",

0,

"30. This form ............... be handed in until the end of the week.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("cross","clear","do","wipe")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest031 = new Question(

"Question 31",

0,

"31. If you make a mistake when you are writing, just .............. it out with your pen.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("differ","oppose","disagree","divide")

corr=new Array("1","0","0","0")

comm=""

valu=""

quest032 = new Question(

"Question 32",

0,

"32. Although our opinions on many things ............., we're good friends.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("by","before","within","under")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest033 = new Question(

"Question 33",

0,

"33. This product must be eaten ............... two days of purchase.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("many","another","an","a lot of")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest034 = new Question(

"Question 34",

0,

"34. The newspaper report contained ................ important information.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("move","to move","to be moving","moving")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest035 = new Question(

"Question 35",

0,

"35. Have you considered ................ to London?",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("upturn","input","upkeep","intake")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest036 = new Question(

"Question 36",

0,

"36. It can be a good idea for people who lead an active life to increase their ............ of vitamins.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("piece","part","shadow","touch")

corr=new Array("0","0","0","1")

comm=""

valu=""

quest037 = new Question(

"Question 37",

0,

"37. I thought there was a ............. of jealousy in his reaction to my good fortune.",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("advise","mention","remark","tell")

corr=new Array("0","1","0","0")

comm=""

valu=""

quest038 = new Question(

"Question 38",

0,

"38. Why didn't you ................ that you were feeling ill?",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("stood","rested","lay","centred")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest039 = new Question(

"Question 39",

0,

"39. James was not sure exactly where his best interests ............. .",

resp,

comm,

corr,

"",

valu,

1,

0,

0,

"");



resp=new Array("across","by","over","through")

corr=new Array("0","0","1","0")

comm=""

valu=""

quest040 = new Question(

"Question 40",

0,

"40. He's still getting ............... the shock of losing his job.",

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,quest016,quest017,quest018,quest019,quest020,quest021,quest022,quest023,quest024,quest025,quest026,quest027,quest028,quest029,quest030,quest031,quest032,quest033,quest034,quest035,quest036,quest037,quest038,quest039,quest040)



////////////////////////////////////////////////////////////////////////////

////////////////////////////////////////////////////////////////////////////





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 bordefile:///htdocs/test/placementtest.jsr=\"0\" src=\"")

document.write(questions[quest].img)

document.write("\"></p>\n")

document.write("       ")

}

document.write("\n")

document.write("       <p><small><font face=\"Verdana,Arial\">")

/*

document.write(numord)

document.write(". ")

*/

document.writeln(questions[quest].qstring)

document.write("</font></small></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("    ")

} // FIN DE LA FUNCION doQuestion





////////////////////////////////////////////////////////////////////////////

////////////////////////////////////////////////////////////////////////////



function doTest() {

var count, i;

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)

{

if (!errori) global[1]="<H3>You have made some errors</H3>";

++errori;

if (mycomment!="") cachewrite("<p><b>"+uno+"</b><br>"+mycomment+"</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, er, tmp, tv, selection, multi, multipage=0, type, isnull, iswrong, iscorrect, evaluation=0, total=0, udat;

errori=waitTime=0;

udat=new Array();



//// hasta aquí­ definicion de variables de la función



for (i=0, ii=0; i<wapf.elements.length; i++){

	tmp=wapf.elements[i];



		if (tmp.name.substring(0,14)=="Quiz.UserData."){

		t=tmp.name.substring(14,tmp.name.length);

		re=new RegExp("_", "g");

		t=t.replace(re," ");

/*    +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */

		tv=tmp.value.substring(0,tmp.value.length);

		er=new RegExp(" ", "g");

		tv=tv.replace(er,"_");

/*    +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */



		udat[ii++]="<input type=hidden name="+tmp.name+" value="+tv+">";

		udat[ii++]=t+": <i>"+tmp.value+"</i><br>";

		if (opera) tmp.value="";}

		}

global[0]=global[2]="";

global[1]="<h3>Congratulations, you haven't made any errors</h3>";

cachewrite("<html><head><title>Results</title><BASE target='_blank'></head><body bgcolor='#FFFFFF'leftmargin='62' rightmargin='62' style='position: relative; width: 900'><img border='0' src='header.gif' width='100%' height='100'><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;Results</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("<b>Monkey Business Placement Test (1st block)</b><br><br>\n",0);

if (udat.length>0) {

	cachewrite("<b>Information</b><br>\n",0);

	cachewrite("<form name=DataForm method=POST enctype=text/plain action=MAILTO:mail@monkeybusinessenglish.com?subject=Sending_placement_test_data>",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";}

	}



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);

	}

	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);

	}}

	++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);

}

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>You have made "+errori+" "+(errori==1?"error":"errors")+".</b>",2);



cachewrite("<br><b>Evaluation:</b><br>"+GetEval(total)+"<br>",2);

////////////////////////////////////////////////////////////////////////////////////////////////////

////////////////////////////////////////////////////////////////////////////////////////////////////

var Nivel;

if (errori>24) Nivel="Yellow";

else if (errori>16) Nivel="Orange";

else if (errori>9) Nivel="Green";

else if (errori>4) Nivel="Blue";

else Nivel="Red";

cachewrite("<input type=hidden name=Evaluation value="+Nivel+">",2);

cachewrite("<input type=hidden name=Errors value="+errori+">",2);



cachewrite("</small><hr noshade><center>",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.')"

sendTest="'submit()'"

cachewrite("<input type='button' value='Print...' onClick='"+printest+"'>&nbsp;&nbsp;&nbsp;&nbsp;",2)

cachewrite("<input type='button' value='Send...' onClick="+sendTest+">&nbsp;&nbsp;&nbsp;&nbsp;",2);

cachewrite("<input type='button' value='Back' onClick='history.back()'></form></center>",2);



if (errori<=4) cachewrite(testavanzado,2);



aknw="<br><p align='center'><small><small>Created and managed by <a title='Click here to visit our site' href='http://monkeybusiness.no-ip.org' target = '_blank'>Monkey Business English</a></small></small></p><br><p><img border='0' src='footer_01.gif' width='100%' height='90'></p></body></html>"

cachewrite(aknw,2)

winr=window

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='Back';

	for (i=0; i<questions.length-1; 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";}

	}

submit()

}



testavanzado="<br><p align='center'><b>CONGRATULATIONS! You have very good english. Would you like to do the Advanced Test?</b><br><br><b><a href='test_2.htm'>YES</a>&nbsp;&nbsp;&nbsp;&nbsp;<a href='../index.htm' target='_self'>NO</a></b><br>"



//////////////////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////////////////

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,16,24,31,36);

maxval=new Array(15,23,30,35,40);

valstr=new Array("You are in the &quot;Beginner&quot; (yellow) level","You are in the &quot;Elementary&quot; (orange) level","You are in the &quot;(Pre) intermediate&quot; (green) level","You are in the &quot;Upper-intermediate&quot; (blue) level","You are in the &quot;Advanced&quot; (red) level","non disponibile.");

top=minval.length;

for (i=0;i<top;i++) if (total>=minval[i] && total<=maxval[i]) break;

return(valstr[i]);}





function update_time(t) {self.status=t;}



function stms(s){

if (Math.abs(tmMx)>=3600){

h=Math.floor(s/3600);m=Math.floor((s%3600)/60);s=((s%3600)%60);return fill(h,2)+':'+fill(m,2)+':'+fill(s,2);

}else{m=Math.floor(s/60);s=s%60;return fill(m,2)+':'+fill(s,2);}}





function shtm(t){

tmVl=t+1;update_time(stms(Math.abs(t)))

if (waitTime==0) return;

tmId = setTimeout('shtm(tmVl)',1000)

if (t==((tmMx>0)? tmMx : 0)){

clearTimeout(tmId)

alert('Time is over, correcting questionnaire now.')



correct(document.WapForm)}}







function checkTime(){

tmMx=-waitTime;

if (tmMx!=0){

alert('Time to complete your questionnaire is: '+stms(Math.abs(tmMx))+'\n\nPlease check time count.');

shtm((tmMx>0) ? 0 : tmMx)}}