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, fit: BOOL _ FALSE]; PasteArtwork: PROC [action: PROC [Imager.Context], bounds: Imager.Rectangle, m: Imager.Transformation _ NIL, clip: BOOL _ TRUE, fit: BOOL _ FALSE]; 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, 1986 by Xerox Corporation. All rights reserved. Michael Plass, August 28, 1986 3:56:33 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. ΚM˜codešœ™Kšœ Οmœ7™BK™-—K™K™DK™šΟk ˜ Kšœžœ&˜2Kšœžœžœ˜Kšœ žœ ˜—K˜KšΠbl œžœž ˜ Kšœž˜K˜šΟnœžœžœ˜-K™DK˜—š  œžœ&žœHžœžœžœžœžœ˜―J™