<> <> <<>> OPTIONS PrintKeys; [DEF,SHIFT,(LeftShift Down | RightShift Down)] SELECT TRIGGER FROM Mouse WHILE Red Down => Coords, TrackMouse; Mouse WHILE Blue Down => Coords, TrackMouse; Mouse WHILE Yellow Down => Coords, TrackMouse; Mouse => Coords; Red Down => SELECT ENABLE FROM LeftShift Down => SELECT ENABLE FROM Ctrl Down => Coords, MoveNoStretch; ENDCASE => Coords, MoveOrigin; RightShift Down => SELECT ENABLE FROM Ctrl Down => Coords, MoveNoStretch; ENDCASE => Coords, MoveOrigin; Ctrl Down => Coords, MoveStretch; ENDCASE => Coords, MoveMark; Yellow Down => SELECT ENABLE FROM LeftShift Down => SELECT ENABLE FROM Ctrl Down => Undelete; ENDCASE => Coords, DeleteObject; RightShift Down => SELECT ENABLE FROM Ctrl Down => Undelete; ENDCASE =>Coords, DeleteObject; Ctrl Down => Coords, Copy; ENDCASE => Coords, DrawLine; Blue Down => SELECT ENABLE FROM LeftShift Down => SELECT ENABLE FROM Ctrl Down => Coords, DeselectObject; ENDCASE => Coords, SelectArea; RightShift Down => SELECT ENABLE FROM Ctrl Down => Coords, DeselectObject; ENDCASE => Coords, SelectArea; Ctrl Down => Coords, AddSelected; ENDCASE => Coords, SelectObject; A Down WHILE Ctrl Down => ControlA; B Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => DrawBackBox; ENDCASE => DrawBox; C Down WHILE Ctrl Down => CopySelected; D Down WHILE Ctrl Down => DeleteSelected; E Down WHILE Ctrl Down => ComplimentMagnify; F Down WHILE Ctrl Down => SetDefault; G Down WHILE Ctrl Down => SetGrid; H Down WHILE Ctrl Down => ControlH; I Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => InputFileRelative; ENDCASE => InputFile; J Down WHILE Ctrl Down => Jam; LF Down => Jam; K Down WHILE Ctrl Down => Kill; L Down WHILE Ctrl Down => DefineMacro; M Down WHILE Ctrl Down => Return; N Down WHILE Ctrl Down => ComplimentOneLevel; O Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => PutFile; -- Put large format file, called LSil format ENDCASE => PutFile; P Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => OutputFile; -- clipped to Alto screen size using compatible AltoSil format ENDCASE => OutputFileUnclipped; -- using AltoSil format, unclipped if possible Q Down WHILE Ctrl Down => ControlQ; R Down WHILE Ctrl Down => DeleteMacros; T Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => ShowFrames; ENDCASE => ShowTics; U Down WHILE Ctrl Down => Undelete; V Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => ReduceSelection; ENDCASE => View; X Down WHILE Ctrl Down => SELECT ENABLE FROM [SHIFT] => MoveRelativeNoStretch ENDCASE => MoveRelativeStretch; Y Down WHILE Ctrl Down => Ylock; Z Down WHILE Ctrl Down => Hardcopy; W Down WHILE Ctrl Down => ControlW; S Down WHILE Ctrl Down => ControlS; Arrow Down WHILE Ctrl Down => CenterOnMark; < SELECT ENABLE FROM>> << [SHIFT] => Help>> << ENDCASE => Help;>> DEL Down => Del; ESC Down => Escape; Return Down => Return; BS Down => Backspace; ENDCASE. <> <> <> <<>>