home *** CD-ROM | disk | FTP | other *** search
/ Seeker / Seeker.iso / files_w / base_gr.dir / 00052.ls < prev    next >
Encoding:
Text File  |  1994-12-01  |  223 b   |  10 lines
  1. on exitFrame
  2.   global pictnumber
  3.   puppetSprite(1, 1)
  4.   repeat with i = 2 to 5
  5.     set the cursor of sprite i to [243, 244]
  6.   end repeat
  7.   puppetPalette(pictnumber + 10)
  8.   set the castNum of sprite 1 to pictnumber + 30
  9. end
  10.