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