<> <> <> <<>> OPTIONS Fast, DefaultKeys; <<>> [DEF,SHIFT,(LeftShift Down | RightShift Down)] <<[DEF,NumberL,(~1 Down => {Coords ~2 LeftStep}]>> <<[DEF,NumberR,(~1 Down => {Coords ~2 RightStep}]>> [DEF,NumbersUp,(One Up WHILE Two Up WHILE Three Up WHILE Four Up WHILE Five Up WHILE Six Up WHILE Seven Up WHILE Eight Up WHILE Nine Up)] <<>> SELECT TRIGGER FROM Mouse => SELECT ENABLE FROM Red Down => SELECT ENABLE FROM T Down => {Coords SelectText}; S Down => {Coords Slide}; < {Coords SelectCurve};>> H Up WHILE V Up WHILE Z Up WHILE NumbersUp => {Coords SelectPoint}; ENDCASE; Z Down WHILE Yellow Down => {Coords ZoomPoint}; ENDCASE; Red Down => SELECT ENABLE FROM C Down => {Coords SelectCurve}; H Down => SELECT ENABLE FROM S Down => JumpLeftSameCurve; ENDCASE => JumpLeftAnyCurve; T Down => {Coords SelectText}; V Down => JumpUp; Z Down => {Coords ZoomIn}; <<[NumberL,One,1];>> <<[NumberL,Two,2];>> <<[NumberL,Three,3];>> <<[NumberL,Four,4];>> <<[NumberL,Five,5];>> <<[NumberL,Six,6];>> <<[NumberL,Seven,7];>> <<[NumberL,Eight,8];>> <<[NumberL,Nine,9];>> S Down => {Coords Slide}; ENDCASE => {Coords SetFocus SelectPoint}; <> Yellow Down => SELECT ENABLE FROM Z Down => {Coords ZoomPoint}; T Down => {Coords MoveSelText}; ENDCASE => SetFocus; Yellow Up WHILE Z Down => {Coords ZoomPoint}; <> < ClearZoomBox;>> < {Coords ZoomPoint2};>> Blue Down => SELECT ENABLE FROM C Down => RemoveCurve; H Down => SELECT ENABLE FROM S Down => JumpRightSameCurve; ENDCASE => JumpRightAnyCurve; T Down => ClearText; V Down => JumpDown; Z Down => {Coords ZoomOut}; <<[NumberR,One,1];>> <<[NumberR,Two,2];>> <<[NumberR,Three,3];>> <<[NumberR,Four,4];>> <<[NumberR,Five,5];>> <<[NumberR,Six,6];>> <<[NumberR,Seven,7];>> <<[NumberR,Eight,8];>> <<[NumberR,Nine,9];>> ENDCASE; One Down => SELECT ENABLE FROM Ctrl Down => PrimaryVisibility; [SHIFT] => PrimaryBlinking; Two Down => SaveCrosshair; ENDCASE; Two Down => SELECT ENABLE FROM Ctrl Down => SecondaryVisibility; [SHIFT] => SecondaryBlinking; One Down => SaveCrosshair; ENDCASE; Three Down => SELECT ENABLE FROM Ctrl Down => TextCaretVisibility; [SHIFT] => TextCaretBlinking; ENDCASE; B Down WHILE Ctrl Down => ToggleAutoBounds; C Down => SELECT ENABLE FROM Ctrl Down => ShowSelEntityOnPanel; R Down => CleanAndPaint; ENDCASE; D Down WHILE Ctrl Down => ToggleAutoDiv; R Down => SELECT ENABLE FROM C Down => CleanAndPaint; ENDCASE => Repaint; T Down WHILE Ctrl Down => ShowSelTextOnPanel; X Down => SELECT ENABLE FROM V Down => ToggleTargetX; G Down => ToggleGridX; ENDCASE; Y Down => SELECT ENABLE FROM V Down => ToggleTargetY; G Down => ToggleGridY; ENDCASE; V Down => SELECT ENABLE FROM X Down => ToggleTargetX; Y Down => ToggleTargetY; ENDCASE; G Down => SELECT ENABLE FROM X Down => ToggleGridX; Y Down => ToggleGridY; ENDCASE; ENDCASE.