宏程序编程例子入门

宏程序编程例题椭圆解析： 椭圆关于中心、坐标轴都是对称的，坐标轴是对称轴，原点是对称中心。对称中心叫做椭圆中心。椭圆和X轴有2两个交点，和 Y轴有两个交点,这四个交点叫做椭圆顶点。椭圆标准方程：x2 / a 2 + y2 / b 2 = 1 （ a 为长半轴， b 为短半轴， a > b > 0 ）椭圆参数方程： x=a*cosMy=b*sinM （ a 为长半轴， b 为短半轴， a > b > 0 ， M 是夹角，是椭圆上任意一点到椭圆中心连线与X 正半轴所成的夹角，顺 时针为负，逆时针为正。 ）二、数控车床：根据椭圆标准方程： x2 / a 2 + y 2 / b 2 = 1 （ a 为长半轴， b 为短半轴， a > b > 0 ）根据椭圆参数方程： x=a*cosMy=b*sinM （ a为长半轴，b为短半轴， a > b > 0 , M是夹角，是椭圆上任意一点到椭圆中心连线与X 正半轴所成的夹 角，顺时针为负，逆时针为正。 ）2 2 2 2可得车床标准方程：z / a + x / b = 1 （ a为长丰轴，b为短*轴，a > b >0 ）可得椭圆参数方程： z=a*cosMx=2b*sinM （ a 为长半轴， 2b 为短轴（直径）， a > b > 0 ， M 是夹角， 是椭圆上任意一点到椭圆中心连线与 Z 正半轴所成的夹角，顺时针为负，逆时针为正。 ）通过标准方程推导 X 的表达式： x =b / a * SQRT a * a b 为长、短半轴是常数表示。X 正方向部分（回转体） ，用标准方程车常设 Z 为自变量，通过方程把X 表达出来，最多就是车削到 180 度椭圆，然后利用 G01 插 补拟合成椭圆。通过椭圆车床标准方程推导，可以有如下过程：z2 / a 2 + x2 / b 2 = 12 2 2 2 2 2 2可推导 x / b =1- z / a = a - z / a可推导 x2 = b 2 / a 2 * a 2 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 + DZ -#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方法 1O0001N020 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 R5N180 X42 Z-37N190 X45N200 G70 P70 Q190N210 G40 G00 X100 Z100 M09N220 T0100 M05N230 M30%方法 2O0002N010 G99 G97 G21N020 T0101N040 G0 X45 Z5 M08N050 G73 U23 W0 R21N060 G73 P70 Q180 U0.5 W0.1 F0.2N080 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方法 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 G21N030 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 Q200N230 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.08O0001N110 #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 M30N240N010 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 #101=0N100 #102=38*SQRT1-#101*#101/50*50N110 G01 X#102 Z#101N120 #101=#101-0.1N130 IF#101GE-30.7GOTO100N140 G01 Z-36N160 G01 X47N170 X48 Z-40.5N180 X50N190 G70 P70 Q180N200 G40 G00 X100 Z100 M09N210 T0100 M05N220 M30N230O0001N020 T0101N040 G0 X73 Z5 M08N050 G73 U13 W0 R11N060 G73 P70 Q160 U0.5 W0 F0.2N070 G00 X44N080 G42 G01 Z0 S1200 F0.06N090 #101=20N100 #102=24*SQRT1-#101*#101/20*20N110 G01 X#102+44 Z#101-20N120 #101=#101-0.1N130 IF#101GE0GOTO100N140 G01 X68N150 Z-90N160 X70N170 G70 P70 Q160N190 T0100 M05N200 M30N210