图中图放大 matlab代码

%橡皮筋图形放大，图中图实例
%关键代码――――――――
k = waitforbuttonpress;
point1 = get(gca,'CurrentPoint');    % button down detected
finalRect = rbbox;                   % return figure units
point2 = get(gca,'CurrentPoint');    % button up detected
point1 = point1(1,1:2);              % extract x and y
point2 = point2(1,1:2);
p1 = min(point1,point2);             % calculate locations
offset = abs(point1-point2);         % and dimensions
x = [p1(1) p1(1)+offset(1) p1(1)+offset(1) p1(1) p1(1)];
y = [p1(2) p1(2) p1(2)+offset(2) p1(2)+offset(2) p1(2)];
hold on;
axis manual;
plot(x,y);
%代码清单――――――――――――
function myzoom
%% 综合实例
% 俗话说，一图值千字。同样，对于应用软件而言，一例值千言。
%% 画中画缩放程序
myDraw   %绘原始图
while 1
    try
        if waitforbuttonpress % 按键时返回1，%关闭图像时，waitforbuttonpress产生错误
            close gcf
            break
        end
    catch
        return;
    end