Graph.Tip
Last Edited:
Sweetsun Chen, October 21, 1985 10:59:04 pm PDT
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};
C Down => {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};
also sets input focus.
Yellow Down => SELECT ENABLE FROM
Z Down => {Coords ZoomPoint};
T Down => {Coords MoveSelText};
ENDCASE => SetFocus;
Yellow Up WHILE Z Down => {Coords ZoomPoint};
SELECT ENABLE FROM
Blue Down => ClearZoomBox;
ENDCASE => {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.