home *** CD-ROM | disk | FTP | other *** search
/ Undercover - Rock on Multimedia 2 / UNDERCOVER2.BIN / popup.dir / 00016_Script_16 < prev    next >
Text File  |  1996-01-20  |  2KB  |  76 lines
  1. on exitFrame
  2.   global gPopup
  3.   if not gPopup then go "IdleFrame"
  4.   else 
  5.     if the mouseH > 138 then
  6.       close window "popup"
  7.       updatestage
  8.       set gPopup = false
  9.       tell the stage to continue
  10.       abort
  11.     end if
  12.     
  13.     repeat with n = 22 down to 10
  14.       if rollover(n) then 
  15.         exit repeat
  16.       end if
  17.     end repeat
  18.     go frame marker(0) + n - 9
  19.   end if
  20. end
  21.  
  22.  
  23. on mouseDown
  24.   tell the stage 
  25.     global gMusicPlaying
  26.     if not gMusicPlaying then
  27.       sound stop 1
  28.       playMusic
  29.     end if
  30.     
  31.     repeat with s = 1 to 48
  32.       puppetSprite s,false
  33.     end repeat
  34.   end tell
  35.   global gNextMovieFrame
  36.   if the frame = 2 then
  37.     set gNextMovieFrame = "central"
  38.   else if the frame = 3 then
  39.     set gNextMovieFrame = "cover"
  40.   else if the frame = 4 then
  41.     set gNextMovieFrame = "idol"
  42.   else if the frame = 5 then
  43.     set gNextMovieFrame = "discover"
  44.   else if the frame = 6 then
  45.     set gNextMovieFrame = "classic"
  46.   else if the frame = 7 then
  47.     set gNextMovieFrame = "review"
  48.   else if the frame = 8 then
  49.     set gNextMovieFrame = "mosh"
  50.   else if the frame = 9 then
  51.     set gNextMovieFrame = "quiz"
  52.   else if the frame = 10 then
  53.     set gNextMovieFrame = "wall"
  54.   else if the frame = 11 then
  55.     set gNextMovieFrame = "audio"
  56.   else if the frame = 12 then
  57.     set gNextMovieFrame = "guru"
  58.   else if the frame = 13 then
  59.     set gNextMovieFrame = "help"
  60.   else if the frame = 14 then
  61.     set gNextMovieFrame = "movieExit"
  62.   end if
  63.    
  64.   close window "popup"
  65.   tell the stage to continue
  66.   tell the stage to updateStage
  67.   global gReview
  68.   if gReview then
  69.     tell the stage to go to frame "review_exit"
  70.   else
  71.     tell the stage to go to frame "goNextMovie"
  72.   end if
  73.   abort
  74.   
  75. end
  76.