各位贴友：看到宏程序吧里好几位贴友希望了解宏程序和编写宏程序的方法，我找到了自己写的培训课教案。此教案介绍了FANUC数控系统提供的B类宏程序，主要内容来自于随机带来的编程手册，补充了自己的理解、使用体会和简单实例，在原教案基础上稍加修改免费分享给年青朋友们。拟按照内容分为若干小块发帖，前面是基础知识，然后按照变量、运算方法、控制指令、各种表达式、变量的使用、宏程序的调用方法、系统的规定和简单加工实例等顺

有空闲时间开贴帮人编数控车程序，会宏程序及其卡萨。义务劳动，不图回报。

FANUC加工中心如何让程序无法修改，但刀具偏置和坐标都可修改且能够正常使用，程序要可以看见？ 两种办法： 1，用面板上的程序锁，用钥匙锁住虽然是一个办法，但是不够好。 2，可以将你不想让别人修改的程序设置成只读模式，那么别人只能使用而绝对无法修改！ 设置方法如下： 打开参数界面，在里面找到参数No.3202这个参数是专门用来设置程序只读模式的参数，里面有NE9 NE8，而这两个位置的主要用途如下： # 0 NE8是否禁止程序号8000～8999的程序

Tr95*13 G99 T101 G0 X97.0 Z5.0 #1=7(单边牙高) N2 #2=TAN[15]*#1(Z轴位置，15为牙型半角度数) #3=#2+6(加6mm安全距离) #4=#2*2+6-3(计算每层车削宽度 6为牙底宽度，3为刀宽) #5=81+#1*2(X轴位置 81为牙底直径) #6=#3-#4 N1 G0 Z#3 G92 X#5 Z-31.0 F13 #3=#3-2(刀具每次偏移量，切记要小于刀宽) IF[#3GE#6]GOTO1 G0 Z#6 G92 X#5 Z-31.0 F13 #1=#1-0.1(X轴每层切削量) IF[#1GE0]GOTO2 M30

部分带注释，应该还是有人有需要的

加工梯形螺纹时，由于螺纹的加工深度较大无法采用直进法加工。因此梯形螺纹宜选用G76指令，采用斜进法进行编程加工。名称 代号 计算公式 牙形角 a a=30° 螺距 P 牙顶间隙 ac P/mm 1.5～5 6～12 14～44 ac/mm 0.25 0.5 1 外螺纹 大径 d 公称直径 中径 d2 d2=d-0.5P 小径 d3 d3=d-2h3 牙高 h3 h3=0.5P+ac 内螺纹 大径 D4 D4=+2a 中径 D2 D2=d2 小径 D1 D1=d-p 牙高 H4 h4=h3 牙顶宽 0.366p 牙槽底宽 0.336p-0.536ac 举例哈双头左旋梯形螺纹，大径70MM，中径68MM，小径65.5MM，P=6 P=6.这么大要分粗精车

