Undercover - Rock on Multimedia 2/UNDERCOVER2.BIN/main.dir/00073_Script_73

Text File | 1996-01-27 | 626b | 28 lines

on exitFrame
  set vid = the castnum of sprite 14
  if  the movieTime of sprite 14  < the duration of cast vid then
    go the frame
  else
    global gDisablePopup
    set gDisablePopup = false
    puppetSprite 2, false
    go "moshLoop"
  end if
end

on mouseDown
  if rollover(18) then
    global gDisablePopup
    set gDisablePopup = false
    puppetSprite 2, false
    go "moshLoop"
  else if rollover(6) then
    puppetSprite 2, false
    set currentPalette = the framePalette
    puppetPalette currentPalette
    global gReturnFrame
    set gReturnFrame = the frame
    go "jvc"
  end if
end