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: BOOL _ TRUE]; 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: BOOL _ TRUE] RETURNS [alreadyThere: BOOL]; DeleteAzimuth: PROC [svData: SVData]; -- delete the selected azimuth GetSlopeValue: PROC [svData: SVData] RETURNS [degrees: REAL, success: BOOL _ TRUE]; 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: BOOL _ TRUE] RETURNS [alreadyThere: BOOL]; DeleteSlope: PROC [svData: SVData]; -- delete the selected slope GetRadiusValue: PROC [svData: SVData] RETURNS [radius: REAL, success: BOOL _ TRUE]; 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: BOOL _ TRUE] 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: BOOL _ TRUE] 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: BOOL _ TRUE] RETURNS [alreadyThere: BOOL]; DeleteSlopePlanes: PROC [svData: SVData]; -- delete the selected slope planes 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]; 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 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]; 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]; 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]; GetDefaultHeuristics: PROC [] RETURNS [BOOL]; END. tSVState.mesa Copyright c 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. Refresh Parameters Returns the viewer extent in screen coordinates. Gravity and Alignments Other Hidden State (yuk) Peculiar to 3D Defaults Κ‹˜J˜Icodešœ ™ Kšœ Οmœ1™KšŸœžœ.˜CKšŸœžœžœžœ˜8KšŸœžœ"žœ˜?KšŸ œžœžœžœ˜4KšŸ œžœžœ˜7KšŸ œžœžœ˜>KšŸœžœžœžœ˜9šŸœžœ#žœ˜AK™0—K˜K™KšŸ œžœžœ ˜3KšŸ œžœžœ žœ˜KšŸœžœžœ˜5K˜K™KšŸœžœžœžœ˜-K˜Kšžœ˜K˜—…—Ž