function Question (qname,
type,
qstring,
response,
corrects,
explan,
ifcorrect,ifwrong,ifnull,
img)
{this.qname=qname;
this.type=type;
this.qstring=qstring;
this.response=response;
this.corrects=corrects;
this.explan=explan;
this.ifcorrect=ifcorrect;
this.ifwrong=ifwrong;
this.ifnull=ifnull;
this.img=img;
}

resp=new Array("True","False")
corr=new Array("1","0")
quest001 = new Question(
"Question 1",
0,
"<p><font face=\"Times New Roman\" size=3><b>The</b> <i>Kama Sutra</i> was written by Mallanga Vatsyayana, who was rumored to be celibate</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest002 = new Question(
"Question 2",
0,
"It takes sperm 1 hour to travel 7 inches.",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest003 = new Question(
"Question 3",
0,
"<p><font face=\"Times New Roman\" size=3><b>A</b> man's testicles increase in size by 50% when he is aroused.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest004 = new Question(
"Question 4",
0,
"Women get less vaginal infections if they orgsam regularly",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("Wash with a shower massager","Masturbate","Take a very long walk","Exercise")
corr=new Array("0","1","0","0")
quest005 = new Question(
"Question 5",
0,
"Sex therapists advise women to do this to become orgasmic.",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("9%","11%","32%","24%")
corr=new Array("1","0","0","0")
quest006 = new Question(
"Question 6",
0,
"<font face=\"Times New Roman\" size=3>What percentage of men have had sex with another man?</font>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("8%","20%","5%","41%")
corr=new Array("0","1","0","0")
quest007 = new Question(
"Question 7",
0,
"What is the percentage of women that have had anal sex?",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("33%","4%","16%","29%")
corr=new Array("0","1","0","0")
quest008 = new Question(
"Question 8",
0,
"<font face=\"Times New Roman\" size=3>What percentage of women have had sex with another women?</font>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("1770's","1880's","1930's")
corr=new Array("0","1","0")
quest009 = new Question(
"Question 9",
0,
"When was the Vibrator invented?",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("1 year","4 years","2 years","6 years")
corr=new Array("0","0","1","0")
quest010 = new Question(
"Question 10",
0,
"What is the average shelf life for a latex condom?",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("0","1")
quest011 = new Question(
"Question 11",
0,
"Both male and female orgasms grow weaker with age.",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("Utah","New Mexico","Nevada","Alabama")
corr=new Array("0","0","1","0")
quest012 = new Question(
"Question 12",
0,
"In what state is it illegal to have sex without a condom?",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("18%","25%","80%","60%")
corr=new Array("0","0","0","1")
quest013 = new Question(
"Question 13",
0,
"What percentage of women say they did not enjoy sex the first time?",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest014 = new Question(
"Question 14",
0,
"4% of American women own no undergarments.",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest015 = new Question(
"Question 15",
0,
"<p><font face=\"Times New Roman\" size=3><b>Besides</b> the genitals and the breasts, the inner nose is the only other body part that routinely swells during intercourse.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest016 = new Question(
"Question 16",
0,
"<p><font face=\"Times New Roman\" size=3><b>Women</b> who are housewives are, as a whole, more faithful than working women.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest017 = new Question(
"Question 17",
0,
"<p><font face=\"Times New Roman\" size=3><b>Menstrual</b> cramps have been known, in rare cases, to induce orgasms.</font><font face=\"Times New Roman\" color=\"#0000ff\" size=2><b> </b></font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest018 = new Question(
"Question 18",
0,
"<p><font face=\"Times New Roman\" size=3><b>The</b> name of Wyoming's Grand Teton peak literally means &quot;big tit.&quot;</font><font face=\"Times New Roman\" color=\"#0000ff\" size=2><b> </b></font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest019 = new Question(
"Question 19",
0,
"<p><font face=\"Times New Roman\" size=3><b>It's </b>been estimated that one out of every two hundred women is born with an extra nipple</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest020 = new Question(
"Question 20",
0,
"<p><font face=\"Times New Roman\" size=3>Fellatio ranks as the number one sexual act desired by heterosexual men.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest021 = new Question(
"Question 21",
0,
"<p><font face=\"Times New Roman\" size=3>The word pornography' comes from the Greek meaning the &ldquo;writings of prostitutes.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("15%","70%","40%","27%")
corr=new Array("0","1","0","0")
quest022 = new Question(
"Question 22",
0,
"<p>What <font face=\"Times New Roman\" size=3>percent of women would rather have chocolate than sex?</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest023 = new Question(
"Question 23",
0,
"<p><font face=\"Times New Roman\" size=3>Oneirogmophobia is the fear of wet dreams.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest024 = new Question(
"Question 24",
0,
"<p><font face=\"Times New Roman\" size=3>The male fetus is capable of attaining an erection during the last trimester. </font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("3000","800","44000","11000")
corr=new Array("0","0","0","1")
quest025 = new Question(
"Question 25",
0,
"<p><font face=\"Times New Roman\" size=3>How many Americans hurt themselves while trying out bizarre sexual acts?</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("May","June","March","April")
corr=new Array("0","1","0","0")
quest026 = new Question(
"Question 26",
0,
"<p><font face=\"Times New Roman\" size=3>In what month do most Americans lose their virginity? <br><br></font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("45 seconds","2 minutes","15 seconds","3 minutes")
corr=new Array("0","1","0","0")
quest027 = new Question(
"Question 27",
0,
"<p><font face=\"Times New Roman\" size=3>The average American man lasts how long after penetration? <br><br></font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("5 MPH","15 MPH","28 MPH","34MPH")
corr=new Array("0","0","1","0")
quest028 = new Question(
"Question 28",
0,
"<p><font face=\"Times New Roman\" size=3>What is the average speed of a male ejaculation? </font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest029 = new Question(
"Question 29",
0,
"<p><font face=\"Times New Roman\" size=3>Kellogg's Corn Flakes were invented by a Dr. Kellogg in hopes that they would reduce masturbation.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest030 = new Question(
"Question 30",
0,
"<p><font face=\"Times New Roman\" size=3>Cleopatra had stones inserted in her vagina to prevent her from getting pregnant.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("Camel dung","Cow dung","Tree leafs")
corr=new Array("1","0","0")
quest031 = new Question(
"Question 31",
0,
"<p><font face=\"Times New Roman\" size=3>Cleopatra made her diaphragm from </font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("Elephant","Mouse")
corr=new Array("0","1")
quest032 = new Question(
"Question 32",
0,
"<p><font face=\"Times New Roman\" size=3>Which is longer the sperm of a mouse or the sperm of an elephant.</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("100","20","300","500")
corr=new Array("0","0","1","0")
quest033 = new Question(
"Question 33",
0,
"<p><font face=\"Times New Roman\" size=3>A bull can inseminate how many cows from one single ejaculation</font></p>",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("20%","58%","30%","72%")
corr=new Array("0","1","0","0")
quest034 = new Question(
"Question 34",
0,
"According to a survey what percent of American couples like dirty talk during sex.",
resp,
corr,
"",
10,
0,
0,
"");

resp=new Array("True","False")
corr=new Array("1","0")
quest035 = new Question(
"Question 35",
0,
"<p><font face=\"Times New Roman\" size=3>The average rate of intercourse for American couples is clocked at 3.5 mph.</font></p>",
resp,
corr,
"",
10,
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)

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(" <input type="+gadget+" name=\""+myname);
if (type<3) document.write("\" value=\""+i+"\">\n")
else document.write("\" 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, newq;
questions.sort(myrandom);
newq=questions.slice(0,10);questions=newq;
for (i=0; i<questions.length; i++) {
questions[i].qname="Question "+(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) winr.document.write("<H3>You have made the following errors</H3>");
++errori;
winr.document.write("<p><b>"+uno+"</b><br>"+due+"<br>"+tre+"</p>");
}
function correct(wapf)
{
var i, ii, t, re, tmp, selection, multi, type, isnull, iswrong, iscorrect, evaluation=0, total=0, udat;
errori=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>";}}
winr=window.open('','wapres', 'titlebar=1,location=0,directories=0,menubar=1,toolbar=0,scrollbars=1,resizable=1,status=1')
winr.document.write("<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>")
now= new Date()
winr.document.write("<small><p>"+fill((now.getMonth()+1),2)+"/"+fill(now.getDate(),2)+"/"+now.getYear()+"&nbsp;&nbsp;"+fill(now.getHours(),2)+":"+fill(now.getMinutes(),2)+"</p>")
if (udat.length>0) {
winr.document.write("<b>Information</b><br>\n");
for (i=0; i<udat.length; i++) winr.document.write(udat[i]);}

for (i=0; i<questions.length; i++) {
type=questions[i].type;
if (type==1) multi=1;
else multi=0;
isnull=true;
iscorrect=false;iswrong=false;
selection=0;
evaluation=0;
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 (isnull) isnull=false;
if (questions[i].corrects[selection]=="1") iscorrect=(iswrong==false)?true:false;
else {
iswrong=true;
if (multi) errore(questions[i].qname,"The checkbox  <i>"+questions[i].response[selection]+"</i>  shouldn't have been selected.",questions[i].explan)
}} else {
if (questions[i].corrects[selection]=="1") {
iswrong=true;
if (multi) 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;
}}}
errore(questions[i].qname,"The right answer was <i>"+okresp+".</i>",questions[i].explan);
}
if (isnull) evaluation+=questions[i].ifnull;
else if (iswrong) evaluation+=questions[i].ifwrong;
else if (iscorrect) evaluation+=questions[i].ifcorrect;
total+=evaluation;}
if (errori) {var voc=(errori==1)?"":"s";winr.document.write("<br><b>You have made "+errori+" error"+voc+".</b>");}
else winr.document.write("<h3>Congratulations, you haven't made any errors</h3>")
{var voc=(total==1)?"":"s";winr.document.write("<br><b>Total score: "+total+" point"+voc+".</b><br>");}

winr.document.write("</small><hr noshade><center><form>")
printest=(((navigator.appName=='Netscape') && (navigator.appVersion.charAt(0)>='4')) || (navigator.appVersion.lastIndexOf('MSIE 5') !=-1))? '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.")'
winr.document.write("<input type='button' value='Print...' onClick='"+printest+"'>&nbsp;&nbsp;&nbsp;&nbsp;")
winr.document.write("<input type='button' value='Close' onClick='window.close()'></form></center>")
winr.document.write(aknw)
winr.document.close()
if (navigator.appVersion.lastIndexOf('MSIE 3') == -1) nomsie3=true
else nomsie3=false
if (nomsie3) winr.focus()
}
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);
}
