Author_Author

Version 2.0

This tool will construct quizzes which call for 'written' responses from your students. It will allow you to specify up to two words to use in parsing each answer. You can establish various logical relationships between the words or you can exclude a word if you want. You cannot use quote marks in your questions but the single quote or apostrophe is OK.
The script, algorithms, and concepts included here are copyright 1998 by Carl Adler. This is not freeware or shareware for use by license only. Not for distribution.

This is a demo and will make only one question tests!
Use NN4 (pc or Mac) or IE4 (pc only).

Step 1: Enter your email address: Step completed:
Leave blank if you don't want the results mailed to you. However you still must execute this step.

Step2:Number of questions: Step completed:

Step3: Enter first word to search for: Step completed:
(Use wildcard tel*v*ion for television. This allows you to give poor spellers a break, allows for different spellings, col*r matches color and colour, etc.)

Step4: Enter second word to search for: Step completed:
(Use wildcard tel*v*ion for television. )
New feature: you can now use alternate words for the second word by using the OR operator (||). If you will accept 'radio' or 'television' for your second word, enter it as 'radio||tel*ion'.
You can leave this blank but you still must execute this and the following step.

Step5: Second word should occur: times
Step completed:
Note that 'any number' means any number save zero and zero means that the word does not occur. .

Step6: Do you want to preserve word order? Step completed:
This is based on first occurrence only. If 'black' is to come before 'cat', the phrase 'A black cat is a cat that is black' would evaluate as true.

Step7: Do you want the words to be adjacent? Step completed:
Note: words such as 'a', 'an' and 'the' are ignored in the body of the statement.

Step8: Will be correct if either word occurs? Step completed:

Step9: Type your question here!
Step completed:

Step10: Question Being Processed:
Repeat steps 3 through 9. Go to 11 when you have entered all questions.

Step11:

Step 12: Select the text in the form field below and use control-c (pc) or command-c (Mac) to copy the code to the clipboard, paste into a blank text document created by a text editor such as Wordpad or Simpletext and save as text by whatever name you want ending with .htm or .html.

<HTML><HEAD>
<TITLE>QuestionAnswer</TITLE>
<SCRIPT LANGUAGE="JavaScript1.1">
<!-- Beginning of JavaScript -
var mainStr2=""
var indarray
var indarray2
function startit(){
window.document.forms[1].OverAllGrade.value="0.0"
window.document.forms[1].OverAllReport.value=""
}

function makeArray(n){
this.length=n;
return this}

function parseit(obj,count){
obj.elements[xxx1*14].value=obj.elements[xxx1*14].value/1

obj.elements[count+6].value=eval(obj.elements[count+6].value);

input1=obj.elements[count+1].value;

input1=input1.toUpperCase();

input2a=obj.elements[count+5].value;

input2a=replaceString(input2a," a "," ");
 
input2a=replaceString(input2a," an "," ");

input2a=replaceString(input2a," the "," ");

input2a=replaceString(input2a,"    "," ");

input2a=replaceString(input2a,"   "," ");

input2a=replaceString(input2a,"  "," ");

input2a=input2a.toUpperCase();

wordarray=input2a.split(" ");

indarray = new makeArray(wordarray.length);

for(var i=0;i<wordarray.length;i++){

input2=wordarray[i]

if(spellit(input1,input2))
{

indarray[i]=1;

j=i+1

obj.elements[count+8].value+=j;

obj.elements[count+6].value=eval(obj.elements[count+6].value)+1;
} else {

indarray[i]=0;
}
}

}

function parseit2(obj,count){

obj.elements[count+7].value=eval(obj.elements[count+7].value);
if(obj.elements[count+3].value!=""){

input1=obj.elements[count+3].value;
input3=input1.split("||")
checkrell:
if(input3.length==1){

input1=input1.toUpperCase();

input2a=obj.elements[count+5].value;

input2a=replaceString(input2a," a "," ");

input2a=replaceString(input2a," an "," ");

input2a=replaceString(input2a," the "," ");

input2a=replaceString(input2a,"    "," ");

input2a=replaceString(input2a,"   "," ");

input2a=replaceString(input2a,"  "," ");

input2a=input2a.toUpperCase();

wordarray=input2a.split(" ");

indarray2 = new makeArray(wordarray.length);

for(var i=0;i<wordarray.length;i++){

input2=wordarray[i]

if(spellit(input1,input2))
{

indarray2[i]=1;
j=i+1
obj.elements[count+9].value+=j;

obj.elements[count+7].value=eval(obj.elements[count+7].value)+1;
} else {

indarray2[i]=0;
}
}
}else{
cc=0
input1=input3[0];

input1=input1.toUpperCase();

input2a=obj.elements[count+5].value;

input2a=replaceString(input2a," a "," ");

input2a=replaceString(input2a," an "," ");

input2a=replaceString(input2a," the "," ");

input2a=replaceString(input2a,"    "," ");

input2a=replaceString(input2a,"   "," ");

input2a=replaceString(input2a,"  "," ");

input2a=input2a.toUpperCase();

wordarray=input2a.split(" ");

indarray2 = new makeArray(wordarray.length);

for(var i=0;i<wordarray.length;i++){

input2=wordarray[i]

if(spellit(input1,input2))
{

indarray2[i]=1;
j=i+1
obj.elements[count+9].value+=j;
cc=1

obj.elements[count+7].value=eval(obj.elements[count+7].value)+1;
} else {

indarray2[i]=0;
}
}
if(cc==1){break checkrell};
input1=input3[1];

input1=input1.toUpperCase();

input2a=obj.elements[count+5].value;

input2a=replaceString(input2a," a "," ");

input2a=replaceString(input2a," an "," ");

input2a=replaceString(input2a," the "," ");

input2a=replaceString(input2a,"    "," ");

input2a=replaceString(input2a,"   "," ");

input2a=replaceString(input2a,"  "," ");

input2a=input2a.toUpperCase();

wordarray=input2a.split(" ");

indarray2 = new makeArray(wordarray.length);

for(var i=0;i<wordarray.length;i++){

input2=wordarray[i]

if(spellit(input1,input2))
{

indarray2[i]=1;
j=i+1
obj.elements[count+9].value+=j;

obj.elements[count+7].value=eval(obj.elements[count+7].value)+1;
} else {

indarray2[i]=0;
}
}
}

}
}

