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=900, 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("they tried to control the motion picture industry of the early 1900's","they didn't allow the use of actor's names in films","they establish motion picture standards and created an internationally competitive motion picture industry","they operated mainly on the West Coast","they used their combined patents to try to create a monopoly")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"Which is NOT true about the Motion Picture Patents Company (MPPC)",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("he produced the film, Birth of a Nation","he introducing sophisticated film and storytelling techniques","his most famous film had a strong racist theme","made a three-hour film was made to commemorate the 50th anniversary of the ending of the Civil War in the United States","was most famous for being a highly-talented actor")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"Which is NOT true about the pioneer film maker D. W. Griffith",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("a Spanish explorer who first discovered the area","a real estate agent's attempt to get holly trees to grow","an early country-western singer by the name of &quot;Holly&quot;","George F. Fox of Fox Motion Picture Studios","the name was stolen from Hollywood, Florida")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"The name &quot;Hollywood&quot; originated with",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("slapstick film comedy","the first film ratings system","the McCarthy hearings","the Supreme Court","the hit film, &quot;Intolerance&quot;")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"The names Hal Roach, Mack Sennett, and Laurel and Hardy are most associated with",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("Charlie Chaplin","Mack Sennett","Mary Pickford","Clark Gable","Anthony Rush")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"Starring in &quot;The Tramp,: the first 20th Century superstar was considered to be",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("are now considered mostly a &quot;witch hunt&quot;","made Senator Joseph McCarthy famous on TV","were supported by many film executives because they felt that writers and unions were getting too much power","ruined scores of lives and careers","all of the above are true")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"The McCarthy Hearings",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("it was found that he was a member of a Communist group","when Edward R. Morrow did a network documentary on him","when Hollywood did a number of films against him","all of the above are true","none of the above is true")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"Senator McCarthy's popularity took a nosedive when",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("they weren't sure the public would accept it","some of the top stars were foreign-born with noticeable accents","many actors who didn't have stage experience had voice and diction problems","all of the above are true","none of the above is true")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"Studios first opposed the use of sound in motion pictures because",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("20th Century Fox","Universal Studios","MGM","Warner Brothers","Paramount Studios")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"A minor studio with seemingly nothing to lose &quot;bet the company&quot; on sound.&nbsp; This studio was",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("<i>The Jazz Singer </i>","<i>Lights of New York</i>","<i>Gone With the Wind</i>","<i>The Liberty Ship</i>","<i>Birth of a Nation</i>")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"In 1927, a feature-length film featuring sound starring Al Jolson was a major hit with the public.&nbsp; This film is considered to be the first talkie.&nbsp; It was",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("the studios created elaborate sound stages and developed hundreds of acres in Southern California into back lot movie sets","the studios developed a well-coordinated and efficient factory system for turning out films&nbsp;","the majors studio hired a stable of stars and production people to do as many films as they were assigned","the independent film studios thrived","salaries skyrocketed, and the film business prospered to new heights")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"The 20 years between 1930 and 1950 are generally recognized as the studio years.&nbsp; What was NOT a characteristic of this era?",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

resp=new Array("all companies are foreign owned","a business is run by a single dictator-like person","religious groups control an industry","a industry falls into a very poor financial status","a few companies control such a large part of an industry that the action of one affects all of the others")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"At one point during its history the film business was considered an oligopoly.&nbsp; An oligopoly is when",
resp,
comm,
corr,
"",
valu,
3,
-2,
-2,
"");

questions = new Array (
quest001,quest002,quest003,quest004,quest005,quest006,quest007,quest008,quest009,quest010,quest011,quest012)

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>\n")
document.write("      <table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\" onmouseover=\"this.className='graybg'\" onmouseout=\"this.className='whitebg'\">\n")
document.write("      <tr height=5>\n")
document.write("        <td colSpan=5></td>\n")
document.write("      </tr>\n")
document.write("      <tr>\n")
document.write("        <td width=\"5%\" rowspan=\"3\"></td>\n")
document.write("        <td width=\"9%\" rowspan=\"3\" valign=\"top\" align=\"center\"><font face=\"Verdana\" size=\"7\" color=\"#C0C0C0\">")
document.write(numord)
document.write("</font></td>\n")
document.write("        <td width=\"1%\" rowspan=\"3\" background=\"s_vline.gif\">&nbsp;</td>\n")
document.write("        <td width=\"80%\" class=\"question\" valign=\"top\">\n")
document.write("         ")
if (questions[quest].img!="") {
document.write("\n")
document.write("         <img border=\"0\" hspace=\"10\" vspace=\"0\" 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("\n")
document.write("        </td>\n")
document.write("        <td width=\"5%\"></td>\n")
document.write("      </tr>\n")
document.write("      <tr height=10>\n")
document.write("        <td width=\"80%\"></td>\n")
document.write("        <td width=\"5%\"></td>\n")
document.write("      </tr>\n")
document.write("      <tr>\n")
document.write("        <td width=\"80%\" class=\"answer\">\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("        </td>\n")
document.write("        <td width=\"5%\"></td>\n")
document.write("      </tr>\n")
document.write("      <tr height=5>\n")
document.write("        <td colSpan=5></td>\n")
document.write("      </tr>\n")
document.write("      </table>\n")
document.write("    </td>\n")
document.write("  </tr>\n")
document.write("  <tr height=10>\n")
document.write("    <td>&nbsp;</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)
{
if (!errori) global[1]="<H3>You have made the following errors</H3>";
++errori;
cachewrite("<p><b>"+uno+"</b><br>This answer is not correct."+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, 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>2-3</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);
}
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>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>"
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)}}
