数控铣宏程序实例

G90 G54 GOO Z100; G00 X0 Y0; G00 Z3; #1=0

N99#2 =φ/2+R*SIN［#1］-r #3 = R*SIN［#1］ G01 X#2 Y0 F300; G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300; #1=#1+1;

IF［#1LE90］GOTO99; G00 Z100; M30;

例3 球刀倒凸圆角

已知孔口直径φ，孔口圆角半径R,球刀半径r 建立几何模型 设定变量表达式

#1=θ=0（θ从0°～90°，设定初始值#1=0） #2=X=φ/2 +R-［R+r］*SIN［#1］ #3=Z=R-［R+r］*COS［#1］+r =［R+r］*［1-COS［#1］］ 程序 Ｏ0001; S1000 M03;

G90 G54 GOO Z100; G00 X0 Y0; G00 Z3; #1=0

N99#2 =φ/2 +R-［R+r］*SIN［#1］； #3=［R+r］*［1-COS［#1］］ G01 X#2 Y0 F300; G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300; #1=#1+1;

IF［#1LE90］GOTO99; G00 Z100; M30;

例4 球刀倒凹圆角

已知内口直径φ，孔口圆角半径R,球刀半径r 建立几何模型 设定变量表达式

#1=θ=0（θ从0°～90°，设定初始值#1=0） #2=X=φ/2 +R*COS［#1］-r #3=Z=R*SIN［#1］ 程序 Ｏ0001; S1000 M03;

G90 G54 GOO Z100; G00 X0 Y0; G00 Z3; #1=0

N99#2 =φ/2 +R*COS［#1］-r； #3= R*SIN［#1］ G01 X#2 Y0 F300; G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300; #1=#1+1;

IF［#1LE90］GOTO99; G00 Z100; M30;

4.4 孔口倒斜角 （编程思路：以若干不等半径整圆代替环形斜面）

例1 平刀倒孔口斜角

已知内孔直径φ 倒角角度θ 倒角深度Ζ1 建立几何模型 设定变量表达式

#1=θ=0（θ从0变化到Ζ1设定初始值#1=0） #2=X=φ/2 +Ζ1*COT［θ］-#1*COT［θ］-r 程序

Ｏ0001; S1000 M03;

G90 G54 GOO Z100; G00 X0 Y0; G00 Z3; #1=0;

WHILE［#1LEΖ1］DO1;

#2=φ/2 +Ζ1*COT［θ］-#1*COT［θ］-r; G01 X#2 Y0 F300; G01Z-#1 F100;

G03X#2 Y0 I-#2 J0 F300; #1=#1+O.1; END1;

G00 Z100; M30;

例2 球刀倒孔口斜角

已知内孔直径φ 倒角角度θ 倒角深度Ζ1 建立几何模型

首先求出 Z2=r-r*COS［θ］ X2= r*SIN［θ］ 设定变量表达式

#1=Z=Z2 (Z由Z2变化到Z1+Z2)

#2=X=φ/2 +Ζ1*COT［θ］-［Z-Z2］*COT［θ］-X2

=φ/2 +Ζ1*COT［θ］-r*SIN［θ］-［#1-r+r*COS［θ］*COT［θ］ =φ/2+［Z-#1+r-r*COS［θ］*COT［θ］］-r*SIN［θ］

程序 Ｏ0001; S1000 M03;

G90 G54 GOO Z100; G00 X0 Y0; G00 Z3; #1=Z2;

WHILE［#1LE(Ζ1+Z2)］DO1;

#2=φ/2+［Z-#1+r-r*COS［θ］*COT［θ］］-r*SIN［θ］; G01 X#2 Y0 F300; G01 Z-#1 F100;

G03 X#2 Y0 I-#2 J0 F300; #1=#1+0.1; END1;

G00 Z100; M30;

4.3 多元素倒角 编程思路：通过改变半径补偿值改变加工轮廓的实际大小以若干个轮廓线代替轮廓曲面

运用指令：G10 L12 P 半径补偿号 R 半径补偿值

须知基本概念：刀具半径补偿值=刀具中心到加工轮廓的距离 例1 平刀倒多元素圆角

已知周边圆角半径R,刀具半径r 建立几何模型如图所示 设定变量表达式

#1=θ=0（θ从0°～90°设定初始值#1=0） #2=D=R*SIN［#1］+r-R(D有可能是负值) #3=Z= R-R*COS［#1］ 程序

Ｏ0001; S1000 M03;

G90 G54 G40 G00 Z100; G00 XO Y-3O; GOO Z3;

#1=0; N99#2= R*SIN［#1］+r-R; #3= R-R*COS［#1］; G01 Z-#3 F100; G10 L12 P1 R#2; D01 M98 P100 F3OO; #1=#1+1； IF［#1LE90］GOTO99; G00 Z100; M30;

子程序 Ｏ100;

G41 G01 X0 Y-15 G01 X-13;

G02 X-13 Y15 R15; G01 X13;

G02 X13 Y-15 R15; G01 X0 Y-15; G40 G01 X0 Y-30;