home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1997 September / Personal_Computer_World_Sep_97.iso / Democd3 / oasquiz.dxr / 00197.ls < prev    next >
Encoding:
Text File  |  1997-06-04  |  2.8 KB  |  96 lines
  1. on mouseDown
  2.   global diff, timerate, timeoption, n, helpon
  3.   puppetSound("click")
  4.   set the visible of sprite 7 to 1
  5.   if timeoption = 1 then
  6.     set timerate to 3
  7.   end if
  8.   set the locH of sprite 6 to the locH of sprite 6 + 2
  9.   set the locV of sprite 6 to the locV of sprite 6 + 2
  10.   set the locH of sprite 23 to the locH of sprite 23 + 2
  11.   set the locV of sprite 23 to the locV of sprite 23 + 2
  12.   updateStage()
  13.   startTimer()
  14.   repeat while the timer < 15
  15.     nothing()
  16.   end repeat
  17.   set the locH of sprite 6 to the locH of sprite 6 - 2
  18.   set the locV of sprite 6 to the locV of sprite 6 - 2
  19.   set the locH of sprite 23 to the locH of sprite 23 - 2
  20.   set the locV of sprite 23 to the locV of sprite 23 - 2
  21.   updateStage()
  22.   if timeoption = 0 then
  23.     if the keyCode = 28 then
  24.       set diff to 2
  25.     else
  26.       if (the keyCode <> 28) and (helpon = 0) then
  27.         set the text of cast "quest" to "Access Denied! You didn't enter the correct password! Complete the easy level to get the password"
  28.         set the visible of sprite 26 to 1
  29.         set the locH of sprite 26 to 310
  30.         set the locV of sprite 26 to 270
  31.         repeat with n = 256 to 265
  32.           set the castNum of sprite 26 to n
  33.           updateStage()
  34.           startTimer()
  35.           repeat while the timer < 5
  36.             nothing()
  37.           end repeat
  38.         end repeat
  39.         startTimer()
  40.         repeat while the timer < 200
  41.           nothing()
  42.         end repeat
  43.         go(1, "oasquiz")
  44.         exit
  45.       end if
  46.     end if
  47.   end if
  48.   set the visible of sprite 26 to 1
  49.   set the locH of sprite 26 to 310
  50.   if helpon = 1 then
  51.     set the locH of sprite 26 to 385
  52.   end if
  53.   set the locV of sprite 26 to 270
  54.   repeat with n = 155 to 160
  55.     set the castNum of sprite 26 to n
  56.     updateStage()
  57.     startTimer()
  58.     repeat while the timer < 5
  59.       nothing()
  60.     end repeat
  61.   end repeat
  62.   set the visible of sprite 26 to 0
  63.   startTimer()
  64.   repeat while the timer < 35
  65.     nothing()
  66.   end repeat
  67.   if helpon = 1 then
  68.     set the text of cast "quest" to "When asked a question, simply click on the answer you think is correct!"
  69.     set the text of cast "answer1" to "Press Any Key"
  70.     set the text of cast "answer2" to "Press Any Key"
  71.     set the text of cast "answer3" to "Press Any Key"
  72.     set the visible of sprite 22 to 1
  73.     set the visible of sprite 23 to 1
  74.     set the visible of sprite 24 to 1
  75.     updateStage()
  76.     repeat while the mouseDown = 0
  77.     end repeat
  78.     go(1, "oasquiz")
  79.     exit
  80.   end if
  81.   if (timeoption = 0) and (helpon = 0) then
  82.     set the visible of sprite 22 to 0
  83.     set the visible of sprite 23 to 0
  84.     set the visible of sprite 24 to 0
  85.     go("s")
  86.   end if
  87.   if timeoption = 1 then
  88.     set timeoption to 0
  89.     go(the frame)
  90.   end if
  91.   if helpon = 1 then
  92.     set helpon to 0
  93.     go(the frame)
  94.   end if
  95. end
  96.