home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1997 September / Personal_Computer_World_Sep_97.iso / Democd3 / oasquiz.dxr / 00152.ls < prev    next >
Encoding:
Text File  |  1997-06-04  |  1.9 KB  |  62 lines
  1. on mouseDown
  2.   global ans1, true_answer, Rand_Quest, guess, counter, checkcounter, n, level, m, scored, Rand_Sound, oldlevel, leveldiff, vert, x, notend, gMovie, Hdrive
  3.   set checkcounter to 1
  4.   set the visible of sprite 20 to 0
  5.   puppetSound("click")
  6.   set the visible of sprite 13 to 0
  7.   set the visible of sprite 28 to 0
  8.   set the visible of sprite 29 to 0
  9.   set the visible of sprite 30 to 0
  10.   set the locH of sprite 7 to the locH of sprite 7 + 2
  11.   set the locV of sprite 7 to the locV of sprite 7 + 2
  12.   set the locH of sprite 24 to the locH of sprite 24 + 2
  13.   set the locV of sprite 24 to the locV of sprite 24 + 2
  14.   updateStage()
  15.   startTimer()
  16.   repeat while the timer < 15
  17.     nothing()
  18.   end repeat
  19.   set the locH of sprite 7 to the locH of sprite 7 - 2
  20.   set the locV of sprite 7 to the locV of sprite 7 - 2
  21.   set the locH of sprite 24 to the locH of sprite 24 - 2
  22.   set the locV of sprite 24 to the locV of sprite 24 - 2
  23.   set the blend of sprite 7 to 60
  24.   updateStage()
  25.   set the soundEnabled to 1
  26.   set the visible of sprite 8 to 1
  27.   set the locV of sprite 8 to 440
  28.   repeat with n = 1 to 100
  29.     set the locH of sprite 8 to n
  30.     updateStage()
  31.   end repeat
  32.   set Rand_Sound to random(5)
  33.   set the castNum of sprite 8 to 173
  34.   updateStage()
  35.   repeat with n = 1 to 50
  36.     set vert to the locV of sprite 8
  37.     set the locV of sprite 8 to vert - n
  38.     startTimer()
  39.     repeat while the timer < 2
  40.       nothing()
  41.     end repeat
  42.     updateStage()
  43.   end repeat
  44.   set the visible of sprite 8 to 0
  45.   set the visible of sprite 20 to 1
  46.   set the visible of sprite 23 to 1
  47.   set the visible of sprite 24 to 1
  48.   set the blend of sprite 15 to 0
  49.   updateStage()
  50.   set the visible of sprite 23 to 0
  51.   set the visible of sprite 24 to 0
  52.   set the visible of sprite 22 to 0
  53.   set the visible of sprite 8 to 0
  54.   set the visible of sprite 19 to 0
  55.   updateStage()
  56.   startTimer()
  57.   set the visible of sprite 20 to 0
  58.   updateStage()
  59.   set gMovie to Hdrive & "mainmen"
  60.   go("select", gMovie)
  61. end
  62.