SVState.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Last edited by Bier on March 30, 1987 12:52:26 pm PST
Contents: Routines for getting and setting the state or "modes" of the Solidviews interface.
DIRECTORY
Imager, SVInterfaceTypes, SVModelTypes, SVSceneTypes;
SVState: CEDAR DEFINITIONS =
BEGIN
DisplayStyle: TYPE = SVModelTypes.DisplayStyle;
ExtendMode: TYPE = SVSceneTypes.ExtendMode;
FeatureCycler: TYPE = SVInterfaceTypes.FeatureCycler;
GravityType: TYPE = SVInterfaceTypes.GravityType;
SearchDepth: TYPE = SVSceneTypes.SearchDepth;
SelectMode: TYPE = SVSceneTypes.SelectMode;
Skitter: TYPE = SVSceneTypes.Skitter;
Slice: TYPE = SVSceneTypes.Slice;
SliceDescriptor: TYPE = SVSceneTypes.SliceDescriptor;
SVData: TYPE = SVInterfaceTypes.SVData;
GetAzimuthValue: PROC [svData: SVData] RETURNS [degrees: REAL, success: BOOLTRUE];
GetAzimuthAlignments: PROC [svData: SVData] RETURNS [values: LIST OF REAL, on: LIST OF BOOL];
GetAzimuth: PROC [svData: SVData] RETURNS [degrees: REAL]; -- the selected azimuth
AddAzimuth: PROC [svData: SVData, degrees: REAL, on: BOOLTRUE] RETURNS [alreadyThere: BOOL];
DeleteAzimuth: PROC [svData: SVData]; -- delete the selected azimuth
GetSlopeValue: PROC [svData: SVData] RETURNS [degrees: REAL, success: BOOLTRUE];
GetSlopeAlignments: PROC [svData: SVData] RETURNS [values: LIST OF REAL, on: LIST OF BOOL];
GetSlope: PROC [svData: SVData] RETURNS [degrees: REAL]; -- the selected slope
AddSlope: PROC [svData: SVData, degrees: REAL, on: BOOLTRUE] RETURNS [alreadyThere: BOOL];
DeleteSlope: PROC [svData: SVData]; -- delete the selected slope
GetRadiusValue: PROC [svData: SVData] RETURNS [radius: REAL, success: BOOLTRUE];
GetRadiusAlignments: PROC [svData: SVData] RETURNS [values: LIST OF REAL, on: LIST OF BOOL];
GetRadius: PROC [svData: SVData] RETURNS [radius: REAL]; -- the selected radius
AddRadius: PROC [svData: SVData, radius: REAL, on: BOOLTRUE] RETURNS [alreadyThere: BOOL];
DeleteRadii: PROC [svData: SVData]; -- delete the selected radii
GetSlopeLineAlignments: PROC [svData: SVData] RETURNS [azimuths: LIST OF REAL, slopes: LIST OF REAL, on: LIST OF BOOL];
AddSlopeLine: PROC [svData: SVData, azimuth: REAL, slope: REAL, on: BOOLTRUE] RETURNS [alreadyThere: BOOL];
DeleteSlopeLines: PROC [svData: SVData]; -- delete the selected slope lines
GetSlopePlaneAlignments: PROC [svData: SVData] RETURNS [azimuths: LIST OF REAL, slopes: LIST OF REAL, on: LIST OF BOOL];
AddSlopePlane: PROC [svData: SVData, azimuth: REAL, slope: REAL, on: BOOLTRUE] RETURNS [alreadyThere: BOOL];
DeleteSlopePlanes: PROC [svData: SVData]; -- delete the selected slope planes
Refresh Parameters
GetDisplayStyle: PROC [svData: SVData] RETURNS [DisplayStyle];
SetDisplayStyle: PROC [svData: SVData, displayStyle: DisplayStyle];
GetShowAlignments: PROC [svData: SVData] RETURNS [BOOL];
SetShowAlignments: PROC [svData: SVData, showAlignments: BOOL];
GetShowColors: PROC [svData: SVData] RETURNS [BOOL];
SetShowColors: PROC [svData: SVData, showColors: BOOL];
GetViewport: PROC [svData: SVData] RETURNS [Imager.Rectangle];
GetSuppressRefresh: PROC [svData: SVData] RETURNS [BOOL];
SetSuppressRefresh: PROC [svData: SVData, suppressRefresh: BOOL];
Returns the viewer extent in screen coordinates.
Gravity and Alignments
GetAnchor: PROC [svData: SVData] RETURNS [Skitter];
GetGravity: PROC [svData: SVData] RETURNS [gravityOn: BOOL];
SetGravity: PROC [svData: SVData, gravityOn: BOOL];
ToggleGravity: PROC [svData: SVData];
GetGravityExtent: PROC [svData: SVData] RETURNS [inches: REAL];
SetGravityExtent: PROC [svData: SVData, inches: REAL];
GetGravityType: PROC [svData: SVData] RETURNS [gravityType: GravityType];
SetGravityType: PROC [svData: SVData, gravityType: GravityType];
CycleGravityType: PROC [svData: SVData, forward: BOOL];
GetHeuristics: PROC [svData: SVData] RETURNS [BOOL];
SetHeuristics: PROC [svData: SVData, heuristicsOn: BOOL];
GetMidpoints: PROC [svData: SVData] RETURNS [BOOL];
SetMidpoints: PROC [svData: SVData, midpointsOn: BOOL];
ToggleMidpoints: PROC [svData: SVData];
GetScaleUnit: PROC [svData: SVData] RETURNS [REAL]; -- in units of 1/72 of an inch
SetScaleUnit: PROC [svData: SVData, unit: REAL]; -- in units of 1/72 of an inch
Other
GetSliceToExtend: PROC [svData: SVData] RETURNS [sliceD: SliceDescriptor];
SetSliceToExtend: PROC [svData: SVData, sliceD: SliceDescriptor];
GetSelectionCycler: PROC [svData: SVData] RETURNS [featureCycler: FeatureCycler];
SetSelectionCycler: PROC [svData: SVData, featureCycler: FeatureCycler];
Hidden State (yuk)
GetSelectMode: PROC [svData: SVData] RETURNS [selectMode: SelectMode];
SetSelectMode: PROC [svData: SVData, selectMode: SelectMode];
GetExtendMode: PROC [svData: SVData] RETURNS [extendMode: ExtendMode];
SetExtendMode: PROC [svData: SVData, extendMode: ExtendMode];
GetQuickClickMode: PROC RETURNS [on: BOOL];
SetQuickClickMode: PROC [on: BOOL];
Peculiar to 3D
GetSearchDepth: PROC [svData: SVData] RETURNS [searchDepth: SearchDepth];
SetSearchDepth: PROC [svData: SVData, searchDepth: SearchDepth];
GetSelectedAzimuth: PROC [svData: SVData] RETURNS [azimuth: REAL];
SetSelectedAzimuth: PROC [svData: SVData, azimuth: REAL];
GetSelectedSlope: PROC [svData: SVData] RETURNS [slope: REAL];
SetSelectedSlope: PROC [svData: SVData, slope: REAL];
Defaults
GetDefaultHeuristics: PROC [] RETURNS [BOOL];
END.