数控车床由浅入深的宏程序实例精讲精编版

1、宏程序精讲实例裳华职业技术中专鲍新涛宏程序概述其实说起来宏就是用公式来加工零件的，比如说椭圆 ,如果没有宏的话， 我们要逐点算出曲线上的点，然后慢慢来用直线逼近，如果是个光洁度要求很高的工件的话，那么需要计算很多的点，可是应用了宏后，我们把椭圆公式输入到系统中然后我们给出Z 坐标并且每次加10um 那么宏就会自动算出X 坐标并且进行切削，实际上宏在程序中主要起到的是运算作用。.宏一般分为A 类宏和 B 类宏。A 类宏是以 G65 Hxx P#xx Q#xx R#xx 的格式输入的， 而 B 类宏程序则是以直接的公式和语言输入的和 C 语言很相似在 0i 系统中应用比较广。宏程序的作用数控系统为

2、用户配备了强有力的类似于高级语言的宏程序功能，用户可以使用变量进行算术运算、逻辑运算和函数的混合运算，此外宏程序还提供了循环语句、分支语句和子程序调用语句，利于编制各种复杂的零件加工程序，减少乃至免除手工编程时进行繁琐的数值计算，以及精简程序量。宏程序指令适合抛物线、椭圆、双曲线等没有插补指令的曲线编程；适合图形一样，只是尺寸不同的系列零件的编程；适合工艺路径一样，只是位置参数不同的系列零件的编程。较大地简化编程；扩展应用范围。1宏的分类B 类宏由于现在 B 类宏程序的大量使用 ,很多书都进行了介绍这里我就不再重复了 ,但在一些老系统中 ,比如发那科（ FANUC ）OTD 系统中由于它的 M

3、DI 键盘上没有公式符号 ,连最简单的等于号都没有 ,为此如果应用 B 类宏程序的话就只能在计算机上编好再通过 RSN-32 接口传输的数控系统中 ,可是如果我们没有 PC 机和 RSN-32 电缆的话怎么办呢 ,那么只有通过 A 类宏程序来进行宏程序编制了 ,下面我介绍一下 A 类宏的引用 ;A 类宏A 类宏是用 G65 Hxx P#xx Q#xx R#xx 或 G65 Hxx P#xx Qxx Rxx 格式输入的 ,xx 的意思就是数值 ,是以 um 级的量输入的 ,比如你输入 100 那就是 0.1MM.#xx 就是变量号 ,变量号就是把数值代入到一个固定的地址中 ,固定的地址就是变量

4、,一般 OTD 系统中有 #0#100#149#500#531关.闭电源时变量 #100#149 被初始化成“空 ”，而变量 #500#531 保持数据 .我们如果说 #100=30 那么现在 #100 地址内的数据就是 30 了,就是这么简单 .好现在我来说一下 H 代码 ,大家可以看到 A 类宏的标准格式中 #xx 和 xx 都是数值 ,而 G65 表示使用 A 类宏 ,那么这个 H 就是要表示各个数值和变量号内的数值或者各个变量号内的数值与其他变量号内的数值之间要进行一个什么运算,可以说你了解了 H 代码 A 类宏程序你基本就可以应用了,好,现在说一下 H 代码的各个含义 :应用以下都以

5、 #100 和#101 和#102,及数值 10 和 20 做为例子 ,应用的时候别把他们当格式就行 ,2基本指令H01 赋值 ;格式 :G65H01P#101Q#102:把#102 内的数值赋予到 #101 中G65H01P#101Q#10:把#10 赋予到 #101 中H02 加指令 ;格式 G65 H02 P#101 Q#102 R#103,把#102 的数值加上 #103 的数值赋予#101G65 H02 P#101 Q#102 R10G65 H02 P#101 Q10 R#103G65 H02 P#101 Q10 R20上面 4 个都是加指令的格式都是把Q 后面的数值或变量号内的数值

