ShowPress.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Last edited by Shore; December 4, 1982 12:10 am
Last Edited by: Donahue, May 27, 1983 8:41 am
Last Edited by: Wyatt, December 1, 1983 2:56 pm
Michael Plass, April 4, 1985 9:56:49 am PST
DIRECTORY
Imager USING [Context],
ImagerFont USING [Font],
PressReader USING [Handle],
Rope USING [ROPE],
ViewerClasses USING [ViewerRec, Viewer];
ShowPress: CEDAR DEFINITIONS
~ BEGIN
Handle: TYPE ~ REF PressFileRec;
PressFileRec: TYPE ~ RECORD [
pressFile: PressReader.Handle,
fontTable: ARRAY [0..256) OF FontRec,
lastPart: INT ← 0
];
FontRec: TYPE ~ RECORD [
imagerFont: ImagerFont.Font ← NIL,
family: Rope.ROPE ← NIL,
face: [0..256) ← 0,
size: REAL ← 0,
rotation: REAL ← 0
];
Open: PROC [fileName: Rope.ROPE] RETURNS [show: Handle ← NIL];
DrawPressPage: PROC [
context: Imager.Context,
show: Handle,
pageNumber: INT,
tinyPaint: BOOL ← FALSE
];
image the press file page in the specified context
assumes the context is already scaled for press coordinate system (Micas)
Close: PROC [show: Handle];
CreateShowViewer: PROC [info: ViewerClasses.ViewerRec]
RETURNS [v: ViewerClasses.Viewer];
ShowPressError: ERROR [code: ATOM];
END.
Created by Andrew Shore; September 13, 1982 5:59 pm
Changed by Donahue; May 26, 1983 3:00 pm
Added ShowData, CreateShowViewer to be used by whiteboards
Michael Plass, April 3, 1985 4:09:16 pm PST
Imager conversion.