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("a. opportunity cost","b. constant cost","c. increasing cost","d. trade-offs")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"What economic concept is included in gragh A, but is not included in graph B?<img src=\"wb_ppcurve_qst_1_1.PNG\" width=\"561\" height=\"236\" border=\"0\" alt=\"graphic\"/>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. the one best combination of outputs","b. potential output","c. total wanted output of goods by consumers","d. a level of output that cannot be achieved")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"In a graphic Production-Possibilities Model, the curve or frontier represents",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. only in international economics","b. only in microeconomics","c. only in macroeconomics","d. in both macroeconomics and microeconomics")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"Production-Possibilities graphs are used",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. natural resources","b. labor resources","c. capital resources","d. all resources")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"A production- possibilities model illustrates how efficiently an entitity uses",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. more money is required to buy more products","b. it is more costly to buy goods when only two types of goods are produced","c. as the production of a good increases, eventually less suitable resources are used","d. consumers arfe willing to pay more for goods that are produced in greater quantities")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"The economic condition of increasing cost occurs because",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. it is an economic resource","b. it allows the firm to acquire more economic resources","c. it has intrinsic value","d. it is a fixed commodity")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"The reason why money is important to a firm is",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. can produce more corn and beans without additional resources","b. can produce more corn but not more beans without additional resources","c. can produce more beans but not more corn without more resources","d. can produce output D without more resources")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"Refer to graph PPC #2<br>An economy that is producing at output A<br><img src=\"wb_ppcurve_qst_7_1.PNG\" width=\"444\" height=\"461\" border=\"0\" alt=\"graphic\"/>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. needs to employ more resources`","b. has opted to produce more beans and less corn","c. has opted to produce more corn and less beans","d. has opted to produce more corn and more beans")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"Refer to graph PPC#2<br>An Economy that moves from production point B to production point C",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. cannot without more resources or better technology","b. would have to forego some production of corn","c. would have to forego some production of beans","d. needs to employ more of its current resources")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"Refer to graphPPC #2<br>An economy that wants to produce at production level D",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. is productively efficient","b. is wisely conserving all of its resources","c. is in a recession","d. is producing at an optimal level")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"Refer to graph PPC#2<br><br /><br>An economy that is producing at output level A",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. point B","b. point C","c. it does not matter. Any point on the production-possibilities frontier is allocatively efficient.","d. the economy does not have enough resources to be allocatively efficient")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"Refer to graph PPC #2<br><br /><br>This economy moves from production level A to the production-possibilities frontier. Given that the consumers prefer beans to corn, the economy would more likely achieve allocative efficiency if it moved to",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. durable goods and non-durable goods","b. manufacturing goods and agricultural goods","c. tangible goods and non-tangible goods","d. military goods and consumer goods")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"<font face=\"Times New Roman\" size=\"5\">Refer to graph PPC #3</font><br><font face=\"Times New Roman\" size=\"5\">The production-possibilities graph PPC #3 uses the output headings guns and butter. These headings are traditionally used in macroeconomics to represent</font><img src=\"wb_ppcurve_qst_12_1.PNG\" width=\"551\" height=\"539\" border=\"0\" alt=\"graphic\"/>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. the gain of two butters","b. the loss of two butters","c. the loss of one butter","d. the gain of one butter")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest013 = new Question(
"Question 13",
0,
"Refer to graph PPC #3<br>If this economy is at full employment and moves from the production of 4 guns to the production of 5 guns, the opportunity cost is",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. one gun","b. two guns","c. one half of a gun","d. eight guns")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest014 = new Question(
"Question 14",
0,
"Refer to graph PPC #3<br>If this economy is at full employment and moves from the production of 4 butters to the production of 6 butters the opportunity cost of each additional butter is",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. shows an increasing cost because each gun has an opportunity cost of two butters","is not a constant cost graph because the opportunity cost is greater or less than one for one","is a hybrid between a constant cost graph and an increasing cost graph because the opportunity cost is not one for one","is a constant cost graph because the opportunity cost of producing guns or butter is the same at all levels of production")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest015 = new Question(
"Question 15",
0,
"Refer to PPC #3<br>The graph labeled PPC #3",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. that country Nerc is more efficient because it uses fewer resources to produce both guns and butter","b. Country Oodles is more effricient because it produces more guns and butter","the production possibilities of both Oodlles and Nerc","is incorrect because it shows more than one set of opportunity costs")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest016 = new Question(
"Question 16",
0,
"<font face=\"Times New Roman\" size=\"5\">Refer to graph PPC #4</font><br><font face=\"Times New Roman\" size=\"5\">Graph PPC #4 illustrates</font><br><br /><br><img src=\"wb_ppcurve_qst_16_1.PNG\" width=\"595\" height=\"608\" border=\"0\" alt=\"graphic\"/>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Nerc","`Oodles","Both have absolute advantage in the production of guns","Neither has absolute advantage in the production of guns")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest017 = new Question(
"Question 17",
0,
"Refer to graph PPC #4<br>Which country has the absolute advantage in the production of guns?",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. Nerc it uses fewer resources","b. Oodles is produces more butter","c. neither country","d. both countries have the absolute advantage if they are on their respective frontier.")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest018 = new Question(
"Question 18",
0,
"Refer to graph #4<br>Which country has the absolute advantage in the production Butter?",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. Nerc because it produces fewer units of butter","b. Nerc because it's opportunity cost is less than Oodles","c. Oodles because it produces more butter","d. Oodles because it has less opportunity cost")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest019 = new Question(
"Question 19",
0,
"Refer to graph PPC #4<br>Which country has the comparative advantage in the production of butter?",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. Oodles because it has the lowest opportunity cost","b. Oodles because it can produce more guns","c. Nerc because it has the lowest opportunity cost","d. Nerc because it uses fewer resources in the production of guns")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest020 = new Question(
"Question 20",
0,
"Refer to graoh PPC #4<br>Which country has the comparative advantage in the production of guns?",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. OOdles should specialize in the production of butter because it can produce more butterand Nerc should specialize in the production of guns because it uses fewer resources.","Oodles should specialize in the production of butter because it has the lowest opportunity cost and Nerc should specialize in guns because it has the lowest opportunity cost","Noodles should specialize in guns because it has the lowest opportunity cost and Nerc should specialize in butter because it has the lowest opportunity cost","Oodles should specialize in both guns and butter because it can produce more of each good")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest021 = new Question(
"Question 21",
0,
"Refer to graph PPC #4<br>Determine which country should specialize in the production of guns and shich should specialize in the production of butter and determine why.",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. 5 butters for 2 guns","b. 1 gun for 1 butter","c. 5 guns for 1 butter","d. 4 butters for 3 guns")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest022 = new Question(
"Question 22",
0,
"Refer to graph PPC #4<br>Which of the following terms of trade would allow trade to occur?",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. the output of corn and wheat of two farms","b. the fact that Reff's farm has the absolute advantage in the production of corn and wheat and Bru's farm does not have absolute advantage in either corn or wheat","c. input of land required for the production of corn and wheat on both Reff's farm and Bru's farm","an incorrectly drawn graph because neither farm can produce 10,000 bushels of corn")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest023 = new Question(
"Question 23",
0,
"<font face=\"Times New Roman\" size=\"5\">Graph PPC # 5 illustrates</font><br><br /><br><img src=\"wb_ppcurve_qst_23_1.PNG\" width=\"605\" height=\"656\" border=\"0\" alt=\"graphic\"/>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a. neither farmer has the absolute advantage in the production of wheat","b. the absolute advantage cannot be determined because there is no ouput per acre given","c. Reff's farm has the absolute advantage in the production of wheat and Bru's farm does not.","d. Bru's farm has the absolute advantage in the production of wheat because it has the lowest opportunity cost")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest024 = new Question(
"Question 24",
0,
"<font face=\"Times New Roman\" size=\"5\">Refer to graph PPC #5</font><br><font face=\"Times New Roman\" size=\"5\">Which farmer has the absolute advantage in the production of wheat?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. Reff's farm has the comparative advantage in the production of corn because this farm can produce more corn","Reff's farm has the comparative advantage in the production of corn because it has the lowest opportunity cost","Bru's farm has the comparative advantage in the production of corn because it has the lowest opportunity cost","neither farm has the comparative advantage in the production of corn")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest025 = new Question(
"Question 25",
0,
"Refer to graph PPC #5<br>Which farm has the comparative advantage in the production of Corn?",
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)

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;