6、加上R 后面的数值或变量号内的数值然后等于到P 后面的变量号中 .H03 减指令 ;格式 G65 H03 P#101 Q#102 R#103,把#102 的数值减去 #103 的数值赋予#101G65 H03 P#101 Q#102 R10G65 H03 P#101 Q10 R#103G65 H03 P#101 Q20 R10上面 4 个都是减指令的格式都是把Q 后面的数值或变量号内的数值减去R 后面的数值或变量号内的数值然后等于到P 后面的变量号中 .H04 乘指令 ;格式 G65 H04 P#101 Q#102 R#103,把#102 的数值乘上 #103 的数值赋予#101G65 H04

7、 P#101 Q#102 R10G65 H04 P#101 Q10 R#1033G65 H04 P#101 Q20 R10上面 4 个都是乘指令的格式都是把Q 后面的数值或变量号内的数值乘上R 后面的数值或变量号内的数值然后等于到P 后面的变量号中 .H05 除指令 ;格式 G65 H05P#101 Q#102 R#103,把#102 的数值除以 #103 的数值赋予#101G65 H05 P#101 Q#102 R10G65 H05 P#101 Q10 R#103G65 H05 P#101 Q20 R10上面 4 个都是除指令格式都是把Q 后面的数值或变量号内的数值除以R 后面的数值或变量号

8、内的数值然后等于到P后面的变量号中 .(余数不存 ,除数如果为 0 的话会出现 112 报警 )三角函数指令H31 SIN 正玄函数指令 :格式 G65 H31 P#101 Q#102 R#103;含义 Q 后面的 #102 是三角形的斜边 R 后面的 #103 内存的是角度 .结果是 #101=#102*SIN#103,也就是说可以直接用这个求出三角形的另一条边长 .和以前的指令一样Q 和 R 后面也可以直接写数值 .H32 COS 余玄函数指令 :格式 G65 H32 P#101 Q#102 R#103;含义 Q 后面的 #102是三角形的斜边R 后面的 #103 内存的是角度 .结果是

9、#101=#102*COS#103,也就是说可以直接用这个求出三角形的另一条边长 .和以前的指令一样 Q 和 R 后面也可以直接写数值 .4H33 和 H34 本来应该是 TAN 和 ATAN 的可是经过我使用得数并不准确,希望有知道的人能够告诉我是为什么?开平方根指令H21;格式 G65 H21 P#101 Q#102 ;意思是把 #102 内的数值开了平方根然后存到#101 中(这个指令是非常重要的如果在车椭圆的时候没有开平方根的指令是没可能用宏做到的 .无条件转移指令H80;格式 :G65 H80 P10 ;直接跳到第 10 程序段有条件转移指令H81 H82 H83 H84 H85 H

10、86 ,分别是等于就转的H81;不等于就转的 H82;小于就转的 H83;大于就转的 H84;小于等于就转的H85;大于等于就转的H86;格式 :G65 H8x P10 Q#101 R#102;将#101 内的数值和 #102 内的数值相比较 ,按上面的 H8x 的码带入 H8x 中去 ,如果条件符合就跳到第 10 程序段 ,如果不符合就继续执行下面的程序段 .4B 类宏程序定义能完成某一功能的一系列指令像子程序那样存入存储器，用户可以设定M、S、T、G 代码调用它们，使用时只需给出这个指令代码就能执行其功能，也可以像调用子程序一样使用。这样的程序也称作用户宏程序l 调用宏程序的指令 宏指令l

11、 特点：使用变量变量的表示和使用（一） 变量表示5#I(I=1,2,3,或 )#<式子 >例： #5，#109，#501，#1+#212（二）变量的使用1 地址字后面指定变量号或公式格式：<地址字 >#I这里的 “I代”表变量号例： F#103，设 #103=15则为 F15Z#110，设 #110=250则为 Z250X#24+#18*COS#12 变量号可用变量代替例： #30，设 #30=3则为 #33 变量不能使用地址O，N，I例：下述方法下允许O#1；I#26.00 ×100.0;N#3Z200.0；4 变量号所对应的变量，对每个地址来说，都有具体数

