home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #9 / CDRTV2N9.iso / progs / vearth / shared.dir / 00571.ls < prev    next >
Encoding:
Text File  |  1996-04-15  |  537 b   |  22 lines
  1. on enterFrame
  2.   repeat with var = 5 to 33
  3.     puppetSprite(var, 1)
  4.   end repeat
  5.   set the blend of sprite 13 to 0
  6.   set the blend of sprite 14 to 0
  7.   set the blend of sprite 15 to 0
  8.   set the blend of sprite 16 to 0
  9.   updateStage()
  10. end
  11.  
  12. on exitFrame
  13.   global gPage, gSound
  14.   if the type of sprite 4 = 16 then
  15.     set the controller of cast the castNum of sprite 4 to 1
  16.     set the pausedAtStart of cast the castNum of sprite 4 to 1
  17.     set the movieTime of sprite 4 to 0
  18.     set the volume of sprite 4 to 200
  19.   end if
  20.   putOn(gPage)
  21. end
  22.