DIRECTORY IIColorDefs USING [SampledColor], IIPixelMap USING [PixelMap], IISample USING [Sampler, SampleBuffer], IITransformation USING [Transformation], PrincOps USING [BitBltFlags], Terminal USING [FrameBuffer, Virtual] ; IIColor24DevicePrivate: CEDAR DEFINITIONS ~ BEGIN Case: TYPE ~ {nil, constant, stipple, sampled}; StippleArray: TYPE ~ PACKED ARRAY [0..16) OF WORD; Channel: TYPE ~ {A, B}; bitsPerPixelA: NAT ~ 16; bitsPerPixelB: NAT ~ 8; Data: TYPE ~ REF DataRep; DataRep: TYPE ~ RECORD[ terminal: Terminal.Virtual _ NIL, frame: ARRAY Channel OF Terminal.FrameBuffer, case: Case _ nil, -- what type of color zerosAreClear: BOOL _ FALSE, -- special case for sampled black clear. flags: PrincOps.BitBltFlags _ [], -- bitblt flags grayWordA: WORD _ 0, -- bitblt gray word [red, green] grayWordB: WORD _ 0, -- bitblt gray word [blue, blue] stipple: StippleArray _ ALL[0], -- stipple pattern sampledColor: IIColorDefs.SampledColor _ NIL, -- sampled color paToDevice: IITransformation.Transformation _ NIL, -- transformation from pa coords to display buffer: IISample.SampleBuffer _ NIL, -- scan line buffer for samples sampler: ARRAY Channel OF IISample.Sampler _ ALL[NIL], -- sampler information extras: REF _ NIL ]; SampledColorData: TYPE ~ REF SampledColorDataRep; SampledColorDataRep: TYPE ~ RECORD [ source: ARRAY Channel OF IIPixelMap.PixelMap ]; END. ImagerColor24DevicePrivate.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Michael Plass, June 25, 1985 2:01:13 pm PDT Private interface for the benefit of ImagerOps. channel A has red and green pixels interleaved. channel B has blue pixels non-interleaved. Κ5˜šœ™Icodešœ Οmœ1™Kšœ.žœ +˜^Kšœ žœ ˜DKš œ žœ žœžœžœ ˜MKšœžœž˜K˜K˜—Kšœžœžœ˜1šœžœžœ˜$Kšœžœ žœ˜,Kšœ˜——K˜Kšžœ˜J˜J˜—…—Z­