12、值范围例： #30=1100时，则 M#30 是不允许的5 #0 为空变量，没有定义变量值的变量也是空变量6 变量值定义：程序定义时可省略小数点，例：#123=149MDI 键盘输一变量的种类1. 局部变量 #1#336一个在宏程序中局部使用的变量，其运算结果其他程序不可使用。例：A 宏程序B 宏程序 #10=20X#10不表示 X20 断电后清空，调用宏程序时代入变量值2. 公共变量。早期（#100#149，#500#531 ）、新系统（#100#199，#500#999）各用户宏程序内公用的变量 ，其运算结果任何程序调用都相同。例：上例中 #10 改用 #100 时， B 宏程序中的X#1

13、00 表示 X20#100#149断电后清空#500#531 保持型变量（断电后不丢失）3. 系统变量固定用途的变量，其值取决于系统的状态例： #2001 值为 1 号刀补 X 轴补偿值#5221 值为 X 轴 G54 工件原点偏置值入时必须输入小数点，小数点省略时单位为m运算指令运算式的右边可以是常数、变量、函数、式子式中 #j，#k 也可为常量式子右边为变量号、运算式1 定义#I=#j72 算术运算#I=#j+#k#I=#j #k#I=#j*#k#I=#j/#k3 逻辑运算#I=#JOK#k#I=#JXOK#k#I=#JAND#k4 函数#I=SIN#j正弦#I=COS#j 余弦#I=TA

14、N#j正切#I=ATAN#j反正切#I=SQRT#j平方根#I=ABS#j绝对值#I=ROUND#j四舍五入化整#I=FIX#j上取整#I=FUP#j下取整#I=BIN#jBCDBIN （二进制）#I=BCN#jBINBCD1 说明1) 角度单位为度8例： 90 度 30 分为 905 度2) ATAN 函数后的两个边长要用 “/ 隔”开例： #1=ATAN1/ 1 时， #1 为了 3503) ROUND 用于语句中的地址，按各地址的最小设定单位进行四舍五入例：设 #1=12345，#2=23456，设定单位 1mG91X#1；X1235X #2F300；X2346X#1+#2 ；X3580

15、未返回原处，应改为XROUND#1+ROUND#2；4) 取整后的绝对值比原值大为上取整，反之为下取整例：设 #1=12，#2=12 时若#3=FUP#1时，则 #3=20若#3=FIX#1 时，则 #3=10若#3=FUP#2时，则 #3=20若#3=FIX#2 时，则 #3=105) 指令函数时，可只写开头 2 个字母例： ROUNDROFIX FI6) 优先级函数 乘除（ * ，1，AND ）加减（ +， OR，XOR ）例： #1=#2+#3*SIN#4 ；7) 括号为中括号，最多 5 重，园括号用于注释语句9例： #1=SIN#2+#3*#4+#5*#6 ；（3 重）转移与循环指令1

16、无条件的转移格式：GOTO1；GOTO#10；2条件转移格式：IF< 条件式 >GOTOn条件式：#jEQ#k 表示=#jNE#k 表示#jGT#k 表示>#jLT#k 表示 <#jGE#k 表示#jLE#k 表示 例：IF#1GT10GOTO100；N100G00G91 X10；例：求 1到 10之和O9500；#1=0#2=1N1IF#2GT10GOTO2#1=#1+#2；10#2=#2+1；GOTO1N2M301循环格式： WHILE< 条件式 >DOm；（m=1，2，3）ENDm说明： 1条件满足时，执行DOm 到 ENDm ，则从 DOm 的程序段

17、不满足时，执行DOm 到 ENDm 的程序段2省略 WHILE 语句只有 DOm ENDm,则从 DOm 到 ENDm 之间形成死循环3嵌套4EQNE 时，空和 “0不”同其他条件下，空和 “0相”同例：求 1到 10之和O0001；#1=0；#2=1；WHILE#2LE10DO1；#1=#1+#2；#2=#2+#1；END1；11M30由浅入深宏程序1-宏程序入门基础之销轴加工对于没有接触过宏程序人，觉得它很神秘，其实很简单，只要掌握了各类系统宏程序的基本格式，应用指令代码，以及宏程序编程的基本思路即可。对于初学者，尤其是要精读几个有代表性的宏程序，在此基础上进行模仿，从而能够以此类推，达到

