home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 25 / CDMM_25.iso / takeru / g078 / jail.dxr / Internal_66.ls < prev    next >
Encoding:
Text File  |  1996-09-04  |  807 b   |  32 lines
  1. on mouseUp
  2.   global gMark
  3.   set the constraint of sprite 21 to 0
  4.   set the constraint of sprite 17 to 0
  5.   set the constraint of sprite 24 to 0
  6.   set the constraint of sprite 19 to 0
  7.   puppetSprite(24, 0)
  8.   puppetSprite(21, 0)
  9.   puppetSprite(17, 0)
  10.   puppetSprite(19, 0)
  11.   set the castNum of sprite 35 to 201
  12.   updateStage()
  13.   repeat with a = 560 to 720
  14.     if the castNum of sprite 35 = 201 then
  15.       set the castNum of sprite 35 to 202
  16.     else
  17.       set the castNum of sprite 35 to 201
  18.     end if
  19.     set the locH of sprite 35 to a
  20.     updateStage()
  21.     set a to a + 4
  22.   end repeat
  23.   set gMark to "78000"
  24.   unLoad()
  25.   if the machineType <> 256 then
  26.     play movie the moviePath & the itemDelimiter & "menu"
  27.   else
  28.     play movie the moviePath & ".." & the itemDelimiter & "menu"
  29.   end if
  30.   go(#loop)
  31. end
  32.