home *** CD-ROM | disk | FTP | other *** search
/ Blender Volume 3 #4 / Blender_3_4.iso / BLENDER / FILES / Shared.Cst / 00061.ls < prev    next >
Encoding:
Text File  |  1997-01-01  |  572 b   |  28 lines
  1. global gOpSys -- the local operating system
  2.  
  3.  
  4. --XOBJECTS
  5. on patchpal
  6.   if the machineType <> 256 then
  7.     global fixpal
  8.     --fixpal(mPatchIt)
  9.   end if
  10. end patchpal
  11.  
  12. on initRearWindow theColor
  13.   if the machineType <> 256 then
  14.     global rwObj
  15.     if objectP( rwObj ) then rwObj( mDispose )
  16.     put RearWindow( mNew, "M" ) into rwObj
  17.     rwObj( mIndexColorToWindow, theColor )
  18.   end if
  19. end initRearWindow
  20.  
  21. on disposeRearWindow
  22.   if the machineType = 256 then
  23.     nothing
  24.   else
  25.     global rwObj
  26.     if objectP( rwObj ) then rwObj( mDispose )
  27.   end if
  28. end disposeRearWindow