home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / makers / open.dir / 00010.ls < prev    next >
Encoding:
Text File  |  1996-06-12  |  266 b   |  11 lines
  1. on exitFrame
  2.   global fixpal
  3.   if the machineType <> 256 then
  4.     openXLib("FIXPAL.OBJ")
  5.     set fixpal to FixPalette(mnew, the stageLeft, the stageTop, the stageRight, the stageTop)
  6.     fixpal(mPatchIt)
  7.     fixpal(mdispose)
  8.     closeXLib("FIXPAL.OBJ")
  9.   end if
  10. end
  11.