<<>> <> <> <> <> <> <> <> <<>> DIRECTORY Imager, BufferedRefreshTypes, Real; BufferedRefresh: CEDAR DEFINITIONS = BEGIN Context: TYPE = Imager.Context; Rectangle: TYPE = Imager.Rectangle; Transformation: TYPE = Imager.Transformation; RefreshProc: TYPE = BufferedRefreshTypes.RefreshProc; Sandwich: TYPE = BufferedRefreshTypes.Sandwich; Layer: TYPE = RECORD [name: ATOM, backingMap: BOOL, refreshProc: RefreshProc, drawBkgnd: BOOL ¬ FALSE]; << [Artwork node; type 'ArtworkInterpress on' to command tool] >> CreateSandwich: PROC [layers: LIST OF Layer] RETURNS [sandwich: Sandwich]; <> FitSandwichToScreen: PROC [sandwich: Sandwich, cw, ch: INTEGER, screen: Context, cx, cy: INTEGER ¬ 0]; <> DrawSandwich: PROC [sandwich: Sandwich, screen: Context, clientToViewer, viewerToClient: Transformation, clientData: REF, bkgndColor: Imager.Color, ignoreBackingMap: BOOL ¬ FALSE, noBuffer: BOOL ¬ FALSE, changeRect: Rectangle ¬ [-Real.LargestNumber, -Real.LargestNumber, Real.LargestNumber, Real.LargestNumber]]; <> <> <> <> <<[clientToViewer, viewerToClient] _ BiScrollers.GetStyle[].GetTransforms[BiScrollers.QuaBiScroller[gargoyleData.actionArea]];>> <> <> DrawSandwichInBoxes: PROC [sandwich: Sandwich, screen: Context, clientToViewer, viewerToClient: Transformation, clientData: REF, bkgndColor: Imager.Color, ignoreBackingMap: BOOL ¬ FALSE, noBuffer: BOOL ¬ FALSE, changeRects: LIST OF Rectangle]; <<<< Picnic, anyone? >>>> <> SetLayerOK: PROC [sandwich: Sandwich, layerName: ATOM, ok: BOOL]; GetLayerOK: PROC [sandwich: Sandwich, layerName: ATOM] RETURNS [ok: BOOL]; RepairLayer: PROC [sandwich: Sandwich, layerName: ATOM, proc: RefreshProc, bkgndColor: Imager.Color, clientData: REF ANY ¬ NIL, clear: BOOL ¬ FALSE]; <> SaveLayer: PROC [sandwich: Sandwich, layerName: ATOM]; <> RestoreLayer: PROC [sandwich: Sandwich, layerName: ATOM]; <> <<>> END.