一. 什麼是宏程序？

用變量的方式進行數控編程

二. 宏程序與普通程序的區别。

普通程序

宏程序

隻能使用常量

可以使用變量，并給變量賦值

常量之間不可以運算

變量之間可以運算

程序隻能順序執行，不能跳轉

程序可以跳轉

三. 變量

#1~#33

在宏程序中儲存數據，在程序中對其賦值。賦值是将一個數據賦予一個變量。例如#1=0，表示#1的值就是0，其中#1代表變量，#是變量符号，0就是給變量#1賦的值。

例如

G0 X0 Y0； #1=100 ； #1=50；

G01 X100 F500 ； G0 X0 Y0； #2=50；

G01 X#1 F500； G0 X0 Y0 ；

G01 X[#1 #2] F500；

四. 變量之間的運算

X

#1=50； 圓孔直徑

#2=40； 圓孔深度

#3=30； 刀具直徑

#4=0； Z坐标設為自變量，賦值為0

#17=1; Z坐标每次遞增量

#5=[#1-#3]/2； 刀具回轉直徑

S1000 M3;

G54 G90 G00 X0 Y0 Z30;

G00 X#5

Z[-#4 1];

G01 Z-#4 F200;

WHILE[#4 LT #2] DO01;

#4= #4 #17;

G03 I-#5 Z-#4 F1000;

END 01;

G03 I-#5;

G01 X[#5-1];

G0 Z100;

M30;

O2013（群孔）

#1=40； 最内圈孔圓心所在直徑

#2=30； 每列孔間隔

#3=12； 孔的列數

#4=10; 空間隔

#5=6； 每列孔個數

S1000 M3;

G54 G90 G00 X0 Y0 Z30

G16;

#6=1；

WHILE[#6 LE #3] DO 01;

#7=1；

WHILE[#7 LE #5] DO 02;

#8= #1/2 [#7-1]*#4

#9= [#6-1]*#2;

G98 G81 X#8 Y#9 Z-60 R3 F100;

#7=#7 1；

END 02;

#6=#6 1;

END 01;

G80 Z30;

G15;

M30;

O2013（可變式深孔鑽）

#1=3； 每次進給錢的緩沖高度

#2=20； 第一次鑽深

#3=0.5； 遞減比例

#4=35； 孔總深的

#5=5.； R點

M3 S1000;

G54 X0 Y0;

G0 Z#5;

WHILE[#4 GT 0] DO 01;

G01 Z-#2 F1000;

G0 Z#5;

Z[-#2 #1];

#7=#2*#3;

#2=#2 #7;

#4=#4-#2;

END 01;

G0 Z100;

M30;

O2014（銑平面）

#1=1000； 工件長度

#2=1000； 工件寬度

#3=10； 刀具直徑

#4=-#2/2； Y設為自變量，初始值賦值為-#2/2

#14=0.8*#3; 遞增量

#5=[#1 #3]/2 2.; 開始X坐标

S1000 M3;

G54 G90 G00 X0 Y0 Z30;

X#5 Y#4;

Z0;

WHILE[#4 LT #2/2] DO01;

G01 X-#5 F1000;

#4= #4 #14;

Y#4;

X#5;

#4= #4 #14;

Y#4;

END 01;

G0 Z30;

M30;

另一種編程方式

#1=1000； 工件長度

#2=1000； 工件寬度

#3=10； 刀具直徑

#4=-#2/2； Y設為自變量，初始值賦值為-#2/2

#14=0.8*#3; 遞增量

#5=[#1 #3]/2 2.; 開始X坐标

S1000 M3;

G54 G90 G00 X0 Y0 Z30;

X#5 Y#4;

Z0;

N01 G01 X-#5 F1000;

#4= #4 #14;

Y#4;

X#5;

#4= #4 #14;

Y#4;

IF [#4 LT #2/2] GOTO 01;

G0 Z30;

M30,

O2015（銑三角形）

#1=1000; 三角形高

#2=0.;

#3=1. X方向減增量

#4=1.5; Z方向遞減量

G43 Z53 H01;

WHILE [#1 GT 0] DO 01;

G01 Z#1 F1000;

X#2;

Z[#1-#4];

X[-#2-#3];

#2=[#2 #3];

#1=#1-2*#4；

END 01;

G0 Z300;

M30;

O2016（銑圓形）

基本數學知識

圓的方程式;

标準方程X2 Y2=R2

參數方程X=R*COSA

Y=R*SINA

在宏程序中SQRT是平方根的意思，例如#12= #2，那麼#1=SQRT#2

所以則有X=SQRT[R2-Y2]

Y=SQRT[R2-X2]

#1=50; 圓半徑

#4=1; 每次下降深度

#6=2500;半徑的平方

G43 Z60. H01;

WHILE[#1 GT -50] DO 01;

G01 Z#1 F2000;

#7=SQRT[#6-#1*#1];

X#7;

#5= #1-#4;

Z#5;

#8=SQRT[#6-#5*#5];

X-#8;

#1=#1-2*#4；

END 01;

Z200;

M30;

O2017（銑橢圓）

基本數學知識

橢圓方程

标準方程 X2/A2 Y2/B2=1

參數方程 X=A*COSα

Y=B*SINα （中心在原點）

其中A為長半軸B為短半軸

#1=50； 長半軸

#2=30； 短半軸

#3=0.；

G90 G1 X#1 Y0.;

G43 Z0. H01;

G01 Z-10.;

WHILE[#3 GT 360] DO 01;

#13= #1*COS#3;

#14= #1*SIN#3;

G01 X#13 Y#14 F1000;

#3= #3 1.;

END 01;

G0 Z100.;

M30;

O2018（銑球）

M3 S1000;

G0 G54 G90 X0 Y0 ;

#1=10;

#4=90;

G43 Z50 H21;

Z[#1 1];

WHILE[#4 GT -90] DO 01;

#5= #1*SIN#4;

#6= #1*COS#4;

G0 X#6 Y0;

GO Z#5 F1000;

G03 I-#6;

#4= #4-2;

END 01;

G0 Z200.;

M30;

O2019（兩個圓柱垂直相接）

#1=35.；

#10=1444;

#11=3364

#2=SQRT[#10-#1*#1];

#3=SQRT[#11-#2*#2]；

G54 G90 G80 X-#3 Y#2;

G43 Z40 H12;

G01 Z#1 F1000;

WHILE[#1 GT 0] DO01;

G01 Z#1;

#2=SQRT[#10-#1*#1]；

#3=SQRT[#11-#1*#1];

G02 X-#3 Y-#2 R-58 F1000;

#1= #1-2;

G01 Z#1 F1000;

#2=SQRT[#10-#1*#1]；

#3=SQRT[#11-#2*#2];

G03 X-#3 Y#2 R-58 F1000;

#1= #1-1；

END 01;

G0 Z100;

M30;

來源：網絡