annotate arrows/@mousepos/mousepos.m @ 0:672052bd81f8

Initial partial import.

% mousepos - Arrow that tracks the mouse position in some axes.
%
% mousepos ::
%    options {
%       fig :: handles / gcf ~'figure to track';
%       xlim :: [[1,2]] / [] ~'if not empty, set X limits of axes';
%       ylim :: [[1,2]] / [] ~'if not empty, set Y limits of axes'
%    }
% -> arrow({},[[2,1]]),empty).
%
% The output of the mousepos arrow is a two element column vector
% containing the X and Y coordinates of the current point in axes
% coordinates.

function o=mousepos(varargin)
	s.opts=prefs('fig',[],'xlim',[],'ylim',[],varargin{:});
	if isempty(s.opts.fig), s.opts.fig=gcf; end
	o=class(s,'mousepos',arrow(0,1));
end