- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
数控课程设计总VB说明书
第 PAGE 8 页 共 NUMPAGES 8 页
数控技术课程设计
前加减速控制(VB)
指导教师:
应用专业:机械设计制造及其自动化
班级
学号
姓名
组号
班级序号
目 录
一 设计任务书
1. 课程的地位、任务和作用 …………………………………3
2.设计内容 …………………………………………………3
3. 设计目的 …………………………………………………3
二 VB软件设计说明书
2-1 分析问题 …………………………………………………4
2-2 提出算法 …………………………………………………4
2-3 列出流程图 ………………………………………………5
2-4 前加减速软件控制界面 …………………………………6
2-5编写程序 …………………………………………………6
三 参考文献………………………………………………… 9
一、 设计任务书
1.课程的地位、任务和作用
本课程设计是在《数控技术》理论课程学习完后进行。《数控技术》是机械设计制造及其自动化专业必修的主干专业课之一,对实际应用能力要求很高;通过该课程设计使学生进一步掌握和消化数控机床基本内容,了解数控机床编程的特点和步骤,深化工艺处理技术和编程方法,通过调试,掌握系统软件的操作方法,了解数控系统组成,深化系统控制原理和方法,通过设计和调试,掌握各种数控功能的实现方法,为今后从事数控
领域工作作打下坚实的基础。
2.设计内容
2.1软件设计:问题分析,提出算法,列出流程图,编写程序,最后进行程序验证。
2.2 设计成员:
3.设计目的
1)针对设计任务选择合适的实现方案;
2)培养学生查阅技术手册和有关技术资料的能力;
3)培养学生程序设计能力;
4)培养学生程序调试能力;
5)培养学生编制技术文档的能力;
6)培养学生严肃认真、一丝不苟和实事求是的科学态度。
二 、VB软件设计说明书
2-1分析问题:
在CNC 装置中,加减数控制多数都采用软件来实现,这给系统带来了较大的灵活性,这种用软件实现的加减数控制放在插补前进行称为前加减速控制。
2-2提出算法:
前加减速控制,仅对编程速度F指令进行控制,其优点是不会影响实际插补输出的位置精度,其缺点是需要预测减速点,而这个减速点要根据实际刀具的位置与程序段终点之间的距离来确定,预测工作需要完成的计算量较大。
稳定速度和瞬时速度
稳定速度 Fs=F*T*K/60/1000 当Fs1000时 Fs=1000
瞬时速度fi=Fs,当系统处于加速(或减速)状态时,fiFs(或fiFs)
线性加减速处理
加减速度 a=1.67x10^-5*F/t (mm/ms^2)
加速处理 Fs=Fs+aT
减速处理 s=Fs^2/2a+s Fi+1=Fi-aT
终点判别处理
1)直线插补Xi=xi-1+x’ Yi=yi-1+y’
Si=NE=sqr((Xe-Xi)^2+(Ye-Yi)^2)
2)圆弧插补 Si=sqr((Xe-Xi)^2+(Ye-Yi)^2)
YNYNNY
Y
N
Y
N
N
Y
N
Y
入口
Fs=F*T*K/60/1000
Fsf
Fs’fs
加速处理
Fi+1=fi+a*T
Si≤s
减速处理
原始fs=f
匀速处理
Fi+1=fi-a*T
Fi+1=fs或Fi+1=0
出口
Fs=fs
Fi+1=fss
前加减速控制原理框图
N
N
Y
N
N
Y
入口
Si= (xe-xi)2-(ye-yi)2
需要减速
计算减速区域
S=fs^2/2/a+ s
Si≤s?
置减速状态标志
接近终点?
置程序段转接标志
到终点?
置到终点标志
出口
终点判别原理框图
2-4前加减速软件控制界面
2-5编写程序
前加减速控制程序代码
Dim x1 As Double, x2 As Double, y1 As Double, y2 As Double, a As Double, b As Double
Dim fs As Double, f As Integer, t As Integer, fi As Integer, F1 As Integer, m
Dim ti As Integer, t2 As Integer, ts As Integer, t1 As Integer, tt As Double
Private Sub Command1_Click()
Timer
文档评论(0)