机械原理课程设计锁梁自动成型机床切削机构

1、目录机械原理课程设计任务书 3课程设计说明 4第一部分机构设计一、锁梁自动成型机床切削机构的功能与设计要求 8二、工作原理图及其解释 9L r -1 |三、功能分解 9四、执行机构的比较与选择 10五、选定各个功能的执行机构 15I I六、绘制机构系统运动转换功能图 15七、机械系统运动方案简图 16八、根据工艺动作顺序和协调要求拟定运动循环图 17第二部分机构尺寸计算与设定一、送料机构的尺寸计算 19二、夹紧机构尺寸计算 19三、进给机构尺寸计算 20四、传动机构的选择 21五、总体安装尺寸 23% X 11第三部分计算机调试机构一、凸轮形状，运动调试 24二、连杆机构的运动分析 32附录参

2、考文献 43设计总结 44贵州大学机械工程学院机械原理课程设计任务书题号01锁梁自动成型机床切削机构设计一、机构说明和加工示意图锁梁自动成型机床加工锁梁（即挂锁上用于插入门扣的钩状零件）的工序为：将盘圆钢条校直、切槽、 车圆头、切断和搬弯成型。本机构为该机床的搬弯成型工艺部分，由送料机构、夹紧机构和切削进给机构组 合而成。切削加工原理如下图：送料夹持器1将工件7送到切削加工工位。弹簧夹头的锥套6移动，使夹紧爪5将工件7夹紧，送料夹持器1即返回。圆锥凸轮 2移动，使与切槽刀杆和切断刀杆相联的摆杆3摆动，开始进刀，由于刀盘 4的旋转运动，是工件被出圆槽、圆头和最后切断。圆锥凸轮2返回，摆动刀杆退刀

3、，弹簧夹头松开工件，待送料夹持器1第二次送进时，将已切削成型的工件推出工位。1、 机构设计的有关数据1 .生产率10件/分：2 .机电输入转速 n1=700转/分 3.工件尺寸：L=250 mm D1=10mm D2=7mm2、 课程设计项目内容：1. 目标分析：根据设计任务书中规定的设计任务，进行功能分析，作出工艺动作的分解，明确各个工艺动作的工作原理。2. 创新构思：对完成各工艺动作和工作性能的执行机构的运动方案进行全面构思。对各可行方案进行运动规律设计、机构型式设计和协调设计。3. 方案拟定：拟定总体方案，进行执行系统、传动系统、原动机的选择和基本参数设计。4. 方案评价：对各行方案进行

4、运动分析、力分析及有关计算、以进行功能、性能评价和技术、经济评价。5. 方案决策：在方案评价的基础上进行方案决策，在可行方案。确认其总体设计方案，绘制系统运动简图、编写总体方案设计计算机说明书。3、 课程设计要求：1. 按工艺动作设计多个组合机构的总体方案，根据评标的运动特性、传力特性、工作可靠性、结构紧凑性和制造经济性等进行分析比较，最后确定一、二个较好的方案，拟定出运动方案示意图。2. 分解工艺动作，根据生产率绘制送料机构、定位机构和进刀机构的运动循环图。（4号图）3. 根据生产率和电机转速，设计传动系统。4. 用图解法对送料机构、定位机构和进刀机构进行运动设计，绘制组合机构的运动简图。（

5、4号图）5. 用计算机辅助设计对送料机构进行运动分析：（1） 编制计算流程框图。（2） 根据计算流程框图编制主程序，上机计算及打印结构6. 用计算机辅助设计对凸轮机构进行设计，绘出凸轮轮廓和从动件位移曲线7. 编写课程设计说明书。内容包括：设计题目、工艺要求、设计内容、方案选择与比较、各机构类型和运动参数的选择、机构运动设计步骤、设计结构、设计结构、传动系统设计、机构运动分析 计算流程框图、主程序及计算结构、凸轮机构设计、参考资料目录和设计小结等。（20页以上）四、机械原理课程设计题目分配：1 .凡学号末位第二位数（即十位数）为1、3的同学作锁梁自动成型机切削机构（即A1A10）。2.学号末位

6、数（即个位数）为题号代号。A3的数据。例：学号03*13的同学作锁梁自动成型机切削机构。题号代号为 附表：锁梁自动成型机床切削机构设计题目数据题目代号A1A2A3A4A5A6A7A8A9A10生产率10121518202425283032电机转速7007508008509009501000110012001250工件长度250240225200190180160150120100工件D1101099886655工件D2776655443.53.5齿轮模数665544332.52.5课程设计说明一、机械原理课程设计的目的和要求机械原理课程设计是工科院校机械类学生在大学期间利用已学过的知识和计算机