function spellit(input1,input2){
if(input1.lastIndexOf("*")==input1.length-1){input1=input1+" "}

myarray=input1.split("*");

if(input1.indexOf("*")==-1)

{

if(input1==input2)
      {
    
     return true

} else {
    
    return false
    }

}else{

check1=input2.indexOf(myarray[0]);

if(check1!=0)
               {
            
             return false;

} else {
//Build the search expression

re2=myarray[0]

for(i=1;i<myarray.length;i++){
                            re2+="\\D*"+myarray[i]}

re2+="\\b"

re3=re2.split(" ")
if(re3.length!=1){re2=re3[0]+re3[1]}           
re=new RegExp(re2)

if(input2.search(re)!=-1){

return true
}else{
return false
}

}
        
}

}

function evalat(obj,count){
cnt=eval(count+1)
count=eval(count*14)

if(obj.elements[count+3].value==""){

if(obj.elements[count+6].value!=0){obj.elements[count+13].value="right";obj.elements[xxx1*14].value=eval(eval(obj.elements[xxx1*14].value)+100/xxx1);obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  right  "}else{obj.elements[count+13].value="wrong";obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  wrong  "}

}

checkrel1:
if(obj.elements[count+3].value!=""&&obj.elements[count+4].value=="any number")

{
if(eval(obj.elements[count+8].value-obj.elements[count+9].value)>0&&obj.elements[count+10].value=="1"){
obj.elements[count+13].value="wrong";obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  wrong  ";
break checkrel1
}
if(Math.abs(eval(obj.elements[count+8].value-obj.elements[count+9].value))!=1&&obj.elements[count+11].value=="1"){
obj.elements[count+13].value="wrong";obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  wrong  ";
break checkrel1
}
if((obj.elements[count+6].value!=0||obj.elements[count+7].value!=0)&&obj.elements[count+12].value=="1"){
obj.elements[count+13].value="right";obj.elements[xxx1*14].value=eval(eval(obj.elements[xxx1*14].value)+100/xxx1);obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  right  ";
break checkrel1
}
if(obj.elements[count+6].value!=0&&obj.elements[count+7].value!=0)
{obj.elements[count+13].value="right";obj.elements[xxx1*14].value=eval(eval(obj.elements[xxx1*14].value)+100/xxx1);obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  right  "}else{obj.elements[count+13].value="wrong";obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  wrong  ";}
}

checkrel2:
if(obj.elements[count+4].value!="any number"&&obj.elements[count+3].value!=""){

if(obj.elements[count+6].value!=0&&obj.elements[count+7].value==0){obj.elements[count+13].value="right  ";obj.elements[xxx1*14].value=eval(eval(obj.elements[xxx1*14].value)+100/xxx1);obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  right "      }else{
obj.elements[count+13].value="wrong";obj.elements[xxx1*14+1].value+="<BR>ques"+cnt+"  wrong  "}

}

function controlit(obj){
startit()
obj.named.value=document.forms[0].name.value;
obj.section.value=document.forms[0].section.value;
countto=eval(xxx1)
for(count=0;count<countto;count++){parseit(obj,count*14);parseit2(obj,count*14);evalat(obj,count)}
caseit=Math.round(obj.elements[xxx1*14].value)
var msg=open("","DisplayWindow2");

msg.document.write("<head></head><BODY TEXT='#0033FF' BGCOLOR='#FFFFFF'>"); 
msg.document.write("results: <BR>"+obj.elements[xxx1*14+1].value+"<BR> Grade: <BR>"+caseit+"<BR>")
msg.document.close();

}

// - End of JavaScript - -->
</SCRIPT>

</HEAD>
<BODY BGCOLOR="#FFFFFF" text="#0000bb"><BASEFONT SIZE=4>
Use NN4 (pc or Mac) or IE4 (pc only) or better.

<FORM >
Name: <INPUT NAME="name" TYPE=Text><BR>
Section: <INPUT NAME="section" TYPE=Text></FORM>
<HR>
<FORM qqq1 >
Answer the following questions. Phrase your answers in positive terms. DEMO.<BR>
<HR>
<HR>
<INPUT NAME="question" TYPE=hidden value="kkk2">
 
Question: kkk1

<INPUT name="SecondWord" TYPE=hidden value="nnn1"> <input type=hidden NAME="nu2" value="rrr1">
  <BR>
Response: <input type=text NAME="Answer" size=70><BR>