home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1995 September / PCD0995.ISO / files / gallery.dir / 00010.ls < prev    next >
Encoding:
Text File  |  1994-12-18  |  592 b   |  19 lines

  1. global gStopSprite, cDemoQT, gPauseSprite, gPlaySprite
  2.  
  3. on mouseDown
  4.   puppetSprite(the clickOn, 1)
  5.   set the castNum of sprite gStopSprite to the number of cast "stopGallery lit"
  6.   repeat while the stillDown
  7.     updateStage()
  8.   end repeat
  9. end
  10.  
  11. on mouseUp
  12.   set the movieTime of sprite cDemoQT to 0
  13.   set the movieRate of sprite cDemoQT to 0
  14.   set the castNum of sprite gStopSprite to the number of cast "stopGallery"
  15.   set the castNum of sprite gPauseSprite to the number of cast "pauseGallery"
  16.   set the castNum of sprite gPlaySprite to the number of cast "playGallery"
  17.   updateStage()
  18. end
  19.