What PC? 1996 August/WPCAUG96.ISO/gtswaug.dxr/00003_GTSgamesSectionFrame.ls

Text File | 1996-06-14 | 550 b | 26 lines

on exitFrame
  global GTSTrySprite, IFLCanChange, GTSGOELSEWHERE, GTSSnapCover, GTSInstall, GTSYesOrCancel, GTSPreview
  go(the frame)
  if the mouseUp then
    set IFLCanChange to 1
  end if
  if GTSGOELSEWHERE = 0 then
    GTSQuitCD()
    ADDAdvertBreak(7)
  end if
  if GTSSnapCover < 3 then
    GTSGamesDrag()
  else
    if GTSInstall = 1 then
      if the mouseUp then
        set GTSInstall to 0
      end if
    end if
    GTSChooseOption()
    if GTSPreview = 1 then
      GTSDuringPreview()
    end if
  end if
  IFLsectionWordAnimate()
end