三角函数的应用 下图我们需要利用三角函数模仿G71路线来粗车这个锥度 上图中绿色部分为图纸部分，红色部分为尺寸标注，粉色部分为延伸出来相交以后形成一个直角三角形，角度为26.6度。 工艺定制： 1.夹持直径50，以左端面定位。 2.选用90度外圆车刀 3.公式计算 角度对边=临边*TAN[26.6](临边已知等于30） 角度临边=对边/TAN[26.6](对边已知为（50-20）/2) 程序注释如下： O0001 M3S1000G99 T101M08 G0X50.Z10. Z1. #1=50(锥度大头） #2=20（锥度小头） #3=3（每刀吃刀量） N

下图需要加工大直径为80，小直径为60，深度15的端面曹，如果轴向进刀到槽底，铁销卡住刀具难以承受，今天我们介绍分层法用宏程序来解决： 工艺安排： 1.夹持直径100，以左端面定位 2.选用3毫米宽端面切曹刀分层加工 3.刀具以刀具内侧对刀 4.初始吃刀量为2，每层递减0.1，最小吃刀量0.5 程序注释如下： O0001 M3S500G99 T101M08 G0X60.Z10. Z1. #1=60(小直径赋值） #2=[80-6]-60（用大直径减去两个刀宽在减去小直径等于实际需要移动的X值） #3=2（初始Z方向吃刀量） #

今天我们来讲解一下外径深曹的加工，大家因该知道我们在加工深曹的时候，铁销不容易排出，容易卡削坏刀！利用G代码G75循环只能径向车削到底部，在执行Z进刀，这样的加工方式有所不足，今天我们利用宏程序分层法可以合理解决这个问题，也为后面的矩形螺纹打好基础，看下图： 从上图可以看出，我们曹大直径30，底部直径12，曹宽20，曹比较深。我们采用分层加工的方法来加工。 工艺要求： 1.采用3毫米切刀。 2.每层吃刀量1.5 3.刀具以左侧对平

今天我们来讲解一下外径多个等距曹的宏程序加工，一般如果我们不会宏程序的话只能依靠子程序来完成，不然程序会非常繁琐，如果用子程序来加工，如果中途坏刀，停下来以后只能从程序开头在重新执行，而我们如果使用宏程序加工的话可以避免这种情况，如果从中途停下来我们便于修改就可直接从我们停下来那里开始加工。我们来看下图： 从上图可以看出这是一个等距曹加工图，每个曹曹宽都是3，曹与曹之间都是相距10，我们使用宏程序来编

今天我们来讲解一个钻深孔的宏，我们都知道我们在钻深孔的时候由于钻头难以冷却，铁销难以排出，会造成钻头寿命减短，卡削，严重会断钻头，今天我们利用宏程序可以让钻头得到冷却，铁销容易排出，合理保护刀具寿命，我们来看下图： 从上图可以看出，我们需要钻孔直径为12，长度100，我们一般G代码G74循环代码，难以达到理想，效果，所以我们采用宏程序，每次钻深2毫米，然后快速退刀到Z10.地方，带出铁销，钻头冷却，然后在快速进刀到离

实例 1.单外径粗车宏的应用 本实例介绍一个简单的车削外径的宏程序，目的为了让读者熟悉宏语句用法和逻辑。 上图为一个单一外圆车削图，材料为直径50的棒料，车削到直径30，长度30. 图纸要求，平面见光就行，采用宏程序粗加工，每刀吃刀量为3毫米。 2.2工艺分析 1.采用3爪自定心卡盘夹持直径50，台阶爪定位左端面。 2.选择加工刀具，选用90度外圆机架刀车刀。 3.0宏程序编程思路 1.模仿G71路线。 2.毛培直径50赋值给#1，通过毛培每次递减，实现车

1.1 概述 （1）宏程序的分类 首先我们来讲一下宏程序的分类，A类和B类。首先在数控车系统比较老的时候，我们系统里面有A类宏，A类宏格式为G65格式，现在已经基本淘汰。随着科技发达，系统的升级优化，现在的数控系统大多支持B类宏程序，总体而言，现在B类宏是一个主流发展趋势，所以接下来我们的实例讲解都以B类宏程序为例。 （2）宏程序的概念 简单来理解宏程序是什么？可以这样理解，宏程序就是利用数学公式，函数等计算方式，配合数控

这个问题源于一个吧友：@loyou22 原帖：http://tieba.baidu.com/f?ct=335675392&tn=baiduPostBrowser&am

简单的铣圆程序，就是刀小，怎么把直径也宏程序下，就是不用老改啊！ 是45的圆20的刀，粗钻到35了。#1＝38／2－20／2 #2＝0 #3＝－10深度 G90 G57X0 Y0 Z100; S600 M03 ; G52 X0 Y0；G0Z Z5；G01 Z0 F400；Y#1 ；N10 G03 J－#1 Z#2；#2=#2－1; IF[#2 GE #3] GOTO10: G01 X0 Y0; Z#3;Y#1;G03 J－#1;G01 X0 Y0; G0..... G28 M05 ....你看我编的，要是铣到45要把#1改好多次，有怎么编，能一次成型？谢了

刀具沿着椭圆中心加工一个深度为5mm的椭圆槽，长半轴20mm，短半轴15mm。 工件坐标系原点定在工件上表面中心，则程序编制如下： G90G54G64G00X0Y0Z100 M3S800 G0X20Y0 Z5 #5=-1 N5 G1Z[#5]F20 #1=0 加工完整椭圆 N10 #1=20*COS[#1] #2=15*SIN[#1] G1X[#1]Y[#2]F600 沿小段直线插补加工 #1=#1+3 递减一小段距离，此值越小，椭圆越光滑。 IF [#1 LE 360] GOTO 10 条件判断是否到达终点。 #5=#5-1 IF [#5 GE -5] GOTO 5 G0Z100 M5 M30

本宏程序示例中假设刀具沿着椭圆中心加工一个深度为5mm的椭圆槽，椭圆长半轴20mm，短半轴15mm。 注意：如果用椭圆的标准方程编制椭圆宏程序，则椭圆需要分两部分来编制。 工件坐标系原点定在工件上表面中心，则程序编制如下： G90G54G64G00X0Y0Z100 M3S800 G0X20Y0 Z5 #5=-1 N5 G1Z[#5]F20 #1=20 加工椭圆的上半部分 N10 #2=15*SQRT[1-20*20/#1*#1] SQRT表示开平方 G1X[#1]Y[#2]F600 沿小段直线插补加工 #1=#1-1 递减一小段距离，此值越小，椭圆越光滑。 IF [#1 GE -20] GOTO 10 条件判断是

如下图所示，在φ30圆周上均匀加工6个φ6小孔，假设深度为8mm 工件坐标系原点定在工件上表面中心，则程序编制如下： G90G54G00X0Y0Z100 M3S800 #1=0 N10 #2=15*COS[#1] #3=15*SIN[#1] G99G81X[#2]Y[#3]R5Z-8F80 #1=#1+30 IF [#1LT360] GOTO 10 或写成IF [#1LE330] GOTO 10 G0G80Z100 M5 M30

在前面例子的基础上，我们用直径10mm的立铣刀加工一下图纸中的外轮廓。为编程方便我们调用刀具半径补偿D01=5。 工件坐标系原点定在工件上表面中心，则程序编制如下： G90G54G00X0Y0Z100 M3S2500 G0X-40Y-40 #1=-1 设定初始加工深度Z-1 N10 G0Z[#1] 阴影部分完成轮廓在Z[#1]这个深度的加工 G0G41X-21D01 G1Y21F1000 X21 Y-21 X-21 G0G40Y-40 #1=#1-1 IF [#1GE-5] GOTO 10 G0Z100 M5 M30

对于手工编程者来说，如果能够恰当的使用宏程序，会给编程带来很大的方便。下面用一个非常简单的例子来说明：下图中在板料中间加工一个键槽，这里为了说明程序，我们假设用直径5mm的立铣刀直接加工，实际上刀具加工槽时，只是走了段长度为25的直线。 工件坐标系原点定在工件上表面中心，则程序编制如下： G90G54G00X0Y0Z100 M3S2500 G0X-12.5Y0 Z3 #1=-1 设定初始加工深度Z-1 N10 G1Z[#1]F20 X12.5 G0Z3 X-12.5 #1=#1-1 IF [#1GE-5] GOTO 10 G0Z100 M5 M30 阴影部分是完成一层的

s = x cos(b) – y sin(b) t = x sin(b) + y cos(b) 根据下图，原来的点（#1，#2），旋转后的点（#4，#5），则公式： #4=#1*COS[b]- #2*SIN[b] #5=#1*SIN[b]+ #2*COS[b] 公式中角度b，逆时针为正，顺时针为负。 下图中正弦曲线如果以其左边的端点为参考原点，则此条正弦曲线顺时针旋转了16度，即b=-16 此正弦曲线周期为24，对应直角坐标系的360 对应关系 【0,360】 y=sin（x） 【0,24】 y=sin(360*x/24) 可理解为： 360/24是单位数值对应的角度 360*x/24是当变量在【0,24】范围取值为x时对应的

不在轴线上的椭圆宏程序编制也没有什么特殊的，只是改下偏置的数值罢了。 椭圆的参数方程为：X=a*COSθ Y=b*SINθ 可改写为： #1=30*cos[#3] #3为参数方程对应的中角度 #2=20*sin[#3] 图中椭圆长半轴30mm，短半轴20mm，椭圆中心位置如图所示，不在轴线上，因此在计算编程所用的坐标值时，X方向要再加上40，Z方向要减去30+10=30 相应程序如下： T0101 M3S800 G0X82Z5 #6=36 N5 G0X[#6+40] G1Z-10F0.1 #3=0 N10#1=30*COS[#3] #2=20*SIN[#3] #4=2*#2+#6+40 计算出的为半径值，需转化为直径值才能与

椭圆的参数方程为：X=a*COSθ Y=b*SINθ 可改写为： #1=30*cos[#3] #3为参数方程对应的中角度 #2=20*sin[#3] 相应程序修改如下： T0101 M3S800 G0X42Z5 #6=36 N5 G0X[#6] G1Z0F0.1 #3=0 N10#1=30*COS[#3] #2=20*SIN[#3] #4=2*#2+#6 计算出的为半径值，需转化为直径值才能与直径编程对应。 #5=#1-30 G1X[#4]Z[#5]F0.1 沿小段直线插补加工 #1=#1+3 递减3度，此值越小，工件表面越光滑。 IF[#1 LE 90] GOTO 10 条件判断是否到达终点。 G1X42 直线插补切到工件外圆之外 G0Z5 #6=#6-4 IF [#6 GE 0] GOTO 5 G0X150Z150 M5 M30

圆的标准方程为：X=R*COSθ Y=R*SINθ 可改写为： #1=20*cos[#3] #3为参数方程对应图纸中角度 #2=20*sin[#3] 使用参数方程比圆的标准方程具有一个优点，从下图中可以看出，使用标准方程式，在工件最右端，划分直线坡度较大，从右至左划分线段不均匀，而使用圆的参数方程所划分的直线段是按照圆周方向划分的，因此分布均匀，从而使用零件表面加工质量好。 相应程序修改如下： T0101 M3S800 G0X42Z5 #6=36 N5 G0X[#6] G1Z0F0.1 #3=0 N10#1=20*COS[#3] #2=20*SIN[#3] #4=2*#2+#6 圆的方

在不使用循环切削加工圆弧时，可以有几种不同的方式来安排走刀轨迹，本篇文章采用将圆弧段沿X方向偏移，由外籍内的加工方式进行。如图所示R20圆弧，假设刀具每次单边切深2mm，直径每刀吃4mm，则由端面切入的位置可以计算出需要切削： 40/4=10 刀 每条圆弧起点和终点的Z坐标不变，但X坐标都同时向+X方向偏移一个相同的值，因此可设偏移量为#1，初始值为#1=36 圆弧起点 X坐标为 #2=0+#1 圆弧终点 X坐标为 #3=40+#1 宏程序编制如下： T0101 M3S800 G0X42Z5 #1=36

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

对于没有接触过宏程序人，觉得它很神秘，其实很简单，只要掌握了各类系统宏程序的基本格式，应用指令代码，以及宏程序编程的基本思路即可。 对于初学者，尤其是要精读几个有代表性的宏程序，在此基础上进行模仿，从而能够以此类推，达到独立编制宏程序的目的。本教程将分步由浅入深的将宏程序讲解给大家，作者水平有限，也希望各位同仁提供更好的思路。 下面大家先看一个简单的车床的程序，图纸如下： 要求用外圆刀切削一个短轴，这

#500=2;<?xml:namespace prefix="o" ns="urn:schemas-microsoft-com:office:office"></?xml:namespace> #501=10； #502=#501/#500-1; WHILE[#502 GE 0] DO 1; G00 Z100.;(Z方向安全距离） G01 [-12.+#502*#500] F1000; G65 P8000 X#24 Y#25 A#1 B#2 Q#17 D#7 S#19 F#9; G00 Z[-12.+#502*#500+#500] #33=#33-1; END 1; G65 P8000 X#24 Y#25 A#1 B#2 Q#17 D#7 S#19 F#9; O8000 IF[#24 EQ #0] THEN #3000=1; IF[#25 EQ #0] THEN #3000=2; IF[#1 EQ #0] THEN #3000=3 IF[#2 EQ #0] THEN #3000=4; IF[#3 EQ #0] THEN #3000=5; IF[#19 EQ #0] THEN #3000=8; IF[#9 EQ #0] THEN #3000=9; IF[[#7 EQ #0] AND[#7 GT 200]]THEN #3000=7

首先在这里由衷的感谢作者@liuqirxjh0501 （鬼谷老师）感谢他的无私奉献 以及众位吧友一直以来的不懈支持 和鬼谷老师对我的淳淳教诲 在此谨以我个人名义再次向鬼谷老师表达衷心的感谢

举个西门子的例子，车长半轴为16短半轴为9的椭圆右半部分，毛坯20，长度自定 G95 T1D1; M3 S1200; R2=18;（利用偏移法，X往上偏移18mm） G0 X22 Z3;定位 AA1: R1=0;用角度为变量，初始角度赋值为0 G0 X=R2;定位 G1 Z0 F0.08; AA2: R3=18*SIN(R1);椭圆的x坐标，直径值 R4=16*COS(R1);椭圆的长度 R5=R3+R2;椭圆的X坐标加偏移量 G1 X=R5 Z=R4-16;用直线插补拟合椭圆轮廓 R1=R1+1角度每次加1度 IF R5>20 GOTOF AA3;如果X坐标超过20mm跳转到AA3处退刀以减少空刀量！ IF R1<=90 GOTOB AA2;如果角度不满90度

此程序是基于FANUC数控系统编写 此程序只是提供一个思路 希望能抛砖引玉

自上而下,右旋螺纹铣削. #100=(等分孔半径) #101＝(孔数) #102＝(螺纹导程) #103＝(螺纹深度,非绝对值) #104＝(起始角度) #105＝(螺纹直径) #106＝(刀具直径) #107=(安全距离) T01 M06 G0 G90 G54 X0 Y0 G43 Z50 H01 S300 M03 M08 #110=360/#101(计算各等分孔之间角度) #111=#104(起始角度) #112=#105-#106(计算去除刀具直径后的径向偏移量) #113=#112/2(计算去除刀具直径后的半径偏移量) #114=[#103+#107]/#102(计算达到螺纹深度后螺旋线所需的圈数) #114=ROUND[#114](取整) N100#115=1 G90 G16 G17 G0 X#100 Y#111(极

1L防止偷窥

数控车宏程序应用经典实例通过使用数控系统的变量赋值,运算,逻辑,条件判断或者转移命令等功... 转自:http://v.youku.com/v_show/id_XMzI1OTU5ODMy.html

http://bbs.shukongcn.com/?fromuid=185519 http://bbs.shukongcn.com/?fromuser=yujinhuenjoy