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