GriffinController.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Created by: Maureen Stone, January 19, 1983 3:49 pm
Last Edited by: Ken Pier, September 24, 1985 5:12:27 pm PDT
GriffinController:
CEDAR
DEFINITIONS =
BEGIN
ControllerError: SIGNAL;
HardcopyController: TYPE = RECORD [hxcenter, hycenter, hwidth, hheight: REAL, pressxcenter, pressycenter: CARDINAL, hscale: REAL];
DisplayController: TYPE = RECORD [dxcenter, dycenter, dwidth, dheight: CARDINAL, dxscale, dyscale, dxorigin, dyorigin: REAL, dgridsize: CARDINAL];
SetHardcopyController: PROCEDURE [HardcopyController];
SetDisplayController: PROCEDURE [DisplayController];
ReadDisplayController: PROCEDURE RETURNS [DisplayController];
ReadHardcopyController: PROCEDURE RETURNS [HardcopyController];
DefaultControllers: PROCEDURE;
ForAllControlPairs:
PROCEDURE [
PROCEDURE [h, s, v: [0 .. 255], grey: [0 .. 255]]];
Because the file format expects it.
Was originally intended to give the user control over the stipple patterns.
This procedure currently enumerates only one pair, ([0,0,0],0)