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