-- SolidViews.TIP
-- last written by Bier, December 12, 1982 10:17 pm

[DEF,SHIFT,(RightShift Down | LeftShift Down)]

SELECT TRIGGER FROM
 Red Down => SELECT ENABLE FROM
     [SHIFT] => {Coords StartSecondarySelection};
     ENDCASE => {Coords StartPrimarySelection};
 Yellow Down => SELECT ENABLE FROM
     [SHIFT] => {Coords DeleteFrame};
     ENDCASE => {Coords FrameUpLeft};
 Blue Down => {Coords SingleRay};
 Mouse WHILE Red Down => SELECT ENABLE FROM
         [SHIFT] => {Coords SetSecondarySelection};
         ENDCASE => {Coords SetPrimarySelection};
 Mouse WHILE Yellow Down => {Coords FrameDownRightMove};
 Red Up => SELECT ENABLE FROM
         [SHIFT] => {Coords EndSecondarySelection};
         ENDCASE => {Coords EndPrimarySelection};
Yellow Up => {Coords FrameDownRightEnd};
ENDCASE.