-- ChipNDaleCSMonitor.TIP
-- created by Christian Jacobi, July 18, 1983 3:20 pm
-- last edited by Christian Jacobi, September 12, 1983 1:39 pm
-- Last Edited by: Shand, July 26, 1984 6:11:14 am PDT
[DEF,MarkDown,(Red Down)]
[DEF,MarkUp,(Red Up)]
[DEF,DrawDown,(Yellow Down)]
[DEF,DrawUp,(Yellow Up)]
[DEF,SelDown,(Blue Down)]
[DEF,SelUp,(Blue Up)]
[DEF,SHIFT,(RightShift Down | LeftShift Down)]
[DEF,ArrowCursor,(WHILE ChipndaleArrowCursor)]
[DEF,BoxCursor,(WHILE ChipndaleBoxCursor)]
[DEF,ArrowTrack,(UseArrowTrack, Track)]
[DEF,BoxTrack,(UseBoxTrack, Track)]
SELECT TRIGGER FROM
-- a few simple operations
Mouse WHILE [DrawDown] => Coords, Track;
Mouse WHILE [MarkDown] => Coords, Track;
[DrawUp] [ArrowCursor] => Coords, MoveScreen, StopTrack;
[DrawDown] => Coords, StopTrack, UseArrowTrack, Track;
[MarkUp] [BoxCursor] => Coords, ShowRect, StopTrack;
[MarkDown] => Coords, StopTrack, UseBoxTrack, Track;
[DrawUp] => StopTrack;
[MarkUp] => StopTrack;
[SelUp] WHILE Space Down => Coords, PrintTile;
[SelUp] => Coords, PrintTileValue;
D Down WHILE [SHIFT] => PredPrintingDepth;
D Down => SuccPrintingDepth;
W Down WHILE [SHIFT] => PredPrintingWidth;
W Down => SuccPrintingWidth;
R Down => Redisplay;
V Down => ViewerMenu;
Period Down => ScaleLessDetail;
Comma Down => ScaleMoreDetail;
ENDCASE.