宏程序编程例子入门.doc

宏程序编程例题椭圆解析：椭圆关于中心、坐标轴都是对称的，坐标轴是对称轴，原点是对称中心。对称中心叫做椭圆中心。椭圆和X轴有2两个交点，和Y轴有两个交点，这四个交点叫做椭圆顶点。椭圆标准方程：x2 / a2 + y2 / b2 = 1 ( a为长半轴，b为短半轴，a b 0 )椭圆参数方程：x=a*cosM y=b*sinM ( a为长半轴，b为短半轴，a b 0 ，M是夹角，是椭圆上任意一点到椭圆中心连线与X正半轴所成的夹角，顺时针为负，逆时针为正。)二、数控车床：根据椭圆标准方程：x2 / a2 + y2 / b2 = 1 ( a为长半轴，b为短半轴，a b 0 )根据椭圆参数方程：x=a*cosM y=b*sinM ( a为长半轴，b为短半轴，a b 0 ，M是夹角，是椭圆上任意一点到椭圆中心连线与X正半轴所成的夹角，顺时针为负，逆时针为正。)可得车床标准方程：z2 / a2 + x2 / b2 = 1 ( a为长半轴，b为短半轴，a b 0 )可得椭圆参数方程：z=a*cosM x=2b*sinM ( a为长半轴，2b为短轴（直径），a b 0 ，M是夹角，是椭圆上任意一点到椭圆中心连线与Z正半轴所成的夹角，顺时针为负，逆时针为正。)通过标准方程推导X的表达式：x =b / a * SQRT a * a z * z a、b为长、短半轴是常数表示。（一）车床车削椭圆通常是加工椭圆X正方向部分（回转体），用标准方程车削椭圆时，通常设Z为自变量，通过方程把X表达出来，最多就是车削到180度椭圆，然后利用G01插补拟合成椭圆。通过椭圆车床标准方程推导，可以有如下过程：z2 / a2 + x2 / b2 = 1 可推导 x2 / b2 =1- z2 / a2 = a2 z2 / a2 可推导 x2 = b2 / a2 * a2 z2 x =b / a * SQRT a2 z2 转换为数控格式就为 x =2b / a * SQRT a * a z * z a为长半轴、2b为短轴（直径编程）常数表示。设z为自变量#1，则x为因变量#2，根据上述公式有：#2 =b / a * SQRT a * a - #1 * #1 例题：长半轴a=5，短半轴b=4的椭圆。有以下几种情况：1、 #1为z，为自变量：则#1=5 （#1=5 表示从Z正半轴开始加工。）N10 #2 = 8 / 5 * SQRT 5 * 5 - #1 * #1 G01 X #2+ D Z #2 + E F0.2 （X正，Z正，表示走逆时针,D、E表示椭圆中心X、Z绝对坐标）#1=#1-1IF #1 GE 0 GOTO10 这是加工第一象限的椭圆，90度椭圆。IF #1 GE -5 GOTO10 这是从第一象限加工到第二象限的椭圆，180度椭圆。2、 #1为x，为自变量：则#1=-5 （#1=-5 表示从Z轴负方向开始加工。）N10 #2 = 8 / 5 * SQRT 5 * 5 - #1 * #1 G01 X #2+ D Z -#2 + E F0.2 （X正，Z负，表示走顺时针，D、E表示椭圆中心X、Z绝对坐标）#1=#1 + 1IF #1 LE 0 GOTO10 这是加工第二象限的椭圆，90度椭圆。通常这是利用反刀加工。IF #1 LE 5 GOTO10 这是从第二象限加工到第一象限的椭圆，180度椭圆。正反刀都可以加工。关于D、E椭圆中心坐标位置的说明，D为直径表达，E的位置有三种：当E-a时（ #2 + E =0）,椭圆中心离工件原点相差一个长半轴距离。E=-a+时（ #2 + E 0），椭圆中心在Z轴上向右偏移，中心离工件原点距离小于一个长半轴。E=-a-时（ #2 + E 0），椭圆中心在Z轴上向左偏移，中心离工件原点距离大于一个长半轴。（二）车通过参数方程加工椭圆可以加工0-180度内任意角度，直接通过参数方程加工即可。例题：长半轴a=5，短半轴b=4的椭圆。有以下几种情况：1、设#1为M，为角度自变量，x、z为因变量：则#1=0 （#1=0 表示从0度开始加工，即Z正半轴开始加工,若写#1=90表示从X正半轴开始加工，其他以此类推）N10 Z = #2 = a * COS #1 X = #3 = 2b * SIN #1 G01 X #3 +D Z #2 + E F0.1（X正，Z正，表示走逆时针，D、E表示椭圆中心X、Z绝对坐标）#1=#1+1 ( + 表示走逆时针方向)IF #1 LE 90 GOTO10 这是加工第一象限部分，90度椭圆。IF #1 LE 180 GOTO10 这是从第一象限加工到第二象限的椭圆，180度椭圆。如果写LE180就是加工0-180度椭圆，其他任意角度以此类推。2、设#1为M，为角度自变量，x、z为因变量：则#1=180 （#1=180 表示从180度开始加工，即Z负半轴开始加工，其他任意角度以此类推）N10 Z = #2 = a * COS #1 X = #3 =2 b * SIN #1 G01 X #3 + D Z -#2 + E F0.1（X正，Z负，表示走顺时针，D、E表示椭圆中心X、Z绝对坐标）#1=#1-1 ( - 表示走顺时针方向)IF #1 GE 90 GOTO10 这是加工第二象限部分，90度椭圆。通常这是利用反刀加工。IF #1 GE 0 GOTO10 这是从第二象限加工到第一象限的椭圆，180度椭圆。正反刀都可以加工。通过可以通过参数方程和标准加工，通过上述举例可以发现，参数方程编程简单，程序简洁，可以加工任意角度的椭圆。关于椭圆的编程介绍到此为止。椭圆例题图形1方法1O0001N010 G99 G97 G21N020 T0101N030 S600 M03N040 G0 X45 Z5 M08N050 G73 U23 W0 R21N060 G73 P70 Q190 U0.5 W0.1 F0.2N070 G00 X0 S1000N080 G42 G01 Z0 F0.08N090 #101=20N100 WHILE#101GE0DO1N110 #102=26*SQRT1-#101*#101/20*20N120 G01 X#102 Z#101-20N130 #101=#101-0.1N140 END1N150 Z-30N160 G02 X36 Z-35 R5N170 G01 X38N180 X42 Z-37N190 X45N200 G70 P70 Q190N210 G40 G00 X100 Z100 M09N220 T0100 M05N230 M30%方法2O0002N010 G99 G97 G21N020 T0101N030 S600 M03N040 G0 X45 Z5 M08N050 G73 U23 W0 R21N060 G73 P70 Q180 U0.5 W0.1 F0.2N070 G00 X0 S1000N080 G42 G01 Z0 F0.08N090 #101=20N100 #102=26*SQRT1-#101*#101/20*20N110 G01 X#102 Z#101-20N120 #101=#101-0.1N130 IF#101GE0GOTO100N140 Z-30N150 G02 X36 Z-35 R5N160 G01 X38N170 X42 Z-37N180 X45N190 G70 P70 Q180N200 G40 G00 X100 Z100 M09N210 T0100 M05N220 M30图形2方法1O0001N010 G99 G97 G21N020 T0101N030 S600 M03N040 G0 X53 Z5 M08N050 G73 U25 W0 R23N060 G73 P70 Q210 U0.5 W0.1 F0.2N070 G00 X15.8 S1000N080 G42 G01 Z0 F0.08N090 X19.8 Z-2N100 Z-18N110 X20N120 Z-25N130 #101=20N140 WHILE#101GE0DO1N150 #102=18*SQRT1-#101*#101/20*20N160 G01 X#102 Z#101-45N170 #101=#101-0.1N180 END1N190 G01 X38N200 Z-60N210 X50N220 G70 P70 Q210N230 G40 G00 X100 Z100 M09N240 T0100 M05N250 M30%方法2O0001N010 G99 G97 G21N020 T0101N030 S600 M03N040 G0 X53 Z5 M08N050 G73 U25 W0 R23N060 G73 P70 Q200 U0.5 W0.1 F0.2N070 G00 X15.8 S1000N080 G42 G01 Z0 F0.08N090 X19.8 Z-2N100 Z-18N110 X20N120 Z-25N130 #101=20N140 #102=18*SQRT1-#101*#101/20*20N150 G01 X#102 Z#101-45N160 #101=#101-0.1N170 IF#101GE0GOTO140N180 G01 X38N190 Z-60N200 X50N210 G70 P70 Q200N230 G40 G00 X100 Z100 M09N240 T0100 M05N250 M30%图形2 切槽与螺纹均不编图形3O0001N010 G99 G97 G21N020 T0101N030 S700 M03N040 G00 X53 Z2 M08N050 G73 U25 W0 R23N060 G73 P70 Q230 U0.5 W0.1 F0.2N070 G00 X0 S1000N080 G42 G01 Z0 F0.08N090 G03 X16 Z-8 R8N100 G01 X19.4N110 X20 Z-8.3N120 Z-12.14N130 X22.98N140 #101=0N150 #102=30*SQRT1-#101*#101/20*20N160 G01 X52.98-#102 Z#101-12.14N170 #101=#101-0.1N180 IF#101GE-12.86GOTO150N190 G01 X32N200 X35.8 Z-27N210 Z-50N220 X46N230 X48 Z-51N240 G70 P70 Q230N250 G40 G00 X100 Z100 M09N260 T0100 M05N270 M30N280%图形3 切槽与螺纹均不编图形4O0001N010 G99 G97 G21N020 T0101N030 S700 M03N040 G00 X52 Z2 M08N050 G73 U12 W0 R10N060 G73 P70 Q200 U0.5 W0.1 F0.2N070 G00 X26 S1000N080 G42 G01 Z0 F0.08N090 G01 X30 Z-2N100 G01 Z-5N110 X36N120 G03 X40 Z-14.445 R20N130 Z-17.445N140 #101=14N150 #102=16*SQRT1-#101*#101/14*14N160 G01 X44-#102 Z#101-31N170 #101=#101-0.1N180 IF#101GE-14GOTO150N190 G01 X44N200 Z-51N210 G70 P70 Q200N220 G40 G00 X100 Z100 M09N230 T0100 M05N240 M30N250%图形4 切槽与螺纹均不编图形5O0001N010 G99 G97 G21N020 T0101N030 S700 M03N040 G00 X62 Z2 M08N050 G73 U13 W0 R10N060 G73 P70 Q190 U0.5 W0.1 F0.2N070 G00 X51 S1000N080 G42 G01 Z0 F0.08N090 G01 X52 Z-0.5N100 G01 Z-18.794N110 #101=25N120 #102=24*SQRT1-#101*#101/25*25N130 G01 X58-#102 Z#101-43N140 #101=#101-0.1N150 IF#101GE0GOTO120N160 G01 Z-43N170 X51N180 X52 Z-44N190 X60N200 G70 P70 Q190N210 G40 G00 X100 Z100 M09N220 T0100 M05N230 M30N240图形6O0001N010 G97 G99 G21N020 T0101N030 S600 M03N040 G0 X53 Z5 M08N050 G73 U10 W0 R9N060 G73 P70 Q180 U0.5 W0 F0.2N070 G00 X38N080 G42 G01 Z0 S1200 F0.06N090