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.

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 <button name> <arguments> $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};
Fix this crock as soon as Imager has a colors interface.

SetColor: PROC [color: Hue];

LoadX: PROC;

Parse: PROC;

END.