7、工具第一次比较全面的、具有实际内容和意义的课程设计，也是机械原理课程的一个重要的实践教学环节。机械原理课程设计是将知识转化为能力的桥梁，其主要目的是进一步巩固和加深学生所学的理论知识，并将其系统化；培养学生综合运用所学知识独立解决实际问题的能力；使学生初步掌握机械运动方案设计，并在机构分析与综合方面受到一次比较全面的训练。随着生产技术的不断发展和人民生活水平的日益提高，机械产品种类日益增加。例如：各种金属切削机床、 仪器仪表、重型机械、轻工机械、纺织机械、石油化工机械、交通运输机械、海洋作业机械、钢铁成套设备以及 办公设备、家用电器、儿童玩具等。各种机械设备一般均需实现生产和操作过程的自动化，

8、或者实现某一工艺动 作过程。因此，机械设备设计首先需要进行机械运动方案的设计和构思，各种传动机构和执行机构的选用和创新设计。这些新机械设备的创新设计要求设计者除了掌握各种典型机构的工作原理、结构特点、设计方法和应用场合等知识外，还要考虑如何选择巧妙的工艺动作过程来达到预定的机械功能求，如何选用或创新机构型式并组合成机械运动方案完成上述选定的工艺过程。机械运动方案及机械运动简图设计是机械产品设计的第一步，也是决定机械产品质量水平高低、性能优劣和经济效益好坏的关键性的一步。机械原理课程设计要求针对某种简单机器（工艺动作过程比较简单）进行机械运动简图设计，其中包括机器功能分析、工艺动作确定、执行机构

9、选择、机械运动方案评价和机构尺度综合等。通 过机械原理课程设计， 更为重要的是培养学生开发和创新机械的能力。创新能力的培养在机械原理课程设计中占有十分重要的位置。二、机械原理课程设计的内容和步骤1、机械设计的一般过程不论哪一类设计，为了提高机械设计的质量，必须有一个科学设计的程序，机械设计的一般进程可分为四个阶段：产品规划阶段、方案设计阶段、详细设计阶段和改进设计阶段。通常广泛实施和应用的程序可归纳成附表 1所示的框图程序。1）产品规划阶段其中心任务是进行需求分析、市场预测、可行性分析、确定设计参数及制约条件，最后给 出详细的设计任务书（或要求表），作为设计、评价和决策的依据。2）方案设计阶段

10、需求是以产品的功能来体现的，功能与产品设计关系是因果关系，但又不是一一对应的。 体现同一功能的产品可以有多种多样的工作原理，因此，这一阶段是在功能分析的基础上，通过创新构思、搜索 探求、优化筛选取得较理想的工作原理方案。对于机械产品来说，在功能分析和工作原理确定的基础上进行工艺动作构思和工艺动作分解，初步拟定各执行构件动作相互协调配合的运动循环图，进行机械运动方案的设计 （即机械系统的型综合和数综合）等。这就是机械产品方案设计的主要内容。附表1机械设计的一般程序框图3）详细设计阶段 主要是将机械的构形构 思和机械运动简图具体 转化为机器及其零部件 的合理结构。也就是要完 成机械产品的总体设计、

11、 部件和零件设计，完成全 部生产图纸并编制设计 说明书等有关技术文件。4）改进设计阶段 根据样机性能测试数据， 用户使用以及在鉴定中 所暴露的各种问题进一 步做出相应的技术完善 工作，以确保产品的设计 质量。这一阶段是设计过 程不可分割的一部分， 通 过这一阶段的工作可以 进一步提高产品的效能、 可靠性和经济性，使产品 更具有生命力。2、机械运动简图设 计机械运动简图设计 主要包括下列内容：1）功能原理方案的设计和构思根据机械所要实现 的功能（功用）采用有关 的工作原理，由工作原理 出发设计和构思出工艺 动作的过程就是功能原 理方案设计。在功能设计 中，应将机械将要达到的总功能，分解成多个功能

12、元的运动和动作，确定运动方案。在确定功能元中还应考虑各执行机构间的协调配合关画出机械运动循环图。值得指出的是，一个灵巧的功能原理方案是创新机械的出发点和归宿。如下图所示。2）机械运动方案设计 机械运动方案通常用机械 据 动 律 行 们 个附图1.1机器的功能、工艺动作及执行机构框图运动示意图来表示，它是根 功能原理方案中提出的工艺 作过程及各个动作的运动规 要求，选择相应的若干个执 机构，并按一定的顺序把它 组合成机械运动示意图，这 机械系统应能合理地、可靠地完成上述工艺动作。 机械运动方案就是机械运动简图设计中的型综合，机械运动方案中所画出的表示机构结构型式、机构相互联接情况的示意图是进行机

