home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1995 September / PCD0995.ISO / files / tools.dir / 00375.ls < prev    next >
Encoding:
Text File  |  1995-01-25  |  344 b   |  16 lines
  1. global cDemoQT, demoQTstate, gPlaySprite, gSoundlevel
  2.  
  3. on exitFrame
  4.   go(the frame)
  5. end
  6.  
  7. on idle
  8.   puppetSprite(gPlaySprite, 1)
  9.   set the castNum of sprite gPlaySprite to the number of cast "DemoPlay lit"
  10.   updateStage()
  11.   waitFor(0.5)
  12.   set the castNum of sprite gPlaySprite to the number of cast "DemoPlay"
  13.   updateStage()
  14.   waitFor(0.5)
  15. end
  16.