home *** CD-ROM | disk | FTP | other *** search
/ Best of Blender / bestofblender.iso / pc / blender / files / beastvr / beastvrm.dir / 00153_Script_153 < prev    next >
Text File  |  1996-04-25  |  548b  |  25 lines
  1. --XOBJECTS
  2. on patchpal
  3.   if the machineType <> 256 then
  4.     global fixpal
  5.     fixpal(mPatchIt)
  6.   end if
  7. end patchpal
  8.  
  9. on initRearWindow theColor
  10.   if the machineType <> 256 then
  11.     global rwObj
  12.     if objectP( rwObj ) then rwObj( mDispose )
  13.     put RearWindow( mNew, "M" ) into rwObj
  14.     rwObj( mIndexColorToWindow, theColor )
  15.   end if
  16. end initRearWindow
  17.  
  18. on disposeRearWindow
  19.   if the machineType = 256 then
  20.     nothing
  21.   else
  22.     global rwObj
  23.     if objectP( rwObj ) then rwObj( mDispose )
  24.   end if
  25. end disposeRearWindow