DIRECTORY Imager USING [Context, Rectangle, Transformation], Rope USING [ROPE], TiogaAccess USING [Writer]; ImagerArtwork: CEDAR DEFINITIONS ~ BEGIN Points: PROC RETURNS [Imager.Transformation]; WriteArtwork: PROC [writer: TiogaAccess.Writer, action: PROC [Imager.Context], bounds: Imager.Rectangle, m: Imager.Transformation _ NIL, clip: BOOL _ TRUE]; PasteArtwork: PROC [action: PROC [Imager.Context], bounds: Imager.Rectangle, m: Imager.Transformation _ NIL, clip: BOOL _ TRUE]; CreateInterpressRope: PROC [action: PROC [Imager.Context], bounds: Imager.Rectangle, m: Imager.Transformation _ NIL, clip: BOOL _ TRUE] RETURNS [Rope.ROPE]; END. „ImagerArtwork.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Michael Plass, September 12, 1985 1:53:12 pm PDT Imager clients can use this interface to create Tioga Artwork nodes. Makes a transformation that transforms 72-per-inch points to meters. Creates a Tioga Artwork node and appends it onto the writer. Use TiogaAccess to put the contents of the writer somewhere interesting. m transforms client coordinates to the Imager Initial Coordinate System (meters). bounds are in client coordinates. Creates a Tioga Artwork node and pastes it at the current selection. Makes an Interpress master in the form of a rope. Κ=˜codešœ™Kšœ Οmœ1™