《数控宏程序ppt》由会员分享，可在线阅读，更多相关《数控宏程序ppt（13页珍藏版）》请在金锄头文库上搜索。
1、铣床宏程序案例,椭圆凹槽,椭圆凸台,椭圆抛物线凸台,椭圆抛物线凹槽,O0001; G54 G40 G90 G00 X46 Y0; Z100; Z10; M3 S800; Z0; G41 G01 X30 D01 F200; X48 Y-12; #1=#2=#3=0; #4=1; WHILE#4 LE 10 DO 1;WHILE#1 GE -360 DO 2; #2=25*cos(#1+45)+30;#3=15*sin(#1+45)-30;G01 X#1 Y#3 Z-#4 ;#1=#1-0.5;END 2;#4=#4+2;END 1;,加工椭圆凸台，采用螺旋铣削,深度的循环,铣椭圆,#1=#2=#
2、3=0; WHILE#1 GE -360 DO 3; #2=25*cos(#1+45)+30;#3=15*sin(#1+45)-30;G01 X#1 Y#3 F100 ;#1=#1-0.5;END 3;G00 Z100 M5; G28 G91 Z0; M30,切削到10mm后再走一圈椭圆,G54 G40 G90 G00 X-30 Y30; Z100; Z10; M3 S800; Z0; G41 G01 X-12 Y48 D01 F200;#1=#2=#3=0; #4=1; WHILE#4 LE 10 DO 1;WHILE#1 LE 360 DO 2; #2=25*cos(#1+45)-30;#
3、3=15*sin(#1+45)+30;G01 X#1 Y#3 Z-#4 ;#1=#1+0.5;END 2;#4=#4+2;END 1;,#1=#2=#3=0 WHILE#1 LE 360 DO 2; #2=25*cos(#1+45)-30;#3=15*sin(#1+45)+30;G01 X#1 Y#3 F100 ;#1=#1+0.5;END 2;G00 Z100.; G28 G91 Z10 M5; M30;,椭圆凹槽,O002; G54 G40 G90 G00 X20 Y0; Z100; Z10; M3 S800; Z0; G41 G01 X5 F200 D01; X0; G68 X0 Y0
4、R-45 M98 P0003; G00 G69 Z100; G28 G91 Z0 M5; M30;,椭圆抛物线凸台 主程序,调用子程序顺时针旋转45度,O0003; #1=#2=#3=#4=#6=0; #5=20; WHILE#1 LE 10 DO 1;WHILE#2 LE 20 DO 2;#3=-3*#2*#2/20; G01 X#2 Y#3;#2=#2+0.5;END 2; WHILE#4 GE -180 DO 3;#5=20*cos#4;#6=15*sin#4-40; G01 X#5 Y#6 Z-#1; #4=#4-0.5;END 3; WHILE#5 GE 0 DO 4;#6=-3*#
5、5*#5/20; G01 X#5 Y#6;#5=#5-0.5;END 4;,#1=#1+2;END 1; M99;,第一层循环,第二层：抛物线,第二层：椭圆,第二层：抛物线,O0005; G54 G40 G90 G00 0 Y20; Z100; Z10; M3 S800; Z0; G41 G01 Y5 F200 D01; Y0; G68 X0 Y0 R-45 M98 P0006; G00 G69 Z100; G28 G91 Z0 M5; M30;O0006; #1=#2=#3=#4=#6=0; #5=20; WHILE#1 LE 10 DO 1;,WHILE#2 LE 20 DO 2;#3=3
6、*#2*#2/20; G01 X#2 Y#3;#2=#2+0.5;END 2; WHILE#4 LE 180 DO 3;#5=20*cos#4;#6=15*sin#4+40; G01 X#5 Y#6 Z-#1; #4=#4+0.5;END 3; WHILE#5 GE 0 DO 4;#6=3*#5*#5/20; G01 X#5 Y#6;#5=#5+0.5;END 4; #1=#1+2;END 1; M99;,椭圆抛物线凹槽,车床宏程序案例,椭圆,抛物线,O0001; T0101; G00 X42. Z2.; M3 S800; G71 U1. R0.5 F200; G71 P10 Q11 U0.3
7、 W0; N10 G01 Z0X31.Z-55.5 N11 X34. G00 X32. Z2.,用G70车圆柱，去除大部分余料,毛坯直径40x80,#1=#2=#3=#5=0; #4=30; G73 U15.5. W2. R7; G73 P20 Q21 U0.3 W0 ; N10 G01 X0 Z0;#2=40*cos(#1);#3=-15*sin(#1)-20.; G01 X#2 Z#3;#1=#1+0.5; IF#1 GT 90 GOTO 20; G01 Z-28. WHILE#4 GE 20 DO 1#5=#4*#4/80; G01 X#4 Z-#5;#4=#4-0.5;END 1 G02 X30. Z-56. R5. N21 G01 X40. G70 P20 Q21 F100 S1000; G00 Z100. X100. M5; M30;,车椭圆,车抛物线,谢谢,
