MATLAB源程序代码分享：MATLAB实现曲柄摇杆机构的运动仿真

House · 发表于 2020-3-12 10:44

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

MATLAB源程序代码分享：MATLAB实现曲柄摇杆机构的运动仿真
%% 定义曲柄摇杆机构的四个杆长
clear;clc;close all
l0=20;
l1=10;
l2=24;
l3=24;

%% 创建图形窗口并设置大小
figure
set(gcf,'units','normalized','position',[0.2 0.2 0.6 0.6]);  % 设置 figure 窗口的位置和尺寸
pause(0.5)

%% 给定一个角度值 phi1, 求解出对应的 phi3, 确定各个杆的位置, 绘制机构的运动动画
phi3=pi/6;
for phi1=0:0.1:4.8*pi                   % phi1 设定一个范围, 做曲柄摇杆机构的动画
A=l0-l1*cos(phi1);                   % 中间变量 A
B=l1*sin(phi1);                      % 中间变量 B
C=(l2^2-A^2-B^2-l3^2)/(2*l3);       % 中间变量 C
f=@(phi3) A*cos(phi3)-B*sin(phi3)-C; % 定义 phi3 的方程
phi3=fsolve(f,phi3);                % 求解 phi3 的方程, 得到 phi3 的值

PA=[0,0];                            % A点坐标
PD=[l0,0];                            % D点坐标
PB=[l1*cos(phi1),l1*sin(phi1)];       % B点坐标
PC=[l3*cos(phi3)+l0,l3*sin(phi3)];    % C点坐标

plot([PA(1),PB(1)],[PA(2),PB(2)],'color','r','Marker','o'); % 绘制 AB 杆
hold on
plot([PB(1),PC(1)],[PB(2),PC(2)],'color','g','Marker','o'); % 绘制 BC 杆
plot([PC(1),PD(1)],[PC(2),PD(2)],'color','b','Marker','o'); % 绘制 CD 杆
plot([PD(1),PA(1)],[PD(2),PA(2)],'color','m','Marker','o'); % 绘制 AD 杆
axis equal
axis([-15 30 -15 30])    % 设置坐标系范围
grid on
title('曲柄摇杆机构的运动动画')
hold off
pause(0.02)
end

helendcany · 发表于 2020-3-12 18:13

MATLAB实现曲柄摇杆机构的运动仿真。

帐号		自动登录	找回密码
密码			注册

MATLAB源程序代码分享：MATLAB实现曲柄摇杆机构的运动仿真

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1