home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1995 September / PCD0995.ISO / files / demos / elteldem / etdemo.dir / 00184.ls < prev    next >
Encoding:
Text File  |  1994-12-09  |  554 b   |  30 lines

  1. on mouseDown
  2.   if soundBusy(1) then
  3.     sound stop 1
  4.   end if
  5.   puppetSprite(7, 1)
  6.   set the castNum of sprite 7 to 178
  7.   updateStage()
  8.   puppetSound("reverse")
  9.   repeat while the stillDown
  10.   end repeat
  11. end
  12.  
  13. on mouseUp
  14.   set the castNum of sprite 7 to 184
  15.   updateStage()
  16.   puppetSprite(7, 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.