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