home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / reswaug.dxr / 00003_RESResources Frame.ls < prev    next >
Encoding:
Text File  |  1996-06-14  |  455 b   |  22 lines
  1. on exitFrame
  2.   global GTSTrySprite, IFLCanChange, browserID, IFLBrowsercounter
  3.   if soundBusy(1) = 0 then
  4.     puppetSound(0)
  5.   end if
  6.   go(the frame)
  7.   if the mouseUp then
  8.     set IFLCanChange to 1
  9.   end if
  10.   ADDAdvertBreak(3)
  11.   RESEWordSwitch()
  12.   RESQuitCD()
  13.   if browserID > 32 then
  14.     if IFLBrowsercounter = 2 then
  15.       RESCheckBrowser()
  16.     else
  17.       set IFLBrowsercounter to 1 + IFLBrowsercounter
  18.     end if
  19.   end if
  20.   IFLsectionWordAnimate()
  21. end
  22.