home *** CD-ROM | disk | FTP | other *** search
/ Grandes Inventos / INVENTOS.bin / pc / media / camar.dxr / 00553.ls < prev    next >
Encoding:
Text File  |  1996-01-01  |  360 b   |  17 lines
  1. on exitFrame
  2.   global gIdiom
  3.   UnloadAllCasts()
  4.   clearGlobals()
  5.   if objectp(gTheAnalyzer) then
  6.     set theObject to gTheAnalyzer(mGetObject)
  7.     gTheAnalyzer(mDetatchObjects)
  8.     if objectp(theObject) then
  9.       theObject(mFree)
  10.       theObject(mdispose)
  11.     end if
  12.   end if
  13.   set gIdiom to the text of cast "TheIdiom"
  14.   InitSpriteNums()
  15.   InitPuppets()
  16. end
  17.