// Norton Quiz Machine Version 1.03 // Released 3/16/01 // Written by Cliff Landesman; modified by Yaching Yu and Cliff Landesman // Revised by Cliff 7/18/01 // Revised by Cliff 9/24/01 Fixed 5.0 problem with line that strips out html for email. // Improved function structure and removed a bug for Opera 5.12. // The code assumes the following external files: // quiz_demo.htm (which sets up the frames, contains all the quiz content and calls this script) // upper.htm // upper2.htm // lower.htm // confirm.htm (usually located in the directory of htm pages for the site) // quiz_style.css // ../images/begin_button.gif (called from lower.htm) // ../images/quiz_title.gif // ../images/send_quiz.gif // ../images/next_question.gif // General settings // number_questions=parent.number_questions first_try = new Array(number_questions) alpha_count = new Array("a","b","c","d","e","f","g","h","i","j") var my_correct = 0 var my_wrong = 0 var current_q = 0 var answ_html = "" // Turn off random ordering of questions? randomize_questions = "y"; // Randomize order of questions randomize() function randomize() { order = new Array(number_questions) if (randomize_questions == "y") { pool = new Array(number_questions) no_remaining = number_questions // Fill "pool" for (i=0; i<(number_questions); i++) { pool[i] = i+1 } // Set order of questions by filling "order" for (i=0; i=rand) { pool[j]=pool[j+1] } } no_remaining=(no_remaining-1) } } // Order questions without randomizing. else { for (i=0; i"+ ""+ "") upper.document.close() } // Present multiple choice questions function choices() { // Write top of page upper.document.open() upper.document.write("\n") upper.document.close() } function email() { my_score = (my_correct/number_questions)*100 my_score = Math.round(my_score); upper.document.open() upper.document.write(""+ "") upper.document.close() long_results() upper.document.form1.stu_name.focus(); } function show_answers() { resultsWindow=window.open("","resultsWindow","width=400,height=400,scrollbars=yes,resizable=yes") resultsWindow.document.write(""+ ""+ "

Results:

" + "

Total number of questions: " + parent.number_questions + "
Percent correct: " + my_score + "%" + answ_html + "

") } // Score function score(shown_no, question_no, answer_no) { correct = "q" + question_no + "answer" correct = eval(correct) choice = alpha_count[answer_no] review = "q" + question_no + "review" review = eval(review) repeat = "repeat = first_try[" + question_no + "]" repeat = eval(repeat) lower.document.open() lower.document.write(""+ "") // Student gets only one try if (repeat || repeat == 0) { lower.document.write(""+ "") // Lock radio button so it always shows first asnwer switch_radio = "upper.document.which_choices.quest" + shown_no + "[" + repeat + "].checked =true"; eval(switch_radio) } else { if (correct==choice) { lower.document.write(""+ ""+ "") // Update student's score my_correct++ // We record first try answer for locking radio button first_try[question_no] = answer_no } else { lower.document.write(""+ ""+ "") // Update student's score my_wrong++ // We record first try answer for locking radio button first_try[question_no] = answer_no } current_q++ } lower.document.write(""+ "

	Sorry, no second guessing.
	"+ "Correct! " + review + "

	"+ "Sorry, but the correct answer is (" + correct + "). "+ review + "

") lower.document.close() } function long_results() { // Include answers. for(i=0; iQuestion: " + ques answ_html = answ_html + "\n
Student answered: " + letter + ans answ_html = answ_html + "\n
Correct answer: " + correct_ans + "\) " + correct_ans_words + "\n" // Create the email version for sending out. upper.document.form1.answ.value=upper.document.form1.answ.value + "\nQuestion: " + ques upper.document.form1.answ.value=upper.document.form1.answ.value + "\nStudent answered: " + letter + ans upper.document.form1.answ.value=upper.document.form1.answ.value + "\nCorrect answer is: " + correct_ans + "\) " + correct_ans_words + "\n" } upper.document.form1.my_score.value=my_score // Delete all html tags when writing answers for email. // We can't use ? for nongreedy pattern matching because it trips up IE 5.0. // We search for > and < instead. if(window.RegExp) { upper.document.form1.answ.value=upper.document.form1.answ.value.replace(/\<[^<]*\>([^<>]*)\<[^>]*\>/g, "$1") } upper.document.form1.answ.value=upper.document.form1.answ.value + "\n" } // Check that student has entered addresses for student and professor. // Then prepare to email. function error_check(){ if(upper.document.form1.stu_name.value != '') { if(upper.document.form1.stu_email.value != '') { if(upper.document.form1.prof_email.value != '') { // Email Header upper.document.form1.answ.value="\nPercent correct: " + my_score + "%\n\n" + upper.document.form1.answ.value upper.document.form1.answ.value="\nNumber of questions: " + parent.number_questions + upper.document.form1.answ.value upper.document.form1.answ.value="\nStudent's email: " + upper.document.form1.stu_email.value + upper.document.form1.answ.value upper.document.form1.answ.value="\nStudent's name: " + upper.document.form1.stu_name.value + upper.document.form1.answ.value upper.document.form1.answ.value="\nQuiz name: " + quiz_name + upper.document.form1.answ.value upper.document.form1.submit() } else { lower.document.open() lower.document.write("

Error: You are required to enter your professors\'s email addresses.

") lower.document.close() } } else { lower.document.open() lower.document.write("

Error: You are required to enter your email addresses.

") lower.document.close() } } else { lower.document.open() lower.document.write("

Error: You are required to enter your name or student ID #.

") lower.document.close() } } function reset_lower() { lower.document.open() lower.document.write("") my_score = (my_correct/number_questions)*100 my_score = Math.round(my_score) lower.document.close() }