home *** CD-ROM | disk | FTP | other *** search
/ Glowing Icon Sampler (Explicit Version) / GLOWING_ICON_SAMPLER.BIN / pc / holo / shared.dir / 00338_PANICOFF.ls < prev    next >
Encoding:
Text File  |  1994-01-01  |  715 b   |  25 lines
  1. on mouseDown
  2.   sound stop 1
  3.   sound stop 2
  4.   set the castNum of sprite 12 to the number of cast "PANIC"
  5.   puppetSound("FUZZ.AIF")
  6.   updateStage()
  7.   repeat while the stillDown
  8.     if soundBusy(1) or soundBusy(2) then
  9.       go(the frame)
  10.     end if
  11.   end repeat
  12.   set the castNum of sprite 12 to the number of cast "PANIC"
  13.   updateStage()
  14.   repeat while the stillDown
  15.     nothing()
  16.   end repeat
  17.   set the castNum of sprite 12 to the number of cast "PANICOFF"
  18.   updateStage()
  19.   set the castNum of sprite 12 to the number of cast "PANIC"
  20.   updateStage()
  21.   set the castNum of sprite 12 to the number of cast "PANICOFF"
  22.   updateStage()
  23.   alert("Sorry... Panic Button functionality not included in the demo version!")
  24. end
  25.