18、独立编制宏程序的目的。本教程将分步由浅入深的将宏程序讲解给大家，作者水平有限，也希望各位同仁提供更好的思路。下面大家先看一个简单的车床的程序，图纸如下：要求用外圆刀切削一个短轴，这里只列举程序的前几步：T0101M3S800G0X82Z5G0X76G1Z-40F0.2X82G0Z5G0X72G1Z-40F0.2X82G0Z5G0X68G1Z-40F0.2X82G0Z5G0X68G1Z-40F0.2X82G0Z5.G0X40G1Z-40F0.2X82G0Z5G0X150Z150M5M30从上面程序可以看出， 每次切削所用程序都只是切削直径X 有变化， 其他程序代码未变。 因此可以将一个变量赋给

19、X ，而在每次切削完之后，将其改变为下次切削所用直径即可。O5679T0101M3S800G0X82Z5#1=76赋初始值，即第一次切削直径N10 G0 X#1将变量赋给 X ，则 X 方向进刀的直径则为#1 变量中实际存储值。N10 是程序G1Z-40F0.2段的编号，用来标识本段，为后面循环跳转所用。12X82G0Z5#1=#1-4每行切深为 2mm，直径方向递减 4mmIF #1GE40 GOTO 10如果 #1 >= 40 ，即此表达式满足条件，则程序跳转到N10 继续执行。G0X150Z150当不满足 #1 >= 40 ，即 #1<40，则跳过循环判断语句，由此句继

20、续向后执行。M5M30由浅入深宏程序2-宏程序之销轴粗精加工本篇文章利用宏程序简单模仿数控系统的外圆车削循环功能。在此用前一篇的图纸与程序原程序：O0985T0101M3S800G0X82Z5粗加工开始#2=0.05Z 向的加工余量#3=0.5外圆方向的加工余量#4=0.3每层切削后的回退量#1=76+2*#3考虑了精加工余量的第一次切削直径N10 G0 X#1将变量赋给 X ，则 X 方向进刀的直径则为 #1 变量中实际存储值。 N10 是程序G1Z-40+#2F0.2段的编号，用来标识本段，为后面循环跳转所用。X#1+#4每次切削只回退 #4 的值G0Z5#1=#1-4单边切深为 2mm，

21、直径方向每次递减 4mmIF #1GE40 GOTO 10如果 #1 >= 40 ，即此表达式满足条件，则程序跳转到N10 继续执行。M03S1200当不满足 #1 >= 40 ，即 #1<40，则跳过循环判断语句，由此句继续向后执行。G0X40由此开始精加工G1Z-40F0.1X82G0X150Z150M513M30由浅入深宏程序3-宏程序车半球面在不使用循环切削加工圆弧时，可以有几种不同的方式来安排走刀轨迹，本篇文章采用将圆弧段沿X方向偏移， 由外籍内的加工方式进行。 如图所示 R20 圆弧，假设刀具每次单边切深 2mm ，直径每刀吃 4mm ，则由端面切入的位置可以计算

22、出需要切削：40/4=10 刀每条圆弧起点和终点的Z 坐标不变，但X 坐标都同时向+X 方向偏移一个相同的值，因此可设偏移量为 #1，初始值为 #1=36圆弧起点X 坐标为#2=0+#1圆弧终点X 坐标为#3=40+#1宏程序编制如下：O3456T0101M3S800G0X42Z5#1=36赋初始值，即第一个圆弧直径偏移量N10 #2=0+#1计算圆弧起点的X 坐标#3=40+#1计算圆弧终点的X 坐标G0X#2快速到达切削直径G1Z0F0.1直线切至圆弧起点G3X#3Z-20R20F0.1切削圆弧G1X42直线插补切削至外圆G0Z5退至端面外侧#1=#1-4直径方向递减4mmIF #1 GE

