<< JunoButtons.mesa>> << >> <> <> <> << This is the interface viewed by Spreitzer's ViewRec package.>> DIRECTORY Rope; JunoButtons: DEFINITIONS = BEGIN << Each of the procedures below appends to the Juno user event queue a string of items of the form $Button $End, that will be parsed and executed by Juno when it deems appropriate. This is the only legal way to command Juno to do something.>> Device: TYPE = {Puffin, Raven, PlateMaker}; Hardcopy: PROC [filename: Rope.ROPE, device: Device]; << Prints an hardcopy of the current image, without solving the constraints (i.e., with the points at their current positions).>> Redraw: PROC; << Repaints the current image on the screen, without solving the constraints (i.e., with the points at their current positions).>> Solve: PROC; << Calls the solver and repaints the resulting image on the screen.>> StartOver: PROC; << Erases the current image.>> 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.