13、械运动简图设计尺度综合的依据。3）机械运动简图的尺度综合将机械运动方案中各个执行机构根据工艺动作运动规律和机械运动循环图的要求进行尺度综合。机械运动简图中各机构的运动尺寸（如有高副机构还应包括高副的形状）都要通过分析、计算加以确定。当然在设计机械运 动简图进行尺度综合时，应该同时考虑其运动条件和动力条件，否则不利于设计性能良好的新机械。偏置曲柄机构：3个可动构件4个低副1个自由度。六杆机构：5个可动构件7个低副1个自由度。六杆机构 凸轮连杆机 构：6个可动构件6个低副3个高副2个局部自由 度1个自由度。曲柄6,滑块9, 导杆13,连杆14, 滑块15构成送料 机构；凸轮7,滚 子10,推杆20

14、, 滚子21,摆杆22, 夹紧套23,弹簧 24构成夹紧机构； 凸轮8,滚子11, 推杆12,滚子16, 摆杆17,锥套18, 弹簧19构成进给 机构。空间摆放位 置在图中没有表 不出来。夹紧凸轮7和进 给凸轮8,涡轮5, 曲柄6在同一轴 上，空间摆放位置第一部分机构设计一、锁梁自动成型机床切削机构的功能与设计要求图 1-1.1图1-1.1所示为挂锁的一个零件，称为“锁梁” 。锁梁自动成型机床切削机构 的功能是将材料切削加工成扳弯前“锁梁”。设计要求和参数为：“锁梁”的形状如图1-1.1所示；连续自动生产； 生产能力为10件/min ;加工质量要达到规定的技术要求； 机械系统运动方案应力求简单

15、，可靠； 根据设计任务书选择第八题目数据；二、工作原理图及其解释9图 1-2.1切削加工原理如上图：送料夹持器1将工件7送到切削加工工位。弹簧夹头的锥套6移动，使夹紧爪 5将工件7夹紧，送料夹持器 1即返回。圆锥凸轮 2移动，使与切槽刀杆和切断刀杆相联的摆杆3摆动，开始进刀，由于刀盘 4的旋转运动,使工件被切出圆槽，圆头和最后切断。圆锥凸轮 2返回，摆动刀杆退刀，弹簧夹头松开工件，待送料夹持器1第二次进刀时，将已切削成型的工件推出工位三、功能分解为了实现将工件切削加工成图1-1.1的形状，可将总功能分解为如下分功能：送料功能；材料夹紧功能；材料切削功能。其功能逻辑图如1-3.1所示图 1-3.

16、1四、执行机构的比较与选择切削材料时的送料功能工件送料功能需要采用往复移动机构来实现，下面选用几个备选方案来实现。1)偏置曲柄滑块机构图 1-4.1功能：将旋转运动转换为往复移动结构和工作原理： 如图1-4.1所示的曲柄滑块机构中，滑块的导路没有通过 了曲柄的回转中心，称为偏置曲柄滑块机构。当曲柄转动时，通过连杆使滑块实 现往复移动，即可实现送料功能。2) 六杆机构图 1-4.2功能：用于将旋转运动转换成有急进慢回特性的往复移动。结构和工作原理：如图1-4.2所示的六杆机构是由1-2-3-6组成的曲柄导杆机 构和连杆4,滑块5串联成的。当曲柄1等速转动时，从动件 3变速往复摆动，该 机构可在曲

17、柄1长度一定的情况下，使从动件 5获得较大的行程。从动件5的往复移动，可实现其送料功能。根据以上两种方案知，偏置曲柄滑块机构由于偏心距的限制，使得压力角过大，且送料行程较小，不能很好的满足送料的要求。而六杆机构通过导杆3和连杆4可以调整送料压力角和送料行程，从而狄得较合适的压力角和送料行程，故 选择如图1-4.2所示的六杆机构作为最终送料机构。切削材料时的夹紧功能通过凸轮实现夹紧管左右移动使弹簧夹头夹紧工件。用弹簧夹头进行夹紧， 弹簧夹头的材料是蟀火过的钢套，起夹爪有弹性，夹爪外部成锥体，在弹簧夹头 的外面有一具有内锥的夹紧管，当夹紧管左右移动时，利用夹紧管与弹簧夹头的 锥面实现夹紧与松开，夹

