- 1、本文档共16页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
机械原理课程设计
编程说明书
设计题目:插床机构-导杆机构(1)
目 录
设计任务及要求-----------------------------------------------------------------------1
数学模型-------------------------------------------------------------------------------2
程序框图--------------------------------------------------------------------------------3
程序清单--------------------------------------------------------------------------------4
运行结果--------------------------------------------------------------------------------11
心得与体会-----------------------------------------------------------------------------12
参考文献--------------------------------------------------------------------------------13
一.设计任务及要求
已知:程速比系数K=2,滑块5的冲程H=100mm,中心距=150mm,比值=1,各构件重心S的位置,曲柄每分钟转数=60r/min。
要求:
设计导杆机构;
作机构两个位置的动画显示;
作滑块的运动线图(编程设计);
编写说明书;
二.数学模型
极位夹角 =60?
杆长
杆1的长 =
杆2的长 =
杆3 4的长
3.运动分析
杆1的角速度
滑块2的速度
滑块2的加速度
杆3与y轴夹角
杆3的角速度
杆3的角加速度
杆4与y轴夹角
杆4的角速度
杆4的角加速度
滑块5的速度
滑块5的加速度
三.程序框图
输入a,d,e,f,g,ω1,输入N 作循环,for(I=0;IN;I++)
依次计算θ2,θ3,ω2,ω3,ε2,ε3
将计算的θ2,θ3,ω2,ω3,ε2,ε3结果分别存
入数组或文件中
按格式输出所有计算结果 初始化图形系统 绘制直角坐标系 直角坐标系下分别绘出角位移、角速度、角加速度图象 四、程序清单
#includestdio.h
#includemath.h
#includestdlib.h
#includeconio.h
#includegraphics.h
#define pi 3.1415926
#define N 600
void init_graph(void);
void initview();
void draw();
void cur();
double weit1[N],weit2[N],weit3[N];
double sita1[N],sita2[N],sita3[N];
double omigar1[N],omigar2[N],omigar3[N];
double a=50.0,d=160.0,e=130.0,f=115.0,g=115.0,w1=6.2831852;
main()
{
int i;
double alf=0, detat=0,theta1=0;
double weit=0,w3=0,ekq3=0,b=0,va=0;
double theta2=0,w4=0,ekq4=0;
double s=0,vc=0,ac=0;
double q=0,j=0,u=0;
detat=2*pi/(N*w1);
for(i=0;iN;i++)
{
alf=w1*detat*i;
weit=atan((a*sin(alf)-d)/(a*cos(alf)));
if(weit0)
weit=weit+2*pi;
else
if(0weitpi)
weit=weit+pi;
theta1=weit-pi;
b=sqrt(a*a+d*d-2*a*d*sin(alf));
w3=a*w1*cos(alf-weit)/b;
va=-a*w1*sin(alf-weit);
ekq3=(-a*w1*w1*sin(alf-we
您可能关注的文档
最近下载
- 疼痛患者的护理PPT (2).ppt
- 2024-2025一年级下册体育教学计划和教案.pdf VIP
- AP计算机科学A 2009年真题 (选择题+问答题) AP Computer Science A 2009 Released Exam and Answers (MCQ+FRQ).pdf VIP
- 小学三年级下册语文阅读集训专练(附答案).pdf
- 统编版小学六年级下册语文全册课件(2024年春季版).pptx
- AP计算机科学A 2019年真题 附答案和评分标准 AP Computer Science A 2019 Real Exam with Answers and Scoring Guidelines.pdf VIP
- 2013-11-26-国能新能(2013)433号关于分布式光伏发电项目管理暂行办法的通知 (1).pdf
- 新生儿败血症诊断与治疗专家共识(2024)解读.pptx
- [整理]好玩的玩具.ppt
- 统编版四年级语文下第一单元 大单元教学 课件.pptx
文档评论(0)