计算机辅助凸轮机构设计报告.doc

计算机辅助凸轮机构设计报告 组员：xx  【摘要】通过VB语言，编写程序，实现凸轮运动仿真，并能计算出凸轮的相关参数，如最小基圆半径、轮廓曲线等，从而实现计算机编程和机械原理课程学习的完美结合。 【关键词】VB、编程、凸轮 【正文】 设计原理：  HYPERLINK /view/995803.htm \t _blank 凸轮机构一般是由凸轮，从动件和机架三个构件组成的  HYPERLINK /view/1876200.htm \t _blank 高副机构。凸轮通常作连续等速转动，从动件根据使用要求设计使它获得一定规律的运动．凸轮机构能实现复杂的运动要求，广泛用于各种自动化和半自动化机械装置中。 凸轮按从动件的形状分类； ① 顶尖式从动件； ② 滚子式从动件；③ 平底式从动件。 ④ 曲底式从动件。 凸轮机构的从动件运动方式有多种：1 多项式运动规律 用多项式表示的从动件位移曲线的一般形式为：s=c0+c1f+c2f2+...+cnfn ，式中c0、c1、c2、...、cn为n+1个系数，可根据对运动规律所提的n+1个边界条件来确定。对从动件的运动所提的要求越多，相应多项式的方次n就越高。从理论上讲，多项式的方次和所能满足的给定条件是不受限制的，但方次越高，凸轮加工误差对从动件运动规律的影响越显著，所以n≥10的多项式规律很少使用。 2 三角函数运动规律：即简谐运动规律：当质点在圆周上作匀速运动时，它在直径上的投影点的运动即为简谐运动。 3 组合运动规律：为了获得更好的运动特性，可以 把上述五种基本运动规律组合起来加以应用（或称运动曲线的拼接）。组合时，两条曲线在拼接处必须保持连续。 源程序： Option Explicit Public Fai, Fai1, Fai2, W, Rb, h As Double Public s, v, a, x, y As Double Public ds, dx, dy As Double 一阶导数 Public dds, ddx, ddy As Double 二阶导数 Public P As Double 曲率半径 Public α As Double 压力角 Const Pi As Double = 3.1415926 Public Aifa1 As Double 推程许用压力角 Public Aifa2 As Double 回程许用压力角 Public Pa, Rr As Double 实际轮廓线的许用曲率??径，滚子半径 Public xx, yy As Double Private Sub Command1_Click() 画轮廓线 Pic1.Cls Pic1.AutoRedraw = True Pic1.Scale (-100, 100)-(100, -100) Pic1.Line (100, 0)-(-100, 0), vbRed Pic1.Line (0, -100)-(0, 100), vbRed Fai = 0 Rr = Val(Text4) While Fai = 2 * Pi If Fai = Pi Then s = h * (Fai / Fai1 - Sin(2 * Pi * Fai / Fai1) / Pi / 2) x = (Rb + s) * Sin(Fai) y = (Rb + s) * Cos(Fai) Pic1.PSet (y, x) ds = h / Fai1 * (1 - Cos(2 * Pi * Fai / Fai1)) dx = (Rb + s) * Cos(Fai) + ds * Sin(Fai) dy = -(Rb + s) * Sin(Fai) + ds * Cos(Fai) xx = x + Rr * dy / Sqr(dx ^ 2 + dy ^ 2) yy = y - Rr * dx / Sqr(dx ^ 2 + dy ^ 2) Pic1.PSet (yy, xx), vbGreen Fai = Fai + 0.001 Else If Fai = 1.5 * Pi Then s = 50