23、 0 GOTO 10如果 #1 >= 0 ，即此表达式满足条件，则程序跳转到N10 继续执行。G0X150Z150当不满足 #1 >=0，即 #1<0，则最后一条圆弧已经切完，跳出循环。M5M3014由浅入深宏程序4-圆的标准方程编制宏程序车半球面我们知道无论什么样的曲线， 数控系统都是 CAD/CAM 软件在处理时都会将其按照内部的算法划分成小段的直线进行加工，接下来我们利用圆的方程来将直线划分成小段直线在利用宏程序对其加工。下图为圆的标准方程X*X+Y*Y=R*R， 若将 X 和 Y 用参数变量代替可改写为#1*#1+#2*#2=R*R圆弧可沿 #1 方向划分成无数小段直

24、线，然后求出其相应端点坐标，再求出相对的数控车床中的坐标，再按直线进行编程加工。如下图所示：则此段圆弧精加工轨迹为：G0X0G1Z0F0.1#1=0N10 #2=SQRT20*20-#1*#1SQRT 表示开平方#3=#1-20圆的原点在工件坐标左侧20，所以圆弧上所有点坐标Z要减 2015#4=2*#2圆的方程计算出的为半径值，需转化为直径值才能与直径编程对应。G1X#4Z#3F0.1沿小段直线插补加工#1=#1-0.5递减一小段距离，此值越小，圆弧越光滑。IF #1GE0 GOTO 10 条件判断是否到达终点。G1X42直线切出外圆如果要再加上分层的粗加工，设偏移量为#5，则程序改为O67

25、89T0101M3S800G0X42Z5#5=36N5 G0X#5G1Z0F0.1#1=20N10 #2=SQRT20*20-#1*#1SQRT 表示开平方#3=#1-20圆的原点在工件坐标左侧20，所以圆弧上所有点坐标Z要减20#4=2*#2+#5圆的方程计算出的为半径值，需转化为直径值才能与直径编程对应。G1X#4Z#3F0.1沿小段直线插补加工#1=#1-0.5递减一小段距离，此值越小，圆弧越光滑。IF #1 GE 0 GOTO 10条件判断是否到达终点 。G1X42直线插补切出外圆G0Z5#5=#5-4IF #5 GE 0 GOTO 5G0X150Z150M5M30以上程序分内外二层循

26、环，外层循环为分层加工，内层循环为小段直线插补一条圆弧。由浅入深宏程序5-圆的参数方程编制宏程序车半球面圆的标准方程为：X=R*COS Y=R*SIN 可改写为：#1=20*cos#3 #3为参数方程对应图纸中角度#2=20*sin#316使用参数方程比圆的标准方程具有一个优点，从下图中可以看出，使用标准方程式，在工件最右端，划分直线坡度较大，从右至左划分线段不均匀，而使用圆的参数方程所划分的直线段是按照圆周方向划分的，因此分布均匀，从而使用零件表面加工质量好。相应程序修改如下：O9876T0101M3S800G0X42Z5#6=36N5 G0X#6G1Z0F0.1#3=0N10 #1= 20

27、*COS#3#2=20*SIN#3#4=2*#2+#6圆的方程计算出的为半径值，需转化为直径值才能与直径编程对应。17#5=#1-20G1X#4Z#5F0.1沿小段直线插补加工#3=#3+3递减 3 度，此值越小，圆弧越光滑。IF #3 LE 90 GOTO 10条件判断是否到达终点。G1X42直线插补切到工件外圆之外G0Z5#6=#6-4IF #6 GE 0 GOTO 5G0X150Z150M5M30由浅入深宏程序6-利用椭圆标准方程编制数控车宏程序椭圆的标准方程：X 2Zb 2a22 1椭圆宏程序结构流程：18如果看了前几篇，那么接下来这两篇加工椭圆的宏程序应该很容易理解。椭圆标准方程X*

28、X/a*a+Y*Y/b*b=1，其中 a 为长半轴， b 为短半轴，若将X 和 Y 用参数变量代替可改写为 #1*#1/a*a+#2*#2/b*b=1椭圆可沿长半轴#1 方向划分成无数小段直线，然后求出其相应端点坐标，再求出相对的数控车床中的坐标，再按直线进行编程加工。如下图所示：假设椭圆a=30， b=20，只加工半个椭圆，则此段椭圆精加工轨迹为：G0X0G1Z0F0.119#1=30N10 #2=20*SQRT1-30*30/#1*#1SQRT 表示开平方#3=#1-30椭圆的原点在工件坐标左侧30，所以椭圆上所有点坐标Z要减20#4=2*#2方程计算出的为半径值，需转化为直径值才能按直径

