Undercover - Rock on Multimedia 2/UNDERCOVER2.BIN/main.dir/00272_Script_272

Text File | 1996-01-27 | 538b | 29 lines

on exitFrame
  patchpal()

  global gRollover, gTimeOut, gLatch
  set gLatch = false
  startTimer
  set gRollover = 9
  repeat with n = 14 down to 10
    if rollover(n) then
      set gRollover = n
      exit repeat
    end if
  end repeat
  go frame marker(0) + n - 9
end

on mouseDown
  if rollover(4) then
    global gMusicPlaying
    if not gMusicPlaying then
      sound stop 1
      playMusic
    end if
    global gNextMovieFrame
    set gNextMovieFrame = "central"
    go "goNextMovie"
  end if
end