% FUNCTION ZOOM2CURSOR
% ZOOM2CURSOR, without arguments, will activate the current axis, create a text box showing the current position of the mouse pointer (similar to pixval), and automatically zoom the image to the location of the cursor as it is moved. The zoomed display dynamically scrolls with the motion of the cursor.
% By default, the function zooms to 50% of the image in the axis.
% BUTTON CLICKS:
% Left-clicking will zoom in further, and right-clicking will zoom out.
% Shift-clicking (or simultaneously clicking the left and right mouse buttons) at any point will display the original (un-zoomed) image, as will moving the cursor outside of the current axis. The zoom percentage is restored when the mouse is moved.
% Double-clicking zooms out to the original image, modifying the zoom percentage.
% Tested under R12.1 and R13.
% Written by Brett Shoelson, Ph.D. (firstname.lastname@example.org, email@example.com)
% 2/16/03; Rev 2: Program is more robust; fixes a bug when window is resized.
%Incremental increase/decrease in zoom percent (on mouseclick) has been reduced.
%ALSO: Now works with images, surfaces, lines (and thus plots), and patches (rather than just images)