home *** CD-ROM | disk | FTP | other *** search
/ Imagine the Universe (9th Edition) / Imagine the Universe 9 - Disc 1.iso / pc / imagine / docs / science / try_l1 / javascript / white_dwarfs.js < prev   
Encoding:
Text File  |  2002-01-09  |  896 b   |  43 lines
  1. size1 = "Blank";
  2. size2 = "Blank";
  3. size3 = "Blank";
  4. size4 = "Blank";
  5.  
  6. function testButton(form) {
  7.     for (Count = 0; Count < 2; Count++) {
  8.         if (form.answer1[Count].checked)
  9.     size1 = Count;
  10.     if (form.answer2[Count].checked)
  11.     size2 = Count;
  12.     if (form.answer3[Count].checked)
  13.     size3 = Count;
  14.     if (form.answer4[Count].checked)
  15.     size4 = Count;
  16.     }
  17.     
  18.     RightAnswer1 = 0;
  19.     RightAnswer2 = 0;
  20.     RightAnswer3 = 1;
  21.     RightAnswer4 = 0;
  22.     NumberCorrect = 0;
  23.     AnswerPage = 'white_dwarfs_solution.html';
  24.     
  25.     if (size1 == RightAnswer1) {
  26.         NumberCorrect++;
  27.     }
  28.     if (size2 == RightAnswer2) {
  29.         NumberCorrect++;
  30.     }
  31.     if (size3 == RightAnswer3) {
  32.         NumberCorrect++;
  33.     }
  34.     if (size4 == RightAnswer4) {
  35.         NumberCorrect++;
  36.     }
  37.     
  38.     alert ("You answered " +NumberCorrect + " out of 4 questions correctly!");
  39.     location = AnswerPage; 
  40. }
  41.  
  42.     
  43.