home *** CD-ROM | disk | FTP | other *** search
/ PC/CD Gamer UK 31 / PCGAMER31.bin / activis / demos / mw2demo.dir / 00014.ls < prev    next >
Encoding:
Text File  |  1996-01-25  |  955 b   |  40 lines
  1. global gNext
  2.  
  3. on mouseDown
  4.   sound stop 2
  5.   puppetSound("More Buttons")
  6.   puppetSprite(3, 1)
  7.   puppetSprite(11, 1)
  8.   set the castNum of sprite 3 to the number of cast "MOREBON.GIF"
  9.   set the castNum of sprite 11 to 27
  10.   updateStage()
  11.   startTimer()
  12.   repeat while the timer < 15
  13.     nothing()
  14.   end repeat
  15.   set the castNum of sprite 3 to the number of cast "MOREBOFF.GIF"
  16.   set the castNum of sprite 11 to 28
  17.   updateStage()
  18.   startTimer()
  19.   repeat while the timer < 15
  20.     nothing()
  21.   end repeat
  22.   set the castNum of sprite 3 to the number of cast "MOREBON.GIF"
  23.   set the castNum of sprite 11 to 27
  24.   updateStage()
  25.   startTimer()
  26.   repeat while the timer < 15
  27.     nothing()
  28.   end repeat
  29.   set the castNum of sprite 3 to the number of cast "MOREBOFF.GIF"
  30.   set the castNum of sprite 11 to 28
  31.   updateStage()
  32.   puppetSprite(3, 0)
  33.   puppetSprite(11, 0)
  34.   repeat while the timer < 45
  35.     nothing()
  36.   end repeat
  37.   set gNext to "story"
  38.   go("more final")
  39. end
  40.