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]]]; END. zGriffinController.mesa Copyright c 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 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) Ê"˜codešœ™Kšœ Ïmœ1™—K˜—KšŸœ˜K˜K˜K˜K˜—…—Èd