18、紧管的左右移动由凸轮机构实现。卜面选用儿个备选方案来实现。1) 六杆机构图 1-4.3功能：本机构是把旋转运动转化为有急回运动的往复运动的机构。结构和工作原理：如图1-4.3所示，当曲柄AB等速转动时，从动杆BCDE电复 摆动，在架上前面的弹簧夹头部分，实现夹紧。2)凸轮机构+连杆机构功能：通过凸轮的转动，通过连杆机构使得夹持器实现间歇往复运动。结构和工作原理：如图1-4.4所示，当凸轮7转动时，通过直动推杆 5推动摆 杆2带动夹持器1做间歇往复运动。从而实现夹紧功能。图 1-4.4根据以上2种可执行方案，经过对他们进行比较可得，虽然以上几种方案都达 到了运动的要求，不过，考虑到其结构的工艺性

19、及制造方便性，选用凸轮+连杆机构较为合适，并较为可靠，结构也较为简单，有平稳的运动特性。切削时的进给功能通过刀具的绕工件旋转和刀具的横向切削进给运动实现飞刀切削。由于采用 飞刀切槽，刀具不仅要绕工件旋转，同时还要作横向切削进给运动。为了使结构 简单，当横向进给运动行程不大时，可以用弧线运动代替，弧线进给运动是间歇 往复回转运动如图，回转刀架上安装有能绕回转刀架作相对转动的切槽刀杆和切 断刀杆，刀杆一端与锥套组成高副联接。锥套与回转刀架为键联接，可相对回转 刀架作轴向移动。加工时，锥套与回转力架一起旋转，同时由凸轮机构试其作相对刀架的轴向移动，此时锥套与刀杆组成的高副使刀杆摆动，从而实现切槽和切

20、 断功能。下面选用几个备选方案来实现。1）凸轮+连杆机构（如图1-4.5 ）图 1-4.5功能：将旋转运动转换为刀架的间歇往复移动，从而实现刀架的进给功能。结构和工作原理：如图1-4.5所示，凸轮的旋转运动，通过推杆带动滑块 的水平移动，滑块再通过连杆使得竖直杆左右摆动，从而使得刀架间歇往复移动， 实现刀架的进给功能。此机构中，滑块处的摩擦较大，易造成机构磨损，且竖直摆杆与凸轮没有任何的 封闭，使得刀架的往复移动不易实现。2）凸轮+连杆机构（如图1-4.6 ）图 1-4.6功能：将旋转运动转换为刀架的间歇往复移动，从而实现刀架的进给功 能。结构和工作原理：如图1-4.6所示，凸轮7的旋转运动，

21、带动推杆 5的水平 移动，通过滚子 4推动竖直杆2摆动，从而使得刀架间歇往复移动，实现刀架的 进给功能。其中，推杆5上的两个滚子有效地减小了系统摩擦，改善了机构的传递性能，使得机构的传递效率大大的提高，弹簧6的使用使得竖直杆2与凸轮形成力封闭，保证了竖直杆2的往复间歇摆动。使本机构具有良好的动力性能。综上所述，经比较可知，图 1-4.6所示的（凸轮+连杆机构）传递性能好，磨 损较小，且竖直杆与凸轮通过弹簧形成力封闭，可保证刀架的间歇往复运动。五、选定各个功能的执行机构送料功能：选用六杆机卞勾,如图1-4.2所示。夹紧功能：选用凸轮机构+连杆机构，如图1-4.4所示。机构简单，稳定，具 有间歇特

22、性。进给功能：选用凸轮+连杆机构，如图1-4.6。机构稳定，运动具有确定性。六、绘制机构系统运动转换功能图1）根据执行构件的运动形式，绘制机械系统运动转换功能图如图1-4.7所示。图 1-4.72）形态学矩阵法创建机构运动方案根据机械系统运动转换功能图可构成形态学矩阵，由下表所示的形态学矩阵 可求出锁梁自动成型切削系统的运动方案数为：N=3X 3X 3X3 X 3=243可由给定的条件，各机构的相容性，各机构的空间布置，类似产品的借鉴和 设计者的经验等，从中选出若干个较为实际可行的方案，然后从选出的若干个方 案中用评价方法选出最优方案。七、机械系统运动方案简图如图1-4.8所示为机械系统运动方

23、案运动简图。电机 1通过皮带轮传到 2, 2 通过轴3传到蜗杆4,蜗杆4带动涡轮5转动，从而带动曲柄 6,夹紧凸轮7进给 凸轮8以相同角速度转动，曲柄 6通过滑块9,导杆13,连杆14,将曲柄的匀速 转动转化为送料器 15的往复运动；夹紧凸轮 7通过滚子10,推杆20,滚子21, 摆杆22将凸轮的匀速转动转化为夹紧套23的间歇往复运动；进给凸轮8通过滚子11,推杆12,滚子16,摆杆17将凸轮的匀速转动转化为进给装置的间歇往复 运动。其中，弹簧 19和弹簧24使摆杆17和摆杆22与对应的凸轮形成力封闭， 使摆杆17和摆杆22能够进行往复间歇摆动。图 1-4.8八、根据工艺动作顺序和协调要求拟定

