(FILECREATED " 3-Apr-86 13:12:05" ("compiled on " {QV}<PEDERSEN>LISP>RESETPLOTMENUS.;1) "12-Nov-85 14:59:23" recompiled ALL in "INTERLISP-D 22-Mar-86 ..." dated "22-Mar-86 17:07:07") (FILECREATED " 3-Apr-86 13:11:10" {QV}<PEDERSEN>LISP>RESETPLOTMENUS.;1 3420 changes to: (VARS RESETPLOTMENUSCOMS) (FNS RESETPLOTMENUS)) RESETPLOTMENUS D1 (P 1 RIGHTMENUITEMS P 0 MIDDLEMENUITEMS I 0 PLOT) $ o o @g H @g I @ (40Q PLOTMENUITEMS 35Q COPY 25Q PLOTMENUITEMS 22Q COPY) (31Q RIGHT 16Q MIDDLE) ( 7 ((Layout PLOT.SKETCH.CREATE "Create a sketch of the PLOT") (Redraw REDRAWPLOTWINDOW "Redraw plot") (Rescale RESCALEPLOT "Rescale plot axes" (SUBITEMS (X% Axis (RESCALEPLOT (QUOTE X)) "Rescale X axis" (SUBITEMS (Automatic (RESCALEPLOT (QUOTE X)) "Rescale automatically") (Manual (MANUALRESCALE (QUOTE X)) "Rescale manually"))) (Y% Axis (RESCALEPLOT (QUOTE Y)) "Rescale Y axis" (SUBITEMS (Automatic (RESCALEPLOT (QUOTE Y)) "Rescale automatically") (Manual (MANUALRESCALE (QUOTE Y)) "Rescale manually"))))) (Extend TOGGLEEXTENDEDAXES "Extend plot axes on/off" (SUBITEMS (X% Axis (TOGGLEEXTENDEDAXES (QUOTE X)) "Extend X axis on/off") (Y% Axis (TOGGLEEXTENDEDAXES (QUOTE Y)) "Extend Y axis on/off"))) (Labels WHICHLABEL "Relabel plot" (SUBITEMS (Title (ASKFORLABEL (QUOTE TOP)) "Title plot") (Left (ASKFORLABEL (QUOTE LEFT)) "Label left of plot") (Bottom (ASKFORLABEL (QUOTE BOTTOM)) "Label bottom of plot") (Right (ASKFORLABEL (QUOTE RIGHT)) "Label right of plot"))) (Tics TOGGLETICS "Tics on or off" (SUBITEMS (Top (TOGGLETICS (QUOTE TOP)) "Top tics on/off") (Left (TOGGLETICS (QUOTE LEFT)) "Left tics on/off") (Bottom (TOGGLETICS (QUOTE BOTTOM)) "Bottom tics on/off") (Right (TOGGLETICS (QUOTE RIGHT)) "Right tics on/off"))) (Undelete UNDELETEPLOTOBJECT "Undelete last deleted object" (SUBITEMS (Top (UNDELETEPLOTOBJECT (QUOTE TOP)) "Undelete last deleted object") (Select (UNDELETEPLOTOBJECT (QUOTE SELECT)) "Select object to undelete") (Above (UNDELETEPLOTOBJECT (QUOTE ABOVE)) "Undelete all objects above selected object") (All (UNDELETEPLOTOBJECT (QUOTE ALL)) "Undelete all deleted objects"))) (Fixed% Menu TOGGLEFIXEDMENU "Fix Plot menu")) 3 ((Label TOGGELLABEL "Toggle label on/off" (SUBITEMS (Relabel RELABELSELECTEDPLOTOBJECT "Change label"))) (Delete DELETEPLOTOBJECT "Delete object"))) (PRETTYCOMPRINT RESETPLOTMENUSCOMS) (RPAQQ RESETPLOTMENUSCOMS ((FNS RESETPLOTMENUS))) (PUTPROPS RESETPLOTMENUS COPYRIGHT ("Xerox Corporation" 1986)) NIL