home *** CD-ROM | disk | FTP | other *** search
/ Mac Ga Ichiban! 1996 June / macgaichiban199606.bin / MOVIES / SOUNDF / 00121.ls < prev    next >
Encoding:
Text File  |  1996-03-27  |  395 b   |  15 lines
  1. on exitFrame
  2.   global qtnum
  3.   set qtnum to 10
  4.   repeat with i = 9 to 12
  5.     puppetSprite(i, 1)
  6.     set the type of sprite i to 1
  7.     set the ink of sprite i to 36
  8.     set the visible of sprite i to 1
  9.     updateStage()
  10.   end repeat
  11.   set startname to item 1 of the name of cast the castNum of sprite 10
  12.   set the castNum of sprite 10 to the number of cast (startname & ",on")
  13.   updateStage()
  14. end
  15.