home *** CD-ROM | disk | FTP | other *** search
/ PC/CD Gamer UK 31 / PCGAMER31.bin / activis / demos / mw2demo.dir / 00020_Exit.ls < prev    next >
Encoding:
Text File  |  1996-01-25  |  596 b   |  30 lines
  1. on mouseDown
  2.   puppetSound("ExitB")
  3.   puppetSprite(14, 1)
  4.   set the castNum of sprite 14 to 40
  5.   updateStage()
  6.   startTimer()
  7.   repeat while the timer < 15
  8.     nothing()
  9.   end repeat
  10.   set the castNum of sprite 14 to 41
  11.   updateStage()
  12.   startTimer()
  13.   repeat while the timer < 15
  14.     nothing()
  15.   end repeat
  16.   set the castNum of sprite 14 to 40
  17.   updateStage()
  18.   startTimer()
  19.   repeat while the timer < 15
  20.     nothing()
  21.   end repeat
  22.   set the castNum of sprite 14 to 41
  23.   updateStage()
  24.   puppetSprite(14, 0)
  25.   repeat while the soundBusy of 1
  26.     updateStage()
  27.   end repeat
  28.   go("disclaimer")
  29. end
  30.