840D常用编程实例PDF.pdf

  • 格式:pdf
  • 大小:677.31 KB
  • 文档页数:13

书 山 有 路 1 使用Φ200铣刀加工900×2000平面 XPM N05 G00 G17 G54 G90 Z200 N10 X-110 Y90 N15 M3 S150 F500 /N20 GOTOF AAA N25 Z4 N30 G01 X2000 N35 Y270 N40 X0 N45 Y450 N50 X2000 N55 Y630 N60 X0 N65 Y810 N70 X2000 N75 G00 Z100 N80 X-110 Y90 AAA:Z0 N85 G01 X2000 N90 Y270 N95 X0 N100 Y450 N105 X2000 N110 Y630 N115 X0 N120 Y810 N125 X2000 N130 G00 Z100 M05 N135 M02 书 山 有 路

2 图17 利用无限循环,使用Φ200铣刀加工900×2000平面 XPM1 N05 G00 G17 G54 G90 Z200 N10 X-110 Y90 N15 M3 S150 F500 N20 Z4 N25 AAA: G01 X2000 N30 Y=IC(180) N35 X0 N40 Y=IC(180) N45 GOTOB AAA N50 M02 书 山 有 路

3 图18 (2)条件转向 条件语句形式为:“IF 条件表达式 GOTOB/GOTOF 跳转标记名”。 当条件满足,程序将会跳转到指定的目标。条件表达式所用的条件运算符包括: ==(等于)、<>(不等于)、>(大于)、>=(大于等于)、<(小于)、<=(小于等于)、AND 与、OR 或、NOT 非、XOR 异或。 例如:使用变量编程加工抛物线 Y=0.5X2

图19 PWX R1=10 G00 G54 G90 Z100 X10 Y50 书 山 有 路 4 M3 S1000 F200 Z0 AA: R1=R1-0.1 G01 X=R1 Y=POT(R1)/2 IF R1>-10 GOTOB AA G00 Z100 M5 M02

左下角为:X0、Y0 上面为:Z0 Φ20铣刀加工 螺旋铣孔 XK N05 T1 N10 G00 G54 G90 Z200 N15 M03 S2000 F500 ; 1 N20 TRANS X100 Y100 N25 R1=35 N30 XK1 N35 TRANS ; 2 N40 TRANS X100 Y900 书 山 有 路 5 N45 R1=35 N50 XK1 N55 TRANS ; 3 N60 TRANS X750 Y900 N65 R1=30 N65 XK1 N70 TRANS ; 4 N75 TRANS X750 Y100 N80 R1=30 N85 XK1 N90 TRANS ; 5 TRANS X1400 Y100 N100 R1=25 N105 XK1 N110 TRANS ; 6 TRANS X1400 Y900 N120 R1=25 N125 XK1 N130 TRANS G00 Z200 M05 M02 子程序 XK1 X0 Y0 Z5 G01 G41 X19 D1 Z0 G03 X19 Y0 Z-20 I-19 J0 TURN=9 G03 I-19 G01 G40 X0 G00 Z5 G01 G41 X=R1 D1 Z0 G03 X=R1 Y0 Z-20 I= -R1 J0 TURN=9 G03 I= -R1 G01 G40 X0 G00 Z200 M17

ZK(钻孔) N05 G00 G54 G90 Z100 N10 X0 Y0 N15 M03 S500 F100 N20 MCALL CYCLE83(100,0,5,-55,,-8,,2,,,1) N25 HOLES2(0,0,300,100,10,35) N30 MCALL N35 G00 Z100 M05 M02 书 山 有 路 6 GS(攻丝) N05 G00 G54 G90 Z100 N10 X0 Y0 N15 M03 S50 F125 N20 MCALL CYCLE840(100,0,5,-55,,,4,3,1) N25 HOLES2(0,0,300,100,10,35) N30 MCALL N35 G00 Z100 M05 M02

椭圆参数方程:X=30×COS(Θ) Y=20×SIN(Θ) 程序如下 O0001 R1=0 N005 G00 G54 G90 Z100 N010 X60 Y0 N015 M03 S600 F500 N020 Z-5 N025 G42 X45 Y-15 N030 G02 X30 Y0 CR=15 AA: R1=R1+1 N035 G01 X=30*COS(R1) Y=20*SIN(R1) N040 IF R1<360 GOTOB AA 书 山 有 路 7 N045 G02 X45 Y15 CR=15 N050 G00 G40 X60 Y0 N055 Z200 M05 M30

