使用MATLAB的GUI进行单摆模拟仿真代码，要求能直接运行

在MATLAB中创建一个简单的单摆模拟GUI，你可以按照以下步骤编写代码：

% 导入所需的工具箱
if ~isToolboxInstalled('GUIDE')
    error('Please install the MATLAB Guide Toolbox to create GUIs.')
end

% 打开GUIDE并设计界面
figure;
ui = uifigure; % 创建一个新的UI figure
layout = [2 1]; % 两行一列的布局
tspan = '0:0.01:10'; % 摆动时间范围
slider = uislider( ... % 指定摆角滑块
    ui, 'Position', [50 200 200 22], 'Limits', [0 90], 'Value', 45);
time_text = uitext( ... % 时间标签
    ui, 'Position', [50 160 70 22], 'Text', tspan);

% 创建图形绘制区域
axes_g = uiaxes(ui, 'Position', [50 120 300 80]);
angle_label = uitext(ui, 'Position', [50 80 70 22], 'Text', '摆角:');
angle_text = uilabel(ui, 'Position', [130 80 50 22]);

% 编写回调函数，用于更新单摆运动
function update_bounce(~, event)
    angle = slider.Value * pi / 180; % 将度转换为弧度
    [x, y] = singlependulum(angle, evalc(tspan)); % 单摆方程求解
    plot(axes_g, x, y); % 绘制轨迹
    angle_text.Text = ['角度: ', num2str(angle), '°'];
end

% 添加事件监听器
addlistener(slider, 'ValueChanged', @(~,~)update_bounce);

% 开始单摆模拟
singlependulum = @(theta, t) ... % 这里需要你自己定义单摆方程，比如使用欧拉法等
    [theta, omega] = ode45(@pendulum_eqn, t, [theta 0]); % 假设pendulum_eqn是你定义的单摆动力学方程

% 运行仿真
ode45(singlependulum, evalc(tspan));

% 关闭指南助手
delete(ui.Figure)

% 确保用户能够直接运行这个脚本，将下面的内容添加到文件顶部
function outputFcn(hObject, eventdata, handles)
    % 在这里，你可以设置一个按钮或者其他控件，当用户点击它时，
    % 运行上面的仿真。例如，如果你有一个名为"Run Simulation"的按钮，
    % 可以这样设置：
    if strcmp(get(hObject, 'Tag'), 'run_simulation_button')
        delete(handles.ui); % 删除旧的GUI
        % 重新运行GUI和仿真
        runSingleBeadSim;
    end
end

% 初始化GUI
function runSingleBeadSim
    guidata(hObject, struct('SliderValue', slider.Value));
    % 其他初始化操作...
end

请注意，上述代码示例中的`pendulum_eqn`、`ode45`以及`singlependulum`函数都需要你自己根据物理模型定义。这个代码只是一个基本框架，你需要根据实际情况调整。