24、运动循环图执行阶段运动阶段运动时间（s）分配转角（。）送料阶段送料回程2.00s4.00s120°240°夹紧阶段初始 上升 夹紧 回程1.53s1.30s2.17s1.00s95°75°130°60°切削阶段初始 上升 远休 回程3.67s1.08s0.25s1.00s220°65°15°60°图 1-4.9如图1-4.9所示，送料：进程0° -120 °回程120° -360°。夹紧:近休355° -90 °推程90° -

25、165 °远休165°-295 °回程295°-355°进给：近休320°-180 °推程180°-245°远休245°-260 °回程260°-320°转速：根据生产 率为 10 件 /min ,而机构设 计为每转一圈， 完成一件，则转 速确定为 10r/min。第二部分机构尺寸计算与设定一、送料机构的尺寸计算图 2-1.1如图2-1.1所示，根据工件长度L=250mm可确定滑块行程为 250mm为满足送料时 有快进慢退特性，采用以上六杆机构，取曲柄1的极位夹角为

26、60。，则导杆3长250mm曲柄长为50mm为使送料最大压力角为合适值30° ,取DE垂直距离为45mm则连杆4长为90mm计算可得出导杆3的摆动角度为60° ,曲柄导杆机构的压力角恒为0° ,传动角恒为90° ;送料机构的最大压力角为30° ,最小传动角为 60°。二、夹紧机构尺寸计算图 2-1.2如图2-1.2所示，夹紧机构采用的是凸轮连杆机构。这里的推杆5与凸轮中心相对，偏心距为0,支点3位于加紧套与推杆 5竖直距离的中点处，以保证推杆5的移动距离与夹紧套的移动距离相等。而推杆5和摆杆2的长度根据实际装配要求确定，只要满足其推程

27、确定就可以了，所以这里只要确定凸轮，设计凸轮尺寸见第三部分计算机调试机 构中的凸轮形状运动调试。三、进给机构尺寸计算图 2-1.3如图2-1.3所示，进给机构采用的是凸轮连杆机构。这里的推杆5与凸轮中心相对，偏心距为0,支点3位于锥套与推杆 5竖直距离的2/3处，以保证锥套进给距离是推杆5移动距离的两倍。而推杆5和摆杆2的长度根据实际装配要求确定，只要满足其推程确定就可以了，所以这里只要确定凸轮，设计凸轮尺寸见第三部分计算机调试机构中的凸 轮形状运动调试。四、传动机构的选择机械系统中的传动机构是把原动机输出的机械能传递给执行机构并实现能量的分 配、转速的改变及运动形式的改变的中间装置。传动机构

28、最常见的有齿轮传动、带传动、蜗杆传动等。他们的特点如表1:特点寿命应用齿 轮 传 动承载能力和速度范围大；传动比 恒定，采用卫星传动可救得很大 传动比，外廓尺寸小，工作可靠， 效率局。制造和安装精度要求局， 精度低时，运转有噪音；无过载 保护作用取决于齿轮 材料的接触 和弯曲疲劳 强度以及抗 胶合与抗磨 损能力金属切削机床、汽 车、起重运输机 械、冶金矿山机械 以及仪器等蜗 杆 传 动结构紧凑，单级传动能得到很大 的传动比；传动平稳，无噪音； 可制成自锁机构；传动比大、滑 动速度低时效率低；中、高速传 动需用印贝的减磨材料；制造相 度要求高，刀具费用贵。制造精确，润 滑良好，寿命 较长；低速传

29、 动，磨损显着金属切削机床（特 别是分度机构）、 起重机、冶金矿山 机械、焊接转胎等轴间距范围大，工作平稳，噪音 小，能缓和冲击，吸收振动；摩 擦型带传动有过载保护作用；结带轮直径大， 带的寿命长。 普通 V带金属切削机床、锻压机床、输送机、 通风机、农业机械带 传 动构简单，成本低，安装要求小局； 外廓尺寸较大；摩擦型带有滑动， 不能附十分度链；由于带的摩擦 起电，不宜用于易燃易爆的地方； 轴和轴承上的作用力很大，带的 寿命较短3500-5000h和纺织机械轴间距范围大；传动比恒定；链与制造质量农业机械、石油机条组成件间形成油膜能吸振，对与大械、矿山机械、运链 传 动恶劣环境有一定的适应能力

