-- ColorWorld.mesa -- Public interfaces to the wonderful world of color -- Maureen Stone, August 31, 1982 4:18 pm -- Doug Wyatt, August 31, 1982 2:18 pm DIRECTORY Graphics USING [Context]; ColorWorld: CEDAR DEFINITIONS = { HasMode: PROCEDURE[bpp: INT] RETURNS[BOOLEAN]; --valid values for bpp (bits per pixel) are: --Dolphins: 1, 2 or 4 --Dorados: 1, 4, 8 and 24 TurnOnColor: PROC[bpp: INT, onLeft: BOOLEAN _ TRUE] RETURNS[BOOLEAN]; --TurnOnColor returns TRUE if successful --Turn on color is expensive. It will take about 10 seconds worse case --If you call it more than once it will automatically do a TurnOffColor TurnOffColor: PROC; --TurnOffColor jumps the cursor back to the bi-level display and deallocates the --color framebuffer. All color contexts will be invalid after doing a TurnOffColor NewContext: PROC RETURNS[Graphics.Context]; --NOTE: All color contexts will be invalid after doing a TurnOffColor -- the default colormap is a gray wedge with 0=black and 255=white -- this corresponds to the conventions for AIS files -- Those who want to mess with the colormap use SetColor }.