home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1995 September / PCD0995.ISO / files / demos / elteldem / etdemo.dir / 00181.ls < prev    next >
Encoding:
Text File  |  1994-12-09  |  534 b   |  29 lines
  1. on mouseDown
  2.   if soundBusy(1) then
  3.     sound stop 1
  4.   end if
  5.   set the castNum of sprite 9 to 177
  6.   updateStage()
  7.   puppetSound("forward")
  8.   repeat while the stillDown
  9.   end repeat
  10. end
  11.  
  12. on mouseUp
  13.   set the castNum of sprite 9 to 181
  14.   updateStage()
  15.   puppetSprite(9, 0)
  16.   puppetSprite(10, 0)
  17.   puppetSprite(11, 0)
  18.   puppetSprite(12, 0)
  19.   puppetSprite(13, 0)
  20.   puppetSprite(14, 0)
  21.   puppetSprite(15, 0)
  22.   puppetSprite(16, 0)
  23.   puppetSprite(17, 0)
  24.   puppetSprite(18, 0)
  25.   puppetSprite(19, 0)
  26.   puppetSprite(20, 0)
  27.   go(marker(1))
  28. end
  29.