30、，工 作可靠；作用在轴上的荷载小； 运转的瞬时速度不均匀，局速时 不如带传动平稳；链条工作时， 特别是因磨损产生伸长以后，容 易引起共振，因而需增设张紧和 减振装置5000-15000h输机械和起重机 械等由上述几种主要的传动装置相互比较可知，由于传动比较大，故选择涡轮蜗杆传动，第一级传动选择带传动，可对电动机起到过载保护的作用。其传动路线为：转速为700r/min的电动机经皮带传动传至轴2,轴2带动蜗杆转动，然 后通过涡轮将运动传递到工作轴 3,即带动轴3上的夹紧凸轮，进给凸轮，送 料曲柄同步转动。进而实现送料，夹紧，进给的功能。由于生产率为10件/分，而电动机的转速为 700r/min ,

31、则i=n 4/n 电=10/700=1/70一级减速（皮带减速）i 1=130/260二级减速（涡轮蜗杆）i 2=1/35i=i，i 2=130/260 X 1/35=1/70如图2-1.4所示，蜗杆为单头，左旋。涡轮也为左旋，35齿,m=6电动机皮带轮直径为130mm与蜗杆同轴的皮带轮直径为260mm图 2-1.4五、总体安装尺寸其中，由送料机构知 H=154 mm则摆杆1的支点与加紧套的竖直距离为 1/2H=77 mm, 摆杆3的支点与锥套轴线竖直距离为 1/3H=102.67mm,夹紧推杆2长度为350 mm,进给 推杆4的长度为65 ms第三部分计算机调试机构凸轮形状，运动调试1) 夹

32、紧凸轮计算：已知r基圆=60mm r滚子=10mm推程h=10mm设置凸轮类型凸轮基本参数运动分段教学演示动画演示动画方式M发送设计结果2) 进给凸轮的确定：R基圆=80mm滚子=10mm隹程h=10mm设置凸轮类型凸轮基本参数运动分段 教学演示动画演示设计结果二、连杆机构的运动分析图 3-1.1图 3-1.2将图3-1.1的六杆机构分解为原动件和两个H级杆组。已知 L1=0.050m,L3=0.25m ,L4=90mm L6=108mm曲柄1顺时针方向等速旋转，=1.047rad/s 编写程序：PrivateSubCommand1_Click()Dimb(6),c(6),d(3),tAsSt

33、ringpai=Atn(1#)*4/180Forfi=0To360Step10Fi1=fi*paiCall 单杆运动分析子程序(0,0,0,0,0,0,0.05,0,Fi1,1.047,0,_ xB,yB,vBx,vBy,aBx,aBy)CallRPR 运动分析子程序(1,0,-0.108,0,0,0,0,xB,yB,vBx,vBy,aBx,aBy,_0,0.25,xD,yD,vDx,vDy,aDx,aDy,fi3,omega3,epsilon3,sr,vsr,asr)CallRRP 运动分析子程序(1,xD,yD,vDx,vDy,aDx,aDy,0,0.154,vPx,vPy,aPx,aPy

34、,_ 0.09,0,0,0,xE,yE,vEx,vEy,aEx,aeyfi4,omega4,epsilon4,sr,vsr,asr)Call 单杆运动分析子程序(0,-0.108,0,0,0,0,0.125,0,fi3,omega3,epsilon3,_ xS3,yS3,vS3x,vS3y,aS3x,aS3y)Call 单杆运动分析子程序 (xD,yD,vDx,vDy,aDx,aDy,0.045,0,fi4,omega4,epsilon4,_ xS4,yS4,vS4x,vS4y,aS4x,aS4y)t=t+"Fi1="+Str(fi)+vbCrLft=t+"xE(

