<> <> <> <> <> <<>> DIRECTORY GGInterfaceTypes; GGEvent: CEDAR DEFINITIONS = BEGIN GGData: TYPE = GGInterfaceTypes.GGData; <<>> <> <<>> PaintActionArea: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <<>> <> <> Clear: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Reset: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Get: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Merge: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Save: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Store: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Split: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> MergeIPEditable: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MergeIPSlice: PROC [clientData: REF ANY, event: LIST OF REF ANY]; IncludeIPByReference: PROC [clientData: REF ANY, event: LIST OF REF ANY]; IncludeIPByValue: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowIPIncludeMode: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToIP: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToIPScreen: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToIPLit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToIPTestGravity: PROC [clientData: REF ANY, event: LIST OF REF ANY]; StuffIt: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> StuffItScreen: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Refresh: PROC [clientData: REF ANY, event: LIST OF REF ANY]; OpenTypescript: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Help: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> Delete: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Undelete: PROC [clientData: REF ANY, event: LIST OF REF ANY]; UndeleteAutoConfirm: PROC [clientData: REF ANY, event: LIST OF REF ANY]; UnionCombine: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddHoles: PROC [clientData: REF ANY, event: LIST OF REF ANY]; FreeHoles: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DescribeCurve: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> ApplyAllDefaults: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetAllDefaults: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowAllDefaults: PROC [clientData: REF ANY, event: LIST OF REF ANY]; StandardDefaults: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Weld: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddControlPoint: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DeleteControlPoint: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddJoint: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SplitSegment: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Splice: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> Close: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowPoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; HidePoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> TransRotScale: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SixPointTransform: PROC [clientData: REF ANY, event: LIST OF REF ANY]; FourPointTransform: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> PolygonInCircle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; NewKnotchedLine: PROC [clientData: REF ANY, event: LIST OF REF ANY]; NewCircle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; NewBox: PROC [clientData: REF ANY, event: LIST OF REF ANY]; NewArrow: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Frame: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> <> <> Top: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Bottom: PROC [clientData: REF ANY, event: LIST OF REF ANY]; UpOne: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DownOne: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> <> <> DisableRefresh: PROC [clientData: REF ANY, event: LIST OF REF ANY]; EnableRefresh: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> TestGravity: PROC [clientData: REF ANY, event: LIST OF REF ANY]; TestMultiGravity: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Statistics: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintSelectedStatistic: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ResetStatistics: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawTouchPoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DescribeTouchPoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawBoundBoxes: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawTightBoxes: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawOutlineBoxes: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawSelectionBox: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DrawMovingBox: PROC [clientData: REF ANY, event: LIST OF REF ANY]; Typescript: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SlackLog: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DescribeCaretObject: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> LineWidth: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineEnds: PROC [clientData: REF ANY, event: LIST OF REF ANY]; TrajJoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DashesFromSelection: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DashesOff: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintStrokeValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectMatchingWidth: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectMatchingDashes: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDefaultStrokeValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowDefaultStrokeValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> Arrows: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> <> <> AreaColorFromColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorFromColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorFollowColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorFollowColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorToColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorToColorTool: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorFromSelectedName: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorFromSelectedName: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorFromSelectedRGB: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorFromSelectedRGB: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectMatchingAreaColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectMatchingLineColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDefaultLineColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowDefaultLineColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> AreaColorBlack: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorBlack: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintAreaColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintLineColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorWhite: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorWhite: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorGray: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorGray: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AreaColorNone: PROC [clientData: REF ANY, event: LIST OF REF ANY]; LineColorNone: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDefaultFillColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowDefaultFillColor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> <> <> AreaSelectNew: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> AreaSelectExtend: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> AreaSelectNewAndDelete: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> AreaSelectDegenerate: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> SelectAll: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <<>> <> <> SetStraight: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetArc: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetSnowflake: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetConic: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetBezier: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetNaturalSpline: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetBSpline: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetCircle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDisc: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectMatchingCurve: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> AddToGroup: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SelectGroup: PROC [clientData: REF ANY, event: LIST OF REF ANY]; RemoveFromGroup: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintGroupsOfSelected: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintAllGroups: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> AddChar: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddText: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AmplifySpaceFromSelection: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintAmplifySpace: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DropShadowOn: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DropShadowOff: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DropShadowFromSelection: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> SetPressFont: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetPrintFont: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetScreenFont: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetFontDetailed: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetFontLiteral: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDefaultFontValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; CopyAll: PROC [clientData: REF ANY, event: LIST OF REF ANY]; CopyFont: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowFontValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowFontValuesLiteral: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowDefaultFontValues: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MatchAll: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MatchSelectedName: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MatchSelectedNameLiteral: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> MakeHot: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MakeAllHot: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MakeCold: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MakeAllCold: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ShowHot: PROC [clientData: REF ANY, event: LIST OF REF ANY]; HideHot: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DropAnchor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; KillAnchor: PROC [clientData: REF ANY, event: LIST OF REF ANY]; GravityChoiceChange: PROC [clientData: REF ANY, event: LIST OF REF ANY]; GravityExtentChange: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleAlwaysOn: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleShowColors: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ScreenChoiceChange: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> ToggleMidpoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetMidpointsInternal: PROC [ggData: GGData, on: BOOL]; ToggleHeuristics: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleGravity: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleAlignments: PROC [clientData: REF ANY, event: LIST OF REF ANY]; StandardAlignments: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> AllAlignmentsOff: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> InitializeAlignments: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <<>> <> <> ScaleUnitFromSegment: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ScaleUnitFromValue: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ScaleUnitFromSelection: PROC [clientData: REF ANY, event: LIST OF REF ANY]; InchScaleUnit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; CentimeterScaleUnit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PointsScaleUnit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintScaleUnit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> <> <> StandardSlopes: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SlopePrompt: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddSlope: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddSlopeInternal: PROC [ggData: GGData, degrees: REAL]; GetSlope: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleSlope: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DeleteSlope: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> StandardAngles: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AnglePrompt: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddAngle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddAngleInternal: PROC [ggData: GGData, degrees: REAL]; GetAngle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleAngle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DeleteAngle: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> StandardRadii: PROC [clientData: REF ANY, event: LIST OF REF ANY]; RadiusPrompt: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddRadius: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddRadiusInternal: PROC [ggData: GGData, radius: REAL]; GetRadius: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleRadius: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DeleteRadius: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> StandardDistances: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DistancePrompt: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddDistance: PROC [clientData: REF ANY, event: LIST OF REF ANY]; AddDistanceInternal: PROC [ggData: GGData, distance: REAL]; GetDistance: PROC [clientData: REF ANY, event: LIST OF REF ANY]; ToggleDistance: PROC [clientData: REF ANY, event: LIST OF REF ANY]; DeleteDistance: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> MeasureSlopeHit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MeasureAngleHit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MeasureRadiusHit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; MeasureLineDistHit: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> SetGravityExtent: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetShowColors: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetGravity: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetMidpoints: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetHeuristics: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SetDefaultFont: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <> <> ReloadTipTable: PROC [clientData: REF ANY, event: LIST OF REF ANY]; IPSnapShot: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SawEdited: PROC [clientData: REF ANY, event: LIST OF REF ANY]; SawTextFinish: PROC [clientData: REF ANY, event: LIST OF REF ANY]; PrintRope: PROC [clientData: REF ANY, event: LIST OF REF ANY]; -- for printing the name of a script onto the feedback line <<>> <> DeleteCaretSegment: PROC [clientData: REF ANY, event: LIST OF REF ANY]; <<>> END.