home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / bigtop / shockwav / 27_pollu.dcr / 00022_stopBtn.ls < prev    next >
Encoding:
Text File  |  1996-04-10  |  297 b   |  13 lines
  1. on mouseDown
  2.   set spr to the clickOn
  3.   set the castNum of sprite spr to the number of cast "stopBtn.h"
  4.   puppetSound("pop")
  5.   updateStage()
  6.   doPause(4)
  7.   set the castNum of sprite spr to the number of cast "playBtn"
  8.   puppetSound(0)
  9.   updateStage()
  10.   repeat while the mouseDown
  11.   end repeat
  12. end
  13.