DIRECTORY Rope; JunoButtons: DEFINITIONS = BEGIN Device: TYPE = {Puffin, Raven, PlateMaker}; Hardcopy: PROC [filename: Rope.ROPE, device: Device]; Redraw: PROC; Solve: PROC; StartOver: PROC; SetFont: PROC [fontName: Rope.ROPE]; SetFontSize: PROC [fontSize: INT]; Face: TYPE = {plain, italic, bold, boldItalic}; SetFontFace: PROC [face: Face]; Justification: TYPE = {left, center, right}; SetJustification: PROC [justification: Justification]; SetLineWidth: PROC [width: REAL]; Hue: TYPE = {black, white, gray, red, orange, yellow, green, blue, purple}; SetColor: PROC [color: Hue]; LoadX: PROC; Parse: PROC; END. К JunoButtons.mesa Last edited August 25, 1982 by Greg Nelson Last Edited by: Gnelson, January 19, 1984 1:34 pm Last Edited by: Stolfi, June 15, 1984 7:17:43 am PDT This is the interface viewed by Spreitzer's ViewRec package. Each of the procedures below appends to the Juno user event queue a string of items of the form $Button