DIRECTORY Imager USING [Context], IO USING [STREAM], Rope USING [ROPE]; ImagerPress: CEDAR DEFINITIONS ~ BEGIN OPEN Imager, IO, Rope; Create: PROC [ outputStream: STREAM, fileNameForHeaderPage: ROPE _ NIL, creatorName: ROPE _ NIL, printerType: PrinterType _ press, printingMode: PrintingMode _ normal, pageWidthMicas: INT _ 21590, pageHeightMicas: INT _ 27940 ] RETURNS [context: Context]; SimpleCreate: PROC [fileName: ROPE, printerType: PrinterType _ press] RETURNS [context: Context]; PrinterType: TYPE ~ {press, spruce}; PrintingMode: TYPE = {normal, reverse, solid, transparent}; NewPage: PROC [context: Context]; SetSamplingProperties: PROC [context: Context, screenAngle: INT _ 0, screenAmplitude: INT _ 100, screenFrequency: INT _ 85, minIntensity: INT _ 0, maxIntensity: INT _ 255]; DoWithWarnings: PROC [context: Context, action: PROC]; Warning: SIGNAL [code: ATOM, explanation: ROPE, page, micaX, micaY: INT]; Close: PROC [context: Context]; END. \ImagerPress.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Michael Plass, April 16, 1985 2:09:33 pm PST Creates a context that will write a press file. Starts a new page; also resets the context to its initial state (no font, initial meter coords). For fine control of the halftone screens; subject to DoSave. A mechanism to allow for the graceful handling of non-fatal errors; this call should include a catch phrase for the Warning signal. Called when the implementation needs to make an approximation. Closes the underlying press handle; a NOP if context is the wrong kind. ΚΩ˜code™Kšœ Οmœ1™™>K˜—šŸœžœ˜Kšœ&žœ™GK˜—Kšžœ˜—K˜—…—Μ