DIRECTORY ImagerBasic USING [Transformation, IntRectangle, IntPair, CIEColor, PixelArray], ImagerDisplay USING [Mask, DisplayProcs, ByteSequence, VtxSequence]; Imager1bitDisplay: CEDAR DEFINITIONS = BEGIN OPEN ImagerBasic, ImagerDisplay; SetUp: PROC [pin: BOOLEAN _ TRUE] RETURNS [REF Transformation, Mask, DisplayProcs, PixelArray]; ShutDown: PROC []; -- free memory in case the last user has left OpenPixelBuffer: PROC [box: Mask, buffer: PixelArray _ NIL] RETURNS [PixelArray]; -- redirect writes for double-buffer ClosePixelBuffer: PROC []; -- drop pixel buffer ref ColortoPixel: PROC [color: CIEColor] RETURNS [LONG CARDINAL]; -- Color to device transform PixeltoColor: PROC [pxlValue: LONG CARDINAL] RETURNS [CIEColor]; HilitePxls: PROC [area: IntRectangle]; -- Device dependent highlighting scheme MovePxls: PROC [source: IntRectangle, destination: IntPair]; -- move on display StorePxls: PROC [source: IntRectangle] RETURNS [PixelArray]; LoadPxls: PROC [source: PixelArray _ NIL, destination: IntRectangle]; StoreScanSeg: PROC [x, y, length: CARDINAL] RETURNS [ByteSequence]; LoadScanSeg: PROC [x, y, length: CARDINAL, segment: ByteSequence, transparent: BOOLEAN]; LoadTrapezoid: PROC [top, bottom, leftTop, leftBot, rightTop, rightBot: CARDINAL, pxlValue: LONG CARDINAL]; -- Scan convert trapezoid, constant color SetPxl: PROC [x, y: CARDINAL, pxlValue: LONG CARDINAL]; GetPxl: PROC [x, y: CARDINAL] RETURNS [LONG CARDINAL]; DrawLine: PROC [a, b: IntPair, pxlValue: LONG CARDINAL]; -- draw a fast line, constant color Tiler: PROC [vtxCount: CARDINAL, vertices: ImagerDisplay.VtxSequence]; -- draw a polygon END. μImager1bitDisplay.mesa This interface provides access to the low level routines for the color display at 8 bits per pixel. Last Edited by: Crow, August 1, 1983 3:34 pm Get memory, pin it if pin = TRUE, set transform and clipper Κ˜headšœ™J™c—™šœ™Jšœ™—unitšΟk ˜ Jšœ  œ2˜IJšœ˜Jšœœ1˜F——head2šœ$˜$Jšœ˜Jšœ˜ —LšΟnœœœœ˜"ašœœœ1˜?Nšœœ™;—Jšžœœ Οc-˜HJš žœœ"œœŸ%˜vJšžœœ Ÿ˜:Jš ž œœœœœŸ˜[Jš ž œœ œœœ ˜@Jšž œœŸ*˜RJšžœœ/Ÿ˜SJšž œœœ˜