机械原理课程设计说
明书
设计课题：插秧机的主体结构设计
学院：机械工程学院车辆工程系
班级：车辆131班
姓名：翟文豪
学号：139054063
指导老师：苏荭 2015年7月15日
1. 机构简介：
插秧机机头（如图2-5）的运动轨迹是：
1）水平往前取秧；
2）垂直往下插秧；
3）斜向返回，返回时不能将秧带出。
从四杆机构分析图谱查得，当L ab :Lbc :Lcd :Lda :Lbe :Lef =1：2：
1.5：2.5：2.6：0.15时，F 点的运动轨迹能满足要求。
图2-5 插秧机主体机构简图
2. 设计要求：
本课题要求设计插秧机的主体机构，并对插秧机机头的运
动规律进行科学分析。
3. 设计数据：
已知插秧机曲柄转速ω1=10rad/s，往下插秧行程需达秧高
180mm 。
4. 用程序求杆长：
程序代码：
Dim o1 As Double ' 即是论文上的杆ab 的角度，此处用弧度表示
Dim A As Double
Dim B As Double
Dim C As Double
Dim o2 As Double ' 即是论文上的杆bc 的角度，此处用弧度表示
Private Sub Command1_Click()
o1 = 0
yfmax = 0
yfmin = 0
pi = 3.1415926 ' 定义圆周率的大小
A = 4 * Sin(o1)
B = 4 * Cos(o1) - 10
C = 9 - 5 * Cos(o1)
'''求出第一次的坐标
o2 = 2 * Atn((A - Sqr(A ^ 2 + B ^ 2 - C ^ 2)) / (B -
C)) '即bc 杆上的角度
yf = Sin(o1) + 2.6 * Sin(o2) + 0.15 * Sin(o2 - pi /
2) 'f点纵坐标
xf = Cos(o1) + 2.6 * Cos(o2) + 0.15 * Cos(o2 - pi /
2) 'f点横坐标
''第一次坐标值不在循环内，单独将第一次的值输入到txt
文件中 感觉把数值写入txt 文件中没有什
么作用就注释了
' Text3 = "x:" & xf & " " & "y:" & yf
' Open "C:\Users\Administrator\Desktop\ x和y 的坐
标.txt" For Append As #1
' Print #1, Text3
' Close #1
''' 开始进入循环结构
For i = 2 To 360 Step 1 ' 将最新的纵坐标赋值给yf1
yf1 = yf
xf1 = xf ' 将最新的横坐标赋值给xf1
o1 = o1 + 0.01745 ' 每一度化为弧度就是0.01745
A = 4 * Sin(o1)
B = 4 * Cos(o1) - 10
C = 9 - 5 * Cos(o1)
o2 = 2 * Atn((A - Sqr(A ^ 2 + B ^ 2 - C ^ 2)) / (B -
C))
yf = Sin(o1) + 2.6 * Sin(o2) + 0.15 * Sin(o2 - pi /
2) '最新的f 点纵坐标
xf = Cos(o1) + 2.6 * Cos(o2) + 0.15 * Cos(o2 - pi /
2) '最新的f 点横坐标
''画轨迹图
Picture1.Line (1000 * xf1, Picture1.Height - 1000 *
yf1)-(1000 * xf, Picture1.Height - 1000 * yf)
'' 将每个对应的xf 和yf 的坐标输入到txt 文件当中 如果想知道每点对应的坐标，吧注释去了就行了
'Text3 = "x:" & xf & " " & "y:" & yf
' Open "C:\Users\Administrator\Desktop\ x和y 的坐
标.txt" For Append As #1
' Print #1, Text3
' Close #1
''找出最大值和最小值
If yf > yfmax Then
yfmax = yf
End If
If yf
yfmin = yf
End If
Next i
''输出最大值和最小值
Text1.Text = yfmax
Text2.Text = yfmin
''求出各个构件的长度
l = 180 / (yfmax - yfmin)
lab = l * 1 'ab
lbe = 2.6 * l 'be杆的长度杆的长度
lbc = 2 * l
ldc = 1.5 * l
lad = 2.5 * l
Text3.Text = lab
Text4.Text = lbe
Text5.Text = ldc
Text6.Text = lad
End Sub
5. 心得体会：
本课程设计考察了我们所学的机械原理知识。在设计过程中，要综合多方面的要求和需要来进行合理的选择，这是一个并不简单的过程。由此可以了解到，自己的能力远不能解决复杂的实际问题。我们还应不断地学习和积累。
在对水稻插秧机完全不了解的情况下，通过网络，查找了大量的相关资料。尽管对现实生活中的水稻插秧有了一定的了解，但这些资料对其工作的描述仍不够详细和清晰。我们未能对水稻插秧机的工作流程和原理完全清楚，
比如秧箱的具体结构和工作方式。这是设计过程中一个比较大的遗憾。
设计尺寸的部分是其中最难的步骤，我们只能在做出一个自我感觉合理的尺寸假设的前提下，继续以后的设计。我们顺利得出了点E （秧爪）的与要求轨迹近似的静轨迹图。接下来的步骤水到渠成，花费较多时间是一些繁杂的运算。
通过本次设计，积累了经验，对已学知识的理解更加深刻。表面看似简单的问题，在解决的过程中，逐渐显现出其复杂。在以后的学习中，应避免犯眼高手低的错误。
机械原理课程设计说
明书
设计课题：插秧机的主体结构设计
学院：机械工程学院车辆工程系
班级：车辆131班
姓名：翟文豪
学号：139054063
指导老师：苏荭 2015年7月15日
1. 机构简介：
插秧机机头（如图2-5）的运动轨迹是：
1）水平往前取秧；
2）垂直往下插秧；
3）斜向返回，返回时不能将秧带出。
从四杆机构分析图谱查得，当L ab :Lbc :Lcd :Lda :Lbe :Lef =1：2：
1.5：2.5：2.6：0.15时，F 点的运动轨迹能满足要求。
图2-5 插秧机主体机构简图
2. 设计要求：
本课题要求设计插秧机的主体机构，并对插秧机机头的运
动规律进行科学分析。
3. 设计数据：
已知插秧机曲柄转速ω1=10rad/s，往下插秧行程需达秧高
180mm 。
4. 用程序求杆长：
程序代码：
Dim o1 As Double ' 即是论文上的杆ab 的角度，此处用弧度表示
Dim A As Double
Dim B As Double
Dim C As Double
Dim o2 As Double ' 即是论文上的杆bc 的角度，此处用弧度表示
Private Sub Command1_Click()
o1 = 0
yfmax = 0
yfmin = 0
pi = 3.1415926 ' 定义圆周率的大小
A = 4 * Sin(o1)
B = 4 * Cos(o1) - 10
C = 9 - 5 * Cos(o1)
'''求出第一次的坐标
o2 = 2 * Atn((A - Sqr(A ^ 2 + B ^ 2 - C ^ 2)) / (B -
C)) '即bc 杆上的角度
yf = Sin(o1) + 2.6 * Sin(o2) + 0.15 * Sin(o2 - pi /
2) 'f点纵坐标
xf = Cos(o1) + 2.6 * Cos(o2) + 0.15 * Cos(o2 - pi /
2) 'f点横坐标
''第一次坐标值不在循环内，单独将第一次的值输入到txt
文件中 感觉把数值写入txt 文件中没有什
么作用就注释了
' Text3 = "x:" & xf & " " & "y:" & yf
' Open "C:\Users\Administrator\Desktop\ x和y 的坐
标.txt" For Append As #1
' Print #1, Text3
' Close #1
''' 开始进入循环结构
For i = 2 To 360 Step 1 ' 将最新的纵坐标赋值给yf1
yf1 = yf
xf1 = xf ' 将最新的横坐标赋值给xf1
o1 = o1 + 0.01745 ' 每一度化为弧度就是0.01745
A = 4 * Sin(o1)
B = 4 * Cos(o1) - 10
C = 9 - 5 * Cos(o1)
o2 = 2 * Atn((A - Sqr(A ^ 2 + B ^ 2 - C ^ 2)) / (B -
C))
yf = Sin(o1) + 2.6 * Sin(o2) + 0.15 * Sin(o2 - pi /
2) '最新的f 点纵坐标
xf = Cos(o1) + 2.6 * Cos(o2) + 0.15 * Cos(o2 - pi /
2) '最新的f 点横坐标
''画轨迹图
Picture1.Line (1000 * xf1, Picture1.Height - 1000 *
yf1)-(1000 * xf, Picture1.Height - 1000 * yf)
'' 将每个对应的xf 和yf 的坐标输入到txt 文件当中 如果想知道每点对应的坐标，吧注释去了就行了
'Text3 = "x:" & xf & " " & "y:" & yf
' Open "C:\Users\Administrator\Desktop\ x和y 的坐
标.txt" For Append As #1
' Print #1, Text3
' Close #1
''找出最大值和最小值
If yf > yfmax Then
yfmax = yf
End If
If yf
yfmin = yf
End If
Next i
''输出最大值和最小值
Text1.Text = yfmax
Text2.Text = yfmin
''求出各个构件的长度
l = 180 / (yfmax - yfmin)
lab = l * 1 'ab
lbe = 2.6 * l 'be杆的长度杆的长度
lbc = 2 * l
ldc = 1.5 * l
lad = 2.5 * l
Text3.Text = lab
Text4.Text = lbe
Text5.Text = ldc
Text6.Text = lad
End Sub
5. 心得体会：
本课程设计考察了我们所学的机械原理知识。在设计过程中，要综合多方面的要求和需要来进行合理的选择，这是一个并不简单的过程。由此可以了解到，自己的能力远不能解决复杂的实际问题。我们还应不断地学习和积累。
在对水稻插秧机完全不了解的情况下，通过网络，查找了大量的相关资料。尽管对现实生活中的水稻插秧有了一定的了解，但这些资料对其工作的描述仍不够详细和清晰。我们未能对水稻插秧机的工作流程和原理完全清楚，
比如秧箱的具体结构和工作方式。这是设计过程中一个比较大的遗憾。
设计尺寸的部分是其中最难的步骤，我们只能在做出一个自我感觉合理的尺寸假设的前提下，继续以后的设计。我们顺利得出了点E （秧爪）的与要求轨迹近似的静轨迹图。接下来的步骤水到渠成，花费较多时间是一些繁杂的运算。
通过本次设计，积累了经验，对已学知识的理解更加深刻。表面看似简单的问题，在解决的过程中，逐渐显现出其复杂。在以后的学习中，应避免犯眼高手低的错误。