document.writeln ("<a name=\""+questions[quest].qname+"\"></a>")
document.write("\n")
document.write("    <tr>\n")
document.write("      <td width=\"5%\" align=\"center\" valign=\"top\" bgcolor=\"#E6E6FF\"><font face=\"Verdana\"\n")
document.write("      color=\"#000080\"><strong><small>")
document.write(numord)
document.write("</small></strong></font></td>\n")
document.write("      <td width=\"95%\" valign=\"top\" bgcolor=\"#F4F4FF\"><font face=\"Verdana\"><font color=\"#000080\"><strong><small>\n")
document.write("      ")
if (questions[quest].img!="") {
document.write("\n")
document.write("         <img border=\"0\" hspace=\"10\" vspace=\"5\" align=\"left\" src=\"")
document.write(questions[quest].img)
document.write("\">\n")
document.write("      ")
}
document.write("\n")
document.write("      ")
document.writeln(questions[quest].qstring)
document.write("</small></strong></font><br>\n")
document.write("      <br><small><small>\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")
if (type<3) document.write(questions[quest].response[i]);
document.write("<br>\n")
document.write("      ")
}
document.write("\n")
document.write("      </small></small></font></td>\n")
document.write("    </tr>\n")
document.write("    ")
}
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,due,tre)
{
if (!errori) global[1]="<H3>You have made the following errors</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>Congratulations, you haven't made any errors</h3>";
cachewrite("<html><head><title>Results</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;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>Production-Possibilities Models</b><br><br>\n",0);
if (udat.length>0) {
cachewrite("<b>Information</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";}}

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>  shouldn't have been selected.",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>  should have been selected.",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,"The right answer was <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>You have made "+errori+" "+(errori==1?"error":"errors")+".</b>",2);
cachewrite("<br><b>Total score: "+total+".</b><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-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";}}
}
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>"