29、编程。G1X#4Z#3F0.1沿小段直线插补加工#1=#1-1递减一小段距离，此值越小，椭圆越光滑。IF #1GE0 GOTO 10 条件判断是否到达终点。G1X42直线切出外圆如果要再加上分层的粗加工，设偏移量为#5，则程序改为O5678T0101M3S800G0X42Z5#5=36N5 G0X#5G1Z0F0.1#1=30N10 #2=20*SQRT30*30-#1*#1/30SQRT 表示开平方#3=#1-30椭圆的原点在工件坐标左侧30，所以椭圆上所有点坐标Z要减20#4=2*#2方程计算出的为半径值，需转化为直径值才能按直径编程。G1X#4Z#3F0.1沿小段直线插补加工#1=#1-

30、1递减一小段距离，此值越小，椭圆越光滑。IF #1GE0 GOTO 10 条件判断是否到达终点。G1X42直线插补切出外圆G0Z5#5=#5-4IF #5 GE 0 GOTO 5G0X150Z150M5M30以上程序分内外二层循环，外层循环为分层加工，内层循环为小段直线插补一条四分之一椭圆弧。由浅入深宏程序7-椭圆的参数方程编制宏程序车椭球面椭圆的参数方程为：X=a*COS Y=b*SIN 可改写为：#1=30*cos#3 #3为参数方程对应的中角度#2=20*sin#3相应程序修改如下：O3456T0101M3S800G0X42Z5#6=3620N5 G0X#6G1Z0F0.1#3=0N10

31、 #1= 30*COS#3#2=20*SIN#3#4=2*#2+#6计算出的为半径值，需转化为直径值才能与直径编程对应。#5=#1-30G1X#4Z#5F0.1沿小段直线插补加工#3=#3+3递减 3 度，此值越小，工件表面越光滑。IF #3 LE 90 GOTO 10条件判断是否到达终点。G1X42直线插补切到工件外圆之外G0Z5#6=#6-4IF #6 GE 0 GOTO 5G0X150Z150M5M30由浅入深宏程序 8-车床任意位置椭圆宏程序的编制不在轴线上的椭圆宏程序编制也没有什么特殊的，只是改下偏置的数值罢了。椭圆的参数方程为：X=a*COS Y=b*SIN 可改写为：#1=30*

32、cos#3 #3为参数方程对应的中角度#2=20*sin#3图中椭圆长半轴30mm，短半轴20mm，椭圆中心位置如图所示，不在轴线上，因此在计算编程所用的坐标21值时， X 方向要再加上40， Z 方向要减去30+10=30相应程序如下：O2345T0101M3S800G0X82Z5#6=36N5 G0X#6+40G1Z-10F0.1#3=0N10 #1= 30*COS#3#2=20*SIN#3#4=2*#2+#6+40计算出的为半径值，需转化为直径值才能与直径编程对应。#5=#1-30-10G1X#4Z#5F0.1沿小段直线插补加工#3=#3+3递减 3 度，此值越小，工件表面越光滑。IF

33、#3 LE 90 GOTO 10条件判断是否到达终点。G1X82直线插补切到工件外圆之外G0Z5#6=#6-4IF #6 GE 0 GOTO 5G0X150Z150M5M30由浅入深宏程序9-车床旋转椭圆宏程序的编制要对斜椭圆进行编程， 首先要知道单个坐标点旋转所用的公式。 如下图所示， 单个点逆时针旋转一定角度，公式推导如下：s = r cos(a + b) = r cos(a)cos(b) r sin(a)sin(b)(1.1)t = r sin(a + b) = r sin(a)cos(b) + r cos(a) sin(b)(1.2)22其中x = r cos(a), y = r si

