<> <> <> <> <> DIRECTORY MenuDefs USING [MenuItemHandle, MenuProc], PointDefs USING [ScrPt, ScrRealPt], Rope USING [ROPE]; GriffinMenusInterface: CEDAR DEFINITIONS = { <> MenuItemFromRope: PROC [rope: Rope.ROPE] RETURNS [MenuDefs.MenuItemHandle]; <> <> <> <> PlaceScreenCP: PROCEDURE[pt: PointDefs.ScrPt]; --standard interface PlaceScreenRealCP: PROCEDURE[pt: PointDefs.ScrRealPt]; --more precision <<--Style menus (ControllerMenus)>> <> SetThickness: MenuDefs.MenuProc; --1, 2, 3, 4 ColorControl: MenuDefs.MenuProc; --outlined, filled or both ColorType: MenuDefs.MenuProc; --the colors themselves TextDir: MenuDefs.MenuProc; --0 d, 90 d, etc SetType: MenuDefs.MenuProc; --normal, stack SetCenter: MenuDefs.MenuProc; --left, center, right <<>> <> <> ExpandShape: MenuDefs.MenuProc; --open style menus: shape, color and text ExpandColor: MenuDefs.MenuProc; ExpandText: MenuDefs.MenuProc; ApplyStyle: MenuDefs.MenuProc; --apply the current style IndicateStyle: MenuDefs.MenuProc; --indicate the current style <> FittingType: MenuDefs.MenuProc; ExpandSplines: MenuDefs.MenuProc; SplineType: MenuDefs.MenuProc; NewLink: MenuDefs.MenuProc; BackLink: MenuDefs.MenuProc; Draw: MenuDefs.MenuProc; Close: MenuDefs.MenuProc; Box: MenuDefs.MenuProc; Modify: MenuDefs.MenuProc; Caption: MenuDefs.MenuProc; <<>> <

> Refresh: MenuDefs.MenuProc; Press: MenuDefs.MenuProc; Save: MenuDefs.MenuProc; Restore: MenuDefs.MenuProc; GridMenuProc: MenuDefs.MenuProc; Merge: MenuDefs.MenuProc; Switch: MenuDefs.MenuProc; ColorMap: MenuDefs.MenuProc; <<>> ToggleFigureMenus: PROC; --view menus ToggleObjectMenu: PROC; ToggleTransformMenu: PROC; ToggleOverlapMenu: PROC; ToggleEditMenus: PROC; --edit and spline menus ToggleStyleMenu: PROC; -- the top level style menu <<>> <