NectarinePd.mesa
Copyright Ó 1986, 1987 by Xerox Corporation. All rights reserved.
Giordano Bruno Beretta, April 11, 1986 7:57:41 pm PST
gbb December 3, 1987 10:45:03 am PST
Implements an alternate way to produce Interpress masters from ChipNDale drawings. The difference is in the user interface. It is similar to the one in programs by Imaging Folks, and it is simpler to use for casual users.
Fuzzless and sweeter than peaches (Suzanne Williams)
DIRECTORY
Imager USING [Rectangle],
Rope USING [ROPE];
NectarinePd: CEDAR DEFINITIONS
~ BEGIN
communicationsFailure: SIGNAL;
field: Imager.Rectangle; -- in mm
[Artwork node; type 'ArtworkInterpress on' to command tool]
PdPrintProcess: PROC [masterName, peachName: Rope.ROPE, printerKey: ATOM, copies: INT, doNotScale: BOOL, sizeHint: REF Imager.Rectangle ← NIL, abortFlag: REF BOOL]
This is a mess. The religion asks me to propagate the error I get from PeachPrint to my client. However, PeachPrint just sits there until all printing is done or aborts locking up ChipNDale. Therefore, until PeachPrint is not fixed and forks off a process by its own, I do it myself and swallow that bloody event.
If the image is in portrait format and the printer uses roll paper, the rectangle usedField from DoInterpress can be specified as a sizeHint to increase the scale so a to use the full roll width.
Note: the origin in PDParams refers to the field, not to the medium.
END.