34、n(a)代入 (1.1), (1.2) ,s = x cos(b) y sin(b)(1.3)t = x sin(b) + y cos(b)(1.4)根据下图，原来的点（#1， #2），旋转后的点（ #4， #5），则公式：#4=#1*COS30- #2*SIN30#5=#1*SIN30+ #2*COS30下图中椭圆旋转了30 度，即 #1=30 旋转前后的点坐标的坐标原点都是椭圆中心。程序如下：O1234T0101M3S800G0X82Z5#6=16工件毛坯假设为90mm， #6 为每层切削时椭圆弧向+X 的偏移量。N5 G0X#6+30+40斜椭圆与端面的交点直径为70G1Z0F0.1#3

35、=0N10 #1= 30*COS#3对应角度 #3 的椭圆上的一个点的坐标，此为未旋转的椭圆的点#2=20*SIN#3#4=#1*COS30- #2*SIN30旋转 30 度之后对应的坐标值#5=#1*SIN30+ #2*COS30#7=2*#4+#6+40坐标平移后的坐标。#8=#1-26G1X#7Z#8F0.1沿小段直线插补加工#3=#3+3递减 3 度，此值越小，工件表面越光滑。IF #3 LE 90 GOTO 10条件判断是否到达终点。23G1X92直线插补切到工件外圆之外G0Z5#6=#6-4IF #6 GE 0 GOTO 5G0X150Z150M5M30椭圆加工： 零件材料45 钢

36、，毛坯为 50mm× 100mm，按图要求完成数控加工程序。O0001 ；T0101 ;M03 S800 ；G0 X51. Z2. ；G71 U1.5 R1.；（粗车右端外形轮廓）G71 P10 Q20 U0.5 W0.1 F150；N10 G1 X25.966 ；（椭圆处外径）Z0. ；Z-19. ；X35.988 Z-29.;Z-46 ；X44. ；X45.992 Z-47. ；N20 Z-55. ；G70 P10 Q20 S1000 F120 ；（精车右端外形轮廓）G00 X100. ；Z50. ；S800 F150 ；#150 = 26. ；（定义椭圆加工余量）N30 IF

37、#150 LT 1 GOTO 40；24（如果余量小于1，跳到 40 句）M98 P0003 ；（调用椭圆加工宏程序）#150 = #150 - 2 ；（每次递减2mm）GOTO 30 ；（无条件跳转到30 句）N40 G0 X30. Z2. ；S1500 F80 ；#150 =0；（开始精加工椭圆轮廓）M98 P0003 ；G0 X100. Z5. ；M30 ；O0003 ；（椭圆加工子程序）#101=20. ；（椭圆长半轴）#102=13. ；（椭圆短半轴）#103=20. ；（起点处Z 坐标）N20 IF #103 LT 1 GOTO 50 ；（如果 Z 值小于 1 跳转到 #104 =

38、 SQRT#101*#101 - #103*#103 ；（构造#105 = #102*#104/#101 ；（构造bG01 X2*#105 + #150Z#103 20；a（直径值定义加上加工余量，Z 向偏移椭圆长半轴）#103 = #103 0.5；（ Z 坐标递减 0.5mm ）GOTO 20 ；（绝对跳转到20 句）N50 G00 U2. Z2. ；（退刀）M99 ；50 句）a2 Z 2）a2）Z 2椭圆轮廓编程技巧25O0027 ；T0101 ;G98 ；M43;M03 S800 ；G0 X80. Z5. ；G73 U25 R25 ； (调用粗车循环加工椭圆轮廓)G73 P10 Q20 U0.5 W0 F150；N10 G1 X30 Z0 ； (轮廓起点）Z-8.79 ；#100=-8.79; （椭圆起点 Z坐标）N15 #102=#100+44* #100+44 ；a2Z 2#103=SQRT36*36-#102;（构造）#104=10+2/3*#103; （构造bZ 2X 向半径偏移10mm ）a2#105=2*#104;aG01 X#105 Z#100;#100=#100-2; （ Z 向递减 2mm）IF #100GT-72.102 GOTO 15（如果 Z 坐标值大于 -72.102 跳转到15 句）G