home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 25 / CDMM_25.iso / takeru / g078 / jail.dxr / Internal_254_34.PICT.ls < prev    next >
Encoding:
Text File  |  1996-09-04  |  590 b   |  23 lines
  1. on mouseDown
  2.   set listmovs to [254, 255, 256]
  3.   puppetSound(2, member 4 of castLib 2)
  4.   repeat while soundBusy(2)
  5.     set the castNum of sprite 40 to getAt(listmovs, random(3))
  6.     updateStage()
  7.     myDelay(10)
  8.   end repeat
  9.   puppetSprite(40, 0)
  10.   set the constraint of sprite 10 to 0
  11.   set the constraint of sprite 21 to 0
  12.   set the constraint of sprite 17 to 0
  13.   set the constraint of sprite 24 to 0
  14.   set the constraint of sprite 19 to 0
  15.   puppetSprite(12, 0)
  16.   puppetSprite(10, 0)
  17.   puppetSprite(24, 0)
  18.   puppetSprite(21, 0)
  19.   puppetSprite(17, 0)
  20.   puppetSprite(19, 0)
  21.   go("key")
  22. end
  23.