上述程序中，每条曲线只能更改一个点，而不能通过鼠标帮我任意更改多次曲线的点

非常抱歉我之前的回答有误。要实现通过鼠标任意多次更改曲线上的点，需要对代码进行一些修改。

首先，我们需要在鼠标点击事件处理函数`updateCurve`中添加一个循环，以便可以多次获取鼠标点击的位置。同时，我们还需要在点击之前确定要更新的曲线对象，这样我们才能正确地更新对应的数据向量。以下是修改后的代码：

% 创建初始曲线
x = linspace(0, 3000, 100);
y1 = linspace(0, 3500, 100);
y2 = linspace(0, 3500, 100);
y3 = linspace(0, 3500, 100);
y4 = linspace(0, 3500, 100);

% 绘制初始曲线
figure;
h1 = plot(x, y1);
hold on;
h2 = plot(x, y2);
h3 = plot(x, y3);
h4 = plot(x, y4);

% 添加图例
legend('曲线1', '曲线2', '曲线3', '曲线4');

title('移动点以改变曲线形状');
xlabel('传感器切换次数');
ylabel('时间');

% 添加鼠标点击事件处理函数
set(h1, 'ButtonDownFcn', @(src, event) updateCurve(src, event, h1, y1));
set(h2, 'ButtonDownFcn', @(src, event) updateCurve(src, event, h2, y2));
set(h3, 'ButtonDownFcn', @(src, event) updateCurve(src, event, h3, y3));
set(h4, 'ButtonDownFcn', @(src, event) updateCurve(src, event, h4, y4));

% 鼠标点击事件处理函数
function updateCurve(src, event, h, y)
while ishghandle(h) && strcmp(get(gcf, 'SelectionType'), 'normal')
    % 鼠标点击并获取新点的位置
    [clicked_x, clicked_y] = ginput(1);

    % 找到离点击位置最近的点的索引
    [~, idx] = min(abs(h.XData - clicked_x));

    % 更新该点的纵坐标为点击的纵坐标
    y(idx) = clicked_y;

    % 更新曲线
    set(h, 'YData', y);
    drawnow;
end
end

在修改后的代码中，我们使用了一个`while`循环来持续监听鼠标点击事件。只有在点击左键时（即`strcmp(get(gcf, 'SelectionType'), 'normal')`为真）才会进入循环。这样，每次点击鼠标时，都会更新对应的曲线上离点击位置最近的点。

希望这次能够满足你的要求，如果还有其他问题，请随时提问。