Object <- Viewable <- Box <- Window <- CalibrationPad |
|
|
AboutToHide AdvanceStage Calibrate CloseEnough ConstrainToolTarget Draw ReinitializeClass SetStage Touch |
|
AutoMove KeepFrontmost |
| Field | Type | |
|---|---|---|
| Viewable: | superview: | Viewable |
| relativeOrigin: | Dot | |
| contentSize: | Dot | |
| viewFlags: | Flags | |
| labelStyle: | TextStyle | |
| color: | Unsigned | |
| altColor: | Unsigned | |
| shadow: | Shadow | |
| sound: | Playable | |
| HasBorder: | border: | Border |
| Window: | canCoexist: | Boolean |
| persistentWindow: | Boolean | |
| dontAutoExtend: | Boolean | |
| ignoreGrid: | Boolean | |
| closeAfterTouch: | Boolean | |
| closeBeforeTouch: | Boolean | |
| autoPosition: | Boolean | |
| noCloseBox: | Boolean | |
| downArrowVisible: | Boolean | |
| upArrowVisible: | Boolean | |
| rightArrowVisible: | Boolean | |
| leftArrowVisible: | Boolean | |
| autoMoveContents: | Boolean | |
| searchable: | Boolean | |
| customTitleColor: | Boolean | |
| scaleWindowTitle: | Boolean | |
| noBuiltInArrows: | Boolean | |
| noZoom: | Boolean | |
| autoCopyWindow: | Boolean | |
| CalibrationPad: | target: | Viewable |
| targetOrigins: | DataList | |
| stage: | Unsigned | |
| minCorrection: | Dot | |
| maxCorrection: | Dot | |
| minPressure: | Unsigned |
instance CalibrationPad tag; relativeOrigin: <0.0,0.0>; contentSize: <0.0,0.0>; viewFlags: 0x00000000; labelStyle: nilObject; color: 0; altColor: 0; shadow: nilObject; sound: nilObject; border: nilObject; canCoexist: false; persistentWindow: false; dontAutoExtend: false; ignoreGrid: false; closeAfterTouch: false; closeBeforeTouch: false; autoPosition: false; noCloseBox: false; downArrowVisible: false; upArrowVisible: false; rightArrowVisible: false; leftArrowVisible: false; autoMoveContents: false; searchable: false; customTitleColor: false; scaleWindowTitle: false; noBuiltInArrows: false; noZoom: false; autoCopyWindow: false; target: nilObject; targetOrigins: nilObject; stage: 0; minCorrection: <0.0,0.0>; maxCorrection: <0.0,0.0>; minPressure: 0; end instance;
Define Class CalibrationPad; inherits from Window; field target: Viewable; // the target object (gets moved around) field targetOrigins: DataList; // the list of originDots for target field stage: Unsigned; // which step is currently active field minCorrection: Dot; // correction to the minimum corner of touch screen field maxCorrection: Dot; // correction to the maximum corner of touch screen field minPressure: Unsigned; // minimum pressure value to record a touch operation Calibrate(), noFail, safe, common; operation AdvanceStage(): Boolean; overrides ReinitializeClass; overrides AboutToHide; // flush touches just before hiding the pad overrides AutoMove; // returns false overrides ConstrainToolTarget; overrides KeepFrontmost; // returns true overrides Touch; overrides Draw; intrinsic CloseEnough(rawDot: Dot; drawnDot: Dot; tolerance: Micron): Boolean; operation SetStage(stage: Unsigned), intrinsic; end class;