home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #6 / CDRTV2N6.iso / makers / open.dir / 00010_Script_10 < prev    next >
Text File  |  1996-03-11  |  273b  |  11 lines
  1. on exitFrame
  2.   global fixpal
  3.   
  4.   if the machineType <> 256 then
  5.     openxlib "FIXPAL.OBJ"
  6.     set fixpal=FixPalette(mNew, the stageLeft, the stageTop, the stageRight, the stageTop)
  7.     fixpal(mPatchIt)
  8.     fixpal(mDispose)
  9.     closexlib "FIXPAL.OBJ"
  10.   end if
  11. end