G54 X0 Y0 孔中心,Z0 上表面。 R4:角度变量(0°~90°) X=17-COS(R4)*6 Z=6*(SIN(R4)-1) 程序 DYJ(倒圆角) N05 R4=0 N10 G00 G54 G90 Z100 N15 X0 Y0 N20 Z3 M03 S4000 F1000 AA:R4=R4+2 N25 G01 Z=6*(SIN(R4)-1) N30 X=17-COS(R4)*6 N35 G02 I= COS(R4)*6-17 N40 IF R4<90 GOTOB AA N45 G00 Z100 M05 N50 M02

程序(使用变量) 书 山 有 路

8 DYJ(倒圆角) R1=倒角孔直径 R2=倒角圆半径 R3=刀半径 R4=角度变量 N05 G00 G54 G90 Z200 N10 X0 Y0 N15 Z3 M03 S4000 F2000 AA:R4=R4+2 N20 G01 Z=(SIN(R4)-1)*(R2+R3) N25 X=R1/2+R2-COS(R4)*(R2+R3) N30 G02 I=COS(R4)*(R2+R3)-R1/2-R2 N35 IF R4<90 GOTOB AA N40 G00 Z100 M05 M02 书 山 有 路

9 XYZ N05 T1 G17 N10 R1=0.01 R2=0 N15 G00 G54 G90 Z100 N20 X40 Y0 N25 Z=R2 N30 M3 S2000 F1000 AA: G01 G42 X=R1 D1 N35 G03 I-R1 N40 R1=R1+0.5 R2=R2-1 N45 G40 G01 X=40 Z=R2 N50 IF R1<25 GOTOB AA N55 G00 Z100 M5 M02 书 山 有 路

10 设定;Φ20中心为X0、Y0。 25尺寸右端为Z0。 使用Φ20、R0.8平面铣刀加工。 程序: AAA N05 T1 N10 G00 G54 G90 Z100 N15 X0 Y0 N20 M03 S3000 F500 N25 Z5 N30 G01 G41 X10 Y0 D1 N35 Z0 N40 G02 X10 Y0 Z-15 I-10 J0 TURN=14 N45 I-10 N50 G01 G40 X40 N55 Y5 N60 R1=0 BB:R1=R1+0.5 N65 Z=-15-COS(R1)×10 N70 G01 G41 X=10+SIN(R1)×10 D1 N75 Y0 N80 G02 I=-10- SIN(R1)×10 N85 G01 Y-5 N90 G40 X40 N95 Y5 N100 IF R1<90 GOTOB BB N105 G00 Z100 M05 M02 书 山 有 路 11 SR N05 R1=10(圆半径) N10 R2=4(刀半径) N15 R3=30(坐标旋转) N20 R10=0 (变量) N25 G00 G19 G54 G90 Z200 N30 ROT Z=R3 N35 X101 Y=-R1-R2 N40 M3 S2000 F1500 N45 Z=R1+5 N50 G01 Z=-R2 II:R10=R10-0.2 N55 G01 X=101+R10 N60 G02 Y=R1+R2 CR=R1+R2 N65 R10=R10-0.2 N70 G01 X=101+R10 N75 G03 Y=-R1-R2 CR=R1+R2 N80 IF R10>=0 GOTOB II N85 ROT N90 G00 G17 Z200 M05 M02 书 山 有 路 12 DYJ N05 T1 N10 R1=30 R2=2 R3=4 R4=0 N20 G00 G54 G90 Z200 N25 X=R1+R3+3 Y5 N30 M03 S3000 F2000 N35 Z2 AA:R4=R4+1.5 N40 $TC_DP6[1,1]=(R3+R2)×COS(R4)-R2 N45 G01 Z=(R2+R3)×(SIN(R4)-1) N50 G42 X=R1 D1 N55 Y20 N60 G03 X20 Y30 CR=10 N65 G01 X0 N70 Y0 N75 X30 N80 Y5 N85 X=R1+$TC_DP6[1,1] N90 IF R4<=90 GOTOB AA N95 G00 Z200 M05 M02