毕业设计_论文机床数控课设--插补原理及流程图设计.doc

《毕业设计_论文机床数控课设--插补原理及流程图设计.doc》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、《机床数控技术》课程设计说明书班级:0511105学号:0511105姓名：指导教师：时间：2015年1月地点：明故宫校区计算中心目录一、简要说明--------------------------------------------------------3二、设计目的和任务--------------------------------------------------3三、设计要求--------------------------------------------------------3四.插补原理及流程图设计----------------------------

2、--------------4五.变量说明-------------------------------------------------------------6六．程序界面及运行截图--------------------------------6七.源程序代码----------------------------------------------------7八参考文献-------------------------------------18一、简要说明插补（Interpolation）　　在数控机床中，刀具不能严格地按照要求加工的曲线运动，只能用折线轨迹逼近所要

3、加工的曲线。　　插补（interpolation）定义：机床数控系统依照一定方法确定刀具运动轨迹的过程。也可以说，已知曲线上的某些数据，按照某种算法计算已知点之间的中间点的方法，也称为“数据点的密化”。数控装置根据输入的零件程序的信息，将程序段所描述的曲线的起点、终点之间的空间进行数据密化，从而形成要求的轮廓轨迹，这种“数据密化”机能就称为“插补”。　　插补计算就是数控装置根据输入的基本数据，通过计算，把工件轮廓的形状描述出来，边计算边根据计算结果向各坐标发出进给脉冲，对应每个脉冲，机床在响应的坐标方向上移动一个脉冲当量的距离，从而将工件加工出所需要轮廓的形状。插补的原理和算法很

4、多，根据数控系统输出到伺服驱动装置的信号的不同，插补方法可归纳为基准脉冲插补和数据采样插补两种类型。二、设计目的课设题目：·PL4——逐点比较法插补第4象限直线·DA14——DDA法插补第14象限顺圆弧（1）了解连续轨迹控制数控系统的组成原理。（2）了解逐点比较法和DDA法插补直线和圆弧的基本原理。（3）掌握逐点比较法和DDA法插补的软件实现基础。三、设计要求（1）具有数据输入界面，如起点、终点、圆心、半径及插补步长等；（2）具有插补过程的动态显示功能，如单步插补、连续插补；（3）适当的编程语言，详细的程序设计流程图，变量说明、源程序；（1）插补的步长可调。四：插补原理及流程图设

5、计：1.插补原理逐点比较法直线插补原理图：DDA法圆弧插补原理：（同理在14象限）2.流程图设五：变量说明程序界面控件设置以及相关变量说明：控件名对应变量相关说明寄存器位数Register寄存器位数半径Radius圆弧半径步长Steplength步长XX0起点横坐标YY0起点纵坐标XX1终点横坐标YY1终点纵坐标连续插补succession“连续插补”单步插补step“单步插补”直线line直线插补选择圆弧circle圆弧插补选择六．程序界面及运行截图1.直线连续插补：2.直线单步插补：2.圆弧连续插补：4.圆弧单步插补：七．程序代码节选直线Dimx0,y0,x1,y1,L,xe

6、,yeAsSingleDimnAsIntegerx0=Val(Form2.Text1.Text)'*******起点y0=Val(Form2.Text2.Text)'x1=Val(Form2.Text3.Text)'*******终点y1=Val(Form2.Text4.Text)L=Val(Form2.Text5.Text)'*******步长IfL=0ThenL=1Form2.Text5.Text=LEndIfIfL<0ThenL=Abs(L)Form2.Text5.Text=LEndIfxe=x1-x0ye=y1-y0n=CInt(Abs(xe)/L)+CInt(Abs(y

7、e)/L)'*******终点判别flag1=0form1.Picture1.Clsform1.picIfxe=0Then'*******Y轴Ifye>0Then'*************Ｙ正向i=0j=0i1=0j1=0Fora=1Tonj1=j+Lform1.Picture1.Line(i+x0,j+y0)-(i1+x0,j1+y0),RGB(255,0,0)j=j1NextaElseIfye<0Then'*************Ｙ负向i=0j=0i1=0j1=0Fora