home *** CD-ROM | disk | FTP | other *** search
/ Atomic Age / ATOMIC_AGE.ISO / pc / setup / qtwcntbg.txt < prev    next >
Encoding:
Text File  |  1994-12-04  |  600 b   |  29 lines
  1. To start the movie playing and set things up
  2.  
  3. on exitFrame
  4.   global theMovie
  5.   put the castnum of sprite 29 into theMovie
  6.   set the controller of cast theMovie to TRUE
  7.   set the startTime of sprite 29 to 0
  8.   set the movieRate of sprite 29 to 1
  9. end
  10.  
  11.  
  12. The close code
  13.  
  14.  
  15. on mouseUp
  16.   global MediaFrameTitle
  17.   global theMovie
  18.   set the controller of cast theMovie to FALSE
  19.   set the visible of sprite 29 to false
  20.   
  21.   put the clickOn into theTarget
  22.   if rollover(theTarget) = FALSE then exit
  23.   puppetTransition 10,2,4
  24.   go frame MediaFrameTitle
  25.   play done
  26.   exit
  27. end mouseUp
  28.  
  29.