-- BoundingBox.tip
-- Created by Beach, August 22, 1983 10:01 am

SELECT TRIGGER FROM

  Mouse WHILE Red Down => Coords, Move;
  
  Red Up => Coords, End;
  Red Down => SELECT ENABLE FROM
  	Blue Down => Abort;
  	Yellow Down => Abort;
  	ENDCASE;

  Yellow Down => SELECT ENABLE FROM
  	Blue Down => Abort;
  	Red Down => Abort;
  	ENDCASE;

  Blue Down => SELECT ENABLE FROM
  	Red Down => Abort;
  	Yellow Down => Abort;
  	ENDCASE;
  
  ENDCASE.