GraphBrowserPane.TIP, from [Ivy]<Spreitzer>Graphs>Graphs.DF
Last Edited by: Spreitzer, November 19, 1983 7:40 pm
[DEF,SHIFT,(SELECT ENABLE FROM
LeftShift Down | RightShift Down => Finish, Coords, ~1, Shift, ~2;
ENDCASE => Finish, Coords, ~1, NotShift, ~2, Fu;)]
[DEF,CTRL,(SELECT ENABLE FROM
Ctrl Down | Spare3 Down => [SHIFT,Ctl,~1]
ENDCASE => [SHIFT,NotCtl,~1])]
[DEF,MB,(~1 Up => [CTRL,~1])]
[DEF,Foo,(
Mouse WHILE ~1 Down WHILE ~2 Up WHILE ~3 Up => Continue, Coords;
~1 Down => SELECT ENABLE FROM
~2 Down => Abort;
~3 Down => Abort;
ENDCASE => Start, Coords;)]
SELECT TRIGGER FROM
[Foo,Red,Yellow,Blue]
[Foo,Yellow,Blue,Red]
[Foo,Blue,Red,Yellow]
[MB,Red]
[MB,Yellow]
[MB,Blue]
ENDCASE.