home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / makers / search.dir / 00050.ls < prev    next >
Encoding:
Text File  |  1996-06-12  |  302 b   |  15 lines
  1. on exitFrame
  2.   global Chapter, StartSprite
  3.   if Chapter <> EMPTY then
  4.     put field "tempText" into field string(Chapter && "HeadLines")
  5.   end if
  6.   set Chapter to EMPTY
  7.   repeat with i = 13 to 15
  8.     puppetSprite(i, 1)
  9.   end repeat
  10.   updateStage()
  11.   set StartSprite to 1
  12.   PlacePict()
  13.   SetLists()
  14. end
  15.