汪 洋
(辽宁轨道交通职业学院,辽宁 沈阳 110023)
椭圆形状在我们日常生活中经常见到,天文(轨道分析)、艺术和建筑(如石拱门)都有椭圆形状。椭圆就像是具有伟大的母性气息,它把圆、抛物线、双曲线等圆锥曲线囊括于胸,形成统一的归宿[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)
Next
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
椭圆凸台的具体尺寸如图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;
M05;
M30;
开发了一种椭圆凸台数控铣削加工自动编程的计算器,在计算器中输入相应参数即可完成该凸台的数控铣削程序的编写,提高了椭圆凸台的编程效率,从而提高了整个生产效率。该计算器可以完成不同尺寸的椭圆凸台数控编程,方便快捷。