35、m尸"+Str(xE)+vbCrLft=t+"vE(m/S尸"+Str(vEx)+vbCrLft=t+"aE(m/S2)="+Str(aEx)+vbCrLft=t+"omega3(rad/S尸'+Str(omega3)+vbCrLft=t+"omega4(rad/S尸"+Str(omega4)+vbCrLft=t+"epsilon3(rad/S尸"+Str(epsilon3)+vbCrLft=t+"epsilon4(rad/S尸"+Str(epsilon4)+vbCr

36、Lf t=t+vbCrLft=t+"Mb(N.m尸"+Str(d(3)+vbCrLft=t+"F61x(N尸'+Str(d(1)+vbCrLft=t+"F61y(N尸"+Str(d(2)+vbCrLft=t+"F12x(N尸'+Str(c(1)+vbCrLft=t+"F12y(N尸"+Str(c(2)+vbCrLft=t+"F32x(N尸'+Str(c(3)+vbCrLft=t+"F32y(N尸"+Str(c(4)+vbCrLft=t+"F43x(N尸

37、'+Str(b(1)+vbCrLf t=t+"F43y(N尸"+Str(b(2)+vbCrLf t=t+"F54x(N尸'+Str(b(3)+vbCrLf t=t+"F54y(N尸"+Str(b(4)+vbCrLft=t+"F65x(N尸'+Str(b(5)+vbCrLft=t+"F65y(N尸"+Str(b(6)+vbCrLft=t+"F63x(N尸'+Str(c(5)+vbCrLft=t+"F63y(N尸"+Str(c(6)+vbCrLf t=t+v

38、bCrLfNextfiText1.Text=t EndSubSub 单杆运动分析子程序(xA,yA,vAx,vAy,aAx,aAy,S,theta,fi,omega,epsilon,_ xm,ym,vmx,vmy,amx,amy) xm=xA+S*Cos(fi+theta) ym=yA+S*Sin(fi+theta) vmx=vAx-S*omega*Sin(fi+theta) vmy=vAy+S*omega*Cos(fi+theta) amx=aAx-S*epsilon*Sin(fi+theta)-S*omegaA2*Cos(fi+theta) amy=aAy+S*epsilon*Cos(fi

39、+theta)-S*omegaA2*Sin(fi+theta) EndSubSubRRRl动分析子程序(m,xB,yB,vBx,vBy,aBx,aBy,xD,yD,vDx,vDy,aDx,aDy,_ L2,L3,xC,yC,vCx,vCy,aCx,aCy,fi2,fi3,_ omega2,omega3,epsilon2,epsilon3)Dimpi,d,ca,sa,yDB,xDB,gam,yCD,xCD,e,F,Q,EA,FA,delta pi=Atn(1#)*4d=(xD-xB)A2+(yD-yB)A2)A0.5Ifd>L2+L3Ord<Abs(L2-L3)Then MsgBox

40、”此位置不能装配" GoTonlElse EndIf ca=(dA2+L2A2-L3A2)/2/L2/d sa=(1-caA2)A0.5 yDB=yD-yBxDB=xD-xBCallatn1(xB,yB,xD,yD,delta)Ifca>0Thengam=Atn(sa/ca)Else:gam=Atn(sa/ca)+pi EndIfIfm=1Thenfi2=delta+gamElse:fi2=delta-gam EndIfxC=xB+L2*Cos(fi2)yC=yB+L2*Sin(fi2)yCD=yC-yD xCD=xC-xDIfxCD>0Thenfi3=Atn(yCD/x

41、CD) 日seIfyCD>=0Thenfi3=Atn(yCD/xCD)+piElse:fi3=Atn(yCD/xCD)-piEndIfe=(vDx-vBx)*xCD+(vDy-vBy)*yCDF=(vDx-vBx)*(xC-xB)+(vDy-vBy)*(yC-yB)Q=yCD*(xC-xB)-(yC-yB)*xCDomega2=e/Qomega3=F/QvCx=vBx-omega2*(yC-yB)vCy=vBy+omega2*(xC-xB)EA=aDx-aBx+omega2A2*(xC-xB)-omega3A2*xCDFA=aDy-aBy+omega2A2*(yC-yB)-omega3A

42、2*yCDepsilon2=(EA*xCD+FA*yCD)/Qepsilon3=(EA*(xC-xB)+FA*(yC-yB)/QaCx=aBx-omega2A2*(xC-xB)-epsilon2*(yC-yB)aCy=aBy-omega2A2*(yC-yB)+epsilon2*(xC-xB)n1:EndSubSubatn1(x1,y1,x2,y2,fi)Dimpi,y21,x21pi=Atn(1#)*4y21=y2-y1x21=x2-x1Ifx21=0Then'判断BD线段与x轴的夹角Ify21>0Thenfi=pi/2ElseIfy21=0ThenMsgBox"B、D

43、两点重合，不能确定 ”Else:fi=3*pi/2EndIfElseIfx21<0Thenfi=Atn(y21/x21)+piElseIfy21>=0Thenfi=Atn(y21/x21)Else:fi=Atn(y21/x21)+2*piEndIfEndIfEndSubSubRRRil动分析子程序(m,xB,yB,vBx,vBy,aBx,aBy,xP,yP,vPx,vPy,aPx,aPy,_ L2,fi3,omega3,epsilon3,xC,yC,vCx,vCy,_ aCx,aCy,fi2,omega2,epsilon2,sr,vsr,asr)Dimpi,d2,e,F,yCB,x

44、CB,E1,F1,Q,E2,F2 pi=Atn(1#)*4 d2=(xB-xP)A2+(yB-yP)A2)e=2*(xP-xB)*Cos(fi3)+2*(yP-yB)*Sin(fi3) F=d2-L2A2IfeA2<4*FThenMsgBox"此位直小能装配" GoTonlElse EndIf Ifm=1Then sr=Abs(-e+(eA2-4*F)A0.5)/2) Else:sr=Abs(-e-(eA2-4*F)A0.5)/2) EndIfxC=xP+sr*Cos(fi3) yC=yP+sr*Sin(fi3) yCB=yC-yB xCB=xC-xBCallatn1

45、(xB,yB,xC,yC,fi2) E1=(vPx-vBx)-sr*omega3*Sin(fi3) F1=(vPy-vBy)+sr*omega3*Cos(fi3) Q=yCB*Sin(fi3)+xCB*Cosfi3) omega2=(F1*Cos(fi3)-E1*Sin(fi3)/Q vsr=-(Fi*yCB+Ei*xCB)/Q vCx=vBx-omega2*yCB vCy=vBy+omega2*xCBE2=aPx-aBx+omega2A2*xCB-2*omega3*vsr*Sin(fi3)_ -epsilon3*(yC-yP)-omega3A2*(xC-xP)F2=aPy-aBy+omega

46、2A2*yCB+2*omega3*vsr*Cos(fi3)_ +epsilon3*(xC-xP)-omega3A2*(yC-yP) epsilon2=(F2*Cos(fi3)-E2*Sin(fi3)/Q asr=-(F2*yCB+E2*xCB)/QaCx=aBx-omega2A2*xCB-epsilon2*yCB aCy=aBy-omega2A2*yCB+epsilon2*xCB n1:EndSubSubRPRl动分析子程序(m,xB,yB,vBx,vBy,aBx,aBy,xC,yC,vCx,vCy,aCx,aCy,_ e,L3,xD,yD,vDx,vDy,aDx,aDy,fi3,omega3

47、,epsilon3,_ sr,vsr,asr)Dimpi,yCB,xCB,gam,Q,EA,FA pi=Atn(1#)*4If(xC-xB)A2+(yC-yB)A2<eA2Then MsgBox"此位置不能装配" GoTonlElse EndIf sr=(xC-xB)A2+(yC-yB)A2-eA2)A0.5 yCB=yC-yBxCB=xC-xBCallatn1(xB,yB,xC,yC,beta)gam=Atn(e/sr)Ifm=1Thenfi3=beta+gamElse:fi3=beta-gamEndIfxD=xB+e*Sin(fi3)+L3*Cos(fi3)yD=

48、yB-e*Cos(fi3)+L3*Sin(fi3)Q=(xC-xB)*Cosfi3)+(yC-yB)*Sin(fi3)omega3=(vCy-vBy)*Cos(fi3)-(vCx-vBx)*Sin(fi3)/Qvsr=(vCy-vBy)*(yC-yB)+(vCx-vBx)*(xC-xB)/QvDx=vBx-omega3*(yD-yB)vDy=vBy+omega3*(xD-xB)EA=aCx-aBx+omega3A2*(xC-xB)+2*omega3*vsr*Sin(fi3)FA=aCy-aBy+omega3A2*(yC-yB)-2*omega3*vsr*Cos(fi3)epsilon3=(FA

49、*Cos(fi3)-EA*Sin(fi3)/Qasr=(EA*(xC-xB)+FA*(yC-yB)/QaDx=aBx-omega3A2*(xD-xB)-epsilon3*(yD-yB)aDy=aBy-omega3A2*(yD-yB)+epsilon3*(xD-xB)n1:EndSubPrivateSubCommand2_Click()Dimb(6),c(6),d(3),xE1(360),vEx1(360),aEx1(360)pai=Atn(1#)*4/180Forfi=0To360Step10Fi1=fi*paiCall 单杆运动分析子程序(0,0,0,0,0,0,0.05,0,Fi1,1.0

50、47,0,_ xB,yB,vBx,vBy,aBx,aBy)CallRPR 运动分析子程序(1,0,-0.108,0,0,0,0,xB,yB,vBx,vBy,aBx,aBy,_0,0.25,xD,yD,vDx,vDy,aDx,aDy,fi3,omega3,epsilon3,sr,vsr,asr)CallRRP 运动分析子程序(1,xD,yD,vDx,vDy,aDx,aDy,0,0.154,vPx,vPy,aPx,aPy,_0.09,0,0,0,xE,yE,vEx,vEy,aEx,aeyfi4,omega4,epsilon4,sr,vsr,asr)Call 单杆运动分析子程序(0,-0.108,0,0,0,0,0.125,0,fi3,omega3,epsilon3,_xS3,yS3,vS3x,vS3y,aS3x,aS3y)Call 单杆运动分析子程序 (xD,yD,vDx,vDy,aDx,aDy,0.045,0,fi4,omega4,epsilon4,_ xS4,yS4,vS4x,vS4y,aS4