椭圆凸台铣削加工数控编程的研究

2020-03-17汪洋

农业装备技术 2020年1期

汪洋

（辽宁轨道交通职业学院，辽宁沈阳 110023）

0 引言

椭圆形状在我们日常生活中经常见到，天文（轨道分析）、艺术和建筑（如石拱门）都有椭圆形状。椭圆就像是具有伟大的母性气息，它把圆、抛物线、双曲线等圆锥曲线囊括于胸，形成统一的归宿[1]。在数控铣削加工中，椭圆曲线也是经常遇到的加工形状，本文就以椭圆的数控铣削加工编程为研究对象，椭圆尺寸大小不同，就需要重复编程，比较费时费力，在椭圆编程计算器中输入参数即可生成加工程序，方便快捷。

1 编程设计

数控程序中没有椭圆指令，所以需用直线拟合的方法完成椭圆加工，由于直线段较多，需要使用宏程序编程。宏程序是以变量组合，通过各种算术、逻辑运算、转移和循环等命令，而编制的一种可以灵活运用的程序，只要改变变量的值即可以完成不同的加工和操作[2-3]。

椭圆参数方程是以焦点（c，0）为圆心，R为变半径的曲线方程。椭圆参数方程为[4]：

角θ为变量，从0°增加到360°，利用参数方程计算出拟合的各个线段的x和y值。软件编程程序如下：

Private Sub Command1_Click()

a=Val(Text1.Text)

b=Val(Text2.Text)

c=Val(Text3.Text)

d=Val(Text4.Text)

Dim p(1 To 19)As String

p(1)="%200;"

p(2)="G95G54G17G90;"

p(3)="M03S800;"

p(4)="G00X"&a&"Y"&-0.5*(b+d)-5&"Z5M08;"

p(5)="G01Z-2F0.1;"

p(6)="G42G01Y"&-b&"D01;"

p(7)="Y0;"

p(8)="#1=0;"

p(9)="#4=2*PI;"

p(10)="WHILE[#1LE#4]DO1;"

p(11)="#2="&a&"*COS[#1];"

p(12)="#3="&b&"*SIN[#1];"

p(13)="G01X[#2]Y[#3]F0.1;"

p(14)="#1=#1+0.1;"

p(15)="ENDW;"

p(16)="G01Z5;"

p(17)="G40G00X0Y0M09;"

p(18)="M05;"

p(19)="M30;"

Dim Str2 As String

For i=1 To 19

Str2=Str2&p(i)&Chr(10)

Str2=Replace(Str2,vbLf,vbCrLf)

Open"D：1.txt"For Output As#1

Print#1,Str2

Close#1

Shell"cmd/c d：1.txt",vbHide

2 实例运用

椭圆凸台的具体尺寸如图1所示。

在计算器中，在输入文本框中分别输入椭圆长半轴长20 mm，椭圆短半轴长10 mm，毛坯长60 mm、宽60 mm，输入界面如图2所示。点击“显示数控程序”按钮，自动生成的加工程序如下：

%200;

G95G54G17G90;

M03S800;

G00X20Y-50Z5M08;

G01Z-2F0.1;

但是，它们发生时并未丧失固有的本性，而依据这个本性，它们在发生之前，依然有不发生的可能性。“既然它各方面之所以具有必然性，是因为有神的知识这个条件，那它本身不具备必然性又有什么关系呢？”神意预知的事物必将发生，“只是其中有些东西是事物必然性的结果，有些东西是行事者努力的结果。”神意预知和自由意志的共融在这里得到完全的确证。

G42G01Y-10D01;

Y0;

#1=0;

#4=2*PI;

WHILE[#1LE#4]DO1;

#2=20*COS[#1];

#3=10*SIN[#1];

G01X[#2]Y[#3]F0.1;

#1=#1+0.1;

ENDW;

G01Z5;

G40G00X0Y0M09;