螺纹PF加工程序!230

螺纹PF加工程序!230 &HE: % T300 :0001(FRONT PIN ONLY) G04 M70 #2008=#509 M71 G04 :8011(PIN NAIKEI) M79 G04 G51T3M41 M98P9001(FRONT MAIN) M107 M93 N705 G04 M110 M705 IF[[#509-#28]LT48.0]GOTOG99G97G40G00U-5.0Z50.0M30 960 S#131M03 M01 IF[[#23-#21]LT0.0]GOTO90 G04 0 M98P8011(PIN NAIKEI) IF[[#23-#21]LT1.6]GOTO1 G04 IF[[#23-#21]LT7.0]GOTO2 T500 IF[[#23-#21]LT12.0]GOTO3 :9001(FRONT PIN MAIN) M95 IF[[#23-#21]LT19.5]GOTO4 M100 M98P[#500+13](PIN IF[[#23-#21]LT26.0]GOTO5 IF[#2308EQ1]GOTO1 FRONT ARA) GOTO900 M98P0013(FRONT BOX T200 N1(45 MENTORI) OFFSET) M98P[#500+15](PIN NEZI M111 N1 SHIAGE) X[#21-6.0]M08 M101 T400 Z3.0 M102 M94 G01Z-[[#23-[#21-3.0]]/2]F1.G04 M98P8017(MIZO) 0 G04 M108 X[#21-3.0]F0.3 G04 M05S20 X[#23+4.0]Z2.0F0.3 M98P9110(DETA /M89 G00Z5.0 UKETORI) M109 G41X[#23+10.0] G04 /M81T[[#2032]*100] G01X[#21-3.0]Z-[[#23-[#21-M103 #2032=3.0 3.0]]/2]F0.2 G28U0W0 #2005=0 G00G40Z10.0 M104 #2105=0 GOTO10 /M81 G04 N2(2 PASS) G04 M110 M111 N999 /1/3GOTO999 X[#21-4.0]M08 G04 G04 Z1.0 M105 M30 G01Z-2.0F0.6 G04 N960 X[#21+2.0]Z1.0 G04 #3000=180(REAR#2008 G00Z5.0 G04 INPUT MIS) G41X[#23+3.465] G04 M99 G01Z3.0F0.6 #509=#100 X[#21-3.0]Z-[[#23-[#21-3.0]G04 ]/2/TAN[30]]F0.3 M106 G00G40Z10.0 G04 GOTO10 N3(3 PASS) M111 G04 M111 G41X[#23-18.0+3.465]M08 G04 G41X[#23-7.0+3.465]M08 Z10.0 #10=ROUND[#20]*100+#5 Z10.0 G01Z3.0F1.0 #11=#[2010+#5]+#5021-#50 G01Z3.0F0.5 X#21Z-[[#23-18.0-#21]/2/T81 X#21Z-[[#23-7.0-#21]/2/TAAN[30]]F0.65 #12=#[2110+#5]-#509+#502 N[30]]F0.5 G00G40Z6.0 2-#5082 G00G40Z6.0 G41X[#23-12.0+3.465] G50X#11Z#12S#19 G41X[#23-2.0+3.465] G01Z3.0F1.2 G99G97U-#[2000+#5]W-#[2 G01Z3.0F0.5 X#21Z-[[#23-12.0-#21]/2/T100+#5]M#13T#10 X#21Z-[[#23-2.0-#21]/2/TAAN[30]]F0.62 G04 N[30]]F0.35 G00G40Z6.0 #112=#5041 G00G40Z6.0 G41X[#23-7.0+3.465] #113=#5042 G41X[#23+3.465] G01Z3.0F1.2 #114=#3002 G01Z3.0F0.5 X#21Z-[[#23-7.0-#21]/2/TAM99 G01X[#21-3.0]Z-[[#23-[#21-N[30]]F0.62 3.0]]/2/TAN[30]]F0.25 G00G40Z6.0 G00G40Z10.0 G41X[#23-2.0+3.465] GOTO10 G01Z3.0F1.2 N4(4 PASS) X#21Z-[[#23-2.0-#21]/2/TA M111 N[30]]F0.62 G41X[#23-12.0+3.465]M08 G00G40Z6.0 Z10.0 G41X[#23+3.465] :9110(DETA UKETORI) G01Z3.0F0.5 G01Z3.0F1.2 M910 X#21Z-[[#23-12.0-#21]/2/TX[#21-3.0]Z-[[#23-[#21-3.0]M920 AN[30]]F0.38 ]/2/TAN[30]]F0.5 G04 G00G40Z6.0 G00G40Z10.0 G04 G41X[#23-7.0+3.465] N10 G04 G01Z3.0F1.0 N15G83 G04 X#21Z-[[#23-7.0-#21]/2/TAM99 #4=#100 N[30]]F0.38 N900 #6=#101 G00G40Z6.0 #3000=181(U,W INPUT #9=#102 G41X[#23-2.0+3.465] MISS) #20=#103 G01Z3.0F1.0 M99 #21=#104 X#21Z-[[#23-2.0-#21]/2/TA #22=#105 N[30]]F0.38 #23=#106 G00G40Z6.0 #7=#107 G41X[#23+3.465] #3=#108 G01Z3.0F1.0 G04 X[#21-3.0]Z-[[#23-[#21-3.0]:9010#5=#20(G51 SOFT G04 ]/2/TAN[30]]F0.43 G50) G04 G00G40Z10.0 IF[#5LE6]GOTO1 M930 GOTO10 #5=#5-6 M940 N5(5 PASS) N1G40G00G50 G04 G04 M980 #2115=[#2115-[#2105]] G04 M99 #2005=0 G04 #2007=0 #25=#100 #2105=0 #27=#101 #2107=0 #28=#102 #2308=1 #29=#103 #2032=3.0 #32=#104 G04 #130=#105 :0011(FRONT PIN M99 #500=#106 OFFSET) #501=#107 #2011=[#2011-[#2001]] G04 #2012=[#2012-[#2002]] G04 #2014=[#2014-[#2004]] G04 #2016=[#2016-[#2006]] M950 #2111=[#2111-[#2101]] M960 #2112=[#2112-[#2102]] G04 #2114=[#2114-[#2104]] G04 #2116=[#2116-[#2106]] :0015(FRONT OFFSET G04 #2001=0 CHECK) G04 #2002=0 IF[#2011GT312.0]GOTO91#2020=#100 #2004=0 0 G04 #2006=0 IF[#2111GT700.0]GOTO910 G04 #2007=0 IF[#2012GT320.0]GOTO92G04 #2101=0 0 M970 #2102=0 IF[#2112GT690.0]GOTO92#1=ATAN[#20]/[2] #2104=0 0 #2=[[[#25-[#28-15.875]*#20#2106=0 IF[#2014GT320.0]GOTO94-#22]/2]*SIN[90-#1]/SIN[30#2107=0 0 -#1]]*COS[30] #2308=0 IF[#2114GT690.0]GOTO94#8=#25-[#28-15.875+#9]*#2#2032=1.0 0 0 G04 IF[#2016GT315.0]GOTO96#14=[#28+#9-9.5-#6*TAN[3M99 0 0]] IF[#2116GT688.0]GOTO96#15=[#28+#9-9.5-#6*TAN[3 0 0]] IF[#3LE12.0]GOTO2 #131=FIX[120000/[#27*3.1 N1 4]] IF[#2013LT440.0]GOTO930 #132=FIX[115000/[#27*3.14 IF[#2013GT450.0]GOTO93]] 0 #133=FIX[85000/[#27*3.14] IF[#2113GT530.0]GOTO93] :0013(FRONT BOX 0 G04 OFFSET) IF[#2015LT430.0]GOTO950 G04 G04 IF[#2015GT500.0]GOTO95G04 #2015=[#2015-[#2005]] 0 IF[#2115GT550.0]GOTO95M96 GOTO5 0 G99G97G00G40X#24Z-[#2G04 GOTO3 8-10.0] G04 N2 X[#27+5.0]M08 N4 IF[#2013LT426.0]GOTO930 G01X#27F[5*.2] G99G97G40G00X[#29-[#28IF[#2013GT450.0]GOTO93Z-[#28-2.0]F[2*.25] -15.875+15.0]*#20]Z15.0M00 Z-[#28-0.5]F[1*.3] 8 IF[#2113GT545.0]GOTO93M505 M200 0 N5S[#133*.65]M03 G97S#130M03 IF[#2015LT436.2]GOTO950 Z-[#28+0.66]F0.15 N5 IF[#2015GT495.0]GOTO95G04U0.2 #5=0 0 G01W1.0F0.3 G00X[#8+4.95]Z[#9+0.983] IF[#2115GT554.1]GOTO95M506 M98P1014(1 PASS) 0 G00Z-[#28-10.0]M09 G00X[#8+4.03]Z[#9+0.769] N3 G28U0.0 M98P1014(2 PASS) M99 G28W0.0 #5=1 N910 M507 G04 #3000=181(OFFSET 11 /M61 G00X[#8+2.77]Z[#9+0.475] INPUT MISS) G83 M202 N920 M99 M98P1014(4 PASS) #3000=182(OFFSET 12 G00X[#8+1.85]Z[#9+0.261] INPUT MISS) M98P1014(6 PASS) N930 G00X[#8+1.09]Z[#9+0.084] #3000=183(OFFSET 13 M98P1014(8 PASS) INPUT MISS) G83 N940 M99 #3000=184(OFFSET 14 N910 INPUT MISS) :1013(V0.38R FRONT #3000=181(#500 DETA N950 ARA) ERROR) #3000=185(OFFSET 15 IF[#500NE1000.0]GOTO91M99 INPUT MISS) 0 N960 T600 #3000=186(OFFSET 16 M96 INPUT MISS) G51T1 M99 M91 IF[#7EQ0.0]GOTO4 G99G97G40G00X[#29-[#28 -15.875+15.0]*#20]Z15.0M0 8 :1014(V0.38R FRONT ARA M200 SUB) M05 IF[#5EQ0]GOTO1 G04U1.0 M210 :8017(MIZO) M201 N1 G51T6 G97S#130M04 G32U[#14*#20]W-#14E#4R 5.0 G32U15.0W-12.99E4.997 ERROR) G32U16.19W-2.946E17.446G00Z[[#9-0.15]+#2107-#202M99 R5.0 0] G00Z15.0 X[[#8-0.2]+#2007+#2020*# M99 20] G32U[[#9+#2]*#20]W-[#9+ #2]E#4 G32U1.294W-1.12E3.637 G32U15.0W-12.99E4.997 G00Z#9 :9017(G83 RETURN TO GOTO7 TOOL) G00Z[[#9+0.15]+[#2107]] #28=FIX[#4120/100]*100 N6G00Z[[#9+0.15]+[#2107]G04 :1015(V0.38R NEZI ] G04 SHIAGE) X[[#8-0.373]+[#2007]] G04 IF[#500NE1000.0]GOTO91G32U[[#9+#2]*#20]W-[#9+G97G00G40X#112Z#113T#0 #2]E#4 28M09 IF[#7EQ0.0]GOTO4 G32U1.467W-1.271E4.124 #112=#0 G51T4 G32U15.0W-12.99E4.997 #113=#0 M94 G00Z[[#9-0.15]+[#2107]] G28U0W0 G97S#130M04 X[[#8-0.2]+[#2007]] G04 GOTO5 G32U[[#9+#2]*#20]W-[#9+M99 G04 #2]E#4 G04 G32U1.294W-1.120E3.637 N4 G32U15.0W-12.99E4.99 G51T2 G00Z#9 M92 N7 G97S#130M03 X#8 N5 G32U[#15*#20]W-#15E#4R G00X[#29-[#28-15.875+15.5.0 :1513(SST NEZI ONLY) 0]*#20]Z15.0M08 G32U16.19W-2.9463E17.44IF[#500NE1500.0]GOTO91G00X[#8+0.18]Z#9 6 0 G32U[#15*#20]W-#15E#4RG00U10.0 G51T1 5.0 IF[#7EQ0.0]GOTO9 M91 G32U16.19W-2.9463E17.44G04 IF[#7EQ0.0]GOTO4 6 M05 G99G97G40G00X[#29-[#28IF[#3NE58.0]GOTO6 G04U1.0 -15.875+15.0]*#20]Z15.0M0G00Z[[#9+0.15]+#2107-#20N9 8 20] M500 M200 X[[#8-0.373]+#2007+#2020S#131M03 M05 *#20] G83 G04U1.0 G32U[[#9+#2]*#20]W-[#9+M99 M201 #2]E#4 N910 G97S#130M04 G32U1.467W-1.271E4.124 #3000=181(#500 DETA GOTO5 G04 G04 G32U[#15*#20]W-#15E#4RG04 G04 5.0 N4 N4 G32U16.19W-2.946E17.446G99G97G40G00X[#29-[#28G97S#130M03 R5.0 -15.875+15.0]*#20]Z15.0M0N5 G00U10.0 8 G00X[#29-[#28-15.875+15.IF[#7EQ0.0]GOTO9 M200 0]*#20]Z15.0M08 G04 G97S#130M03 G00X[#8+0.685]Z#9 M05 N5 G32U[#15*#20]W-#15E#4RG04U1.0 #5=0 5.0 N9 G00X[#8+5.43]Z[#9+0.983] G32U16.19W-2.946E17.446M500 M98P1014(1 PASS) R5.0 S#131M03 G00X[#8+4.51]Z[#9+0.769] G00Z#9 G83 M98P1014(2 PASS) X[#8+0.49] M99 #5=1 G32U[#15*#20]W-#15E#4RN910 G04 5.0 #3000=181(#500 DETA G00X[#8+3.25]Z[#9+0.475] G32U16.19W-2.946E17.446ERROR) M202 R5.0 M99 M98P1014(4 PASS) G00Z#9 G00X[#8+2.33]Z[#9+0.261] X[#8+0.295] M98P1014(6 PASS) G32U[#15*#20]W-#15E#4R G00X[#8+1.57]Z[#9+0.084] 5.0 M98P1014(8 PASS) G32U16.19W-2.946E17.446 G83 R5.0 M99 G00Z#9 N910 X[#8+0.1] :0003(FRONT BOX ONLY) #3000=181(#500 DETA G32U[#15*#20]W-#15E#4RM70 ERROR) 5.0 M71 M99 G32U16.19W-2.946E17.446M79 R5.0 M98P9003(FRONT BOX G00Z[[#9+0.15]+[#2107]] MAIN) X[[#8-0.373]+[#2007]] N705 G32U[[#9+#2]*#20]W-[#9+M705 #2]E#4 M30 G32U1.467W-1.271E4.124 G32U15.0W-12.99E4.997 :1515(SST NEZI ONLY) G00Z[[#9-0.15]+[#2107]] IF[#500NE1500.0]GOTO91X[[#8-0.2]+[#2007]] 0 G32U[[#9+#2]*#20]W-[#9+ G51T2 #2]E#4 :9003(FRONT BOX MAIN) M92 G32U1.294W-1.120E3.637 M300 IF[#7EQ0.0]GOTO4 G32U15.0W-12.99E4.99 IF[#2308EQ0.0]GOTO1 G97S#130M04 G00Z#9 M98P0011(FRONT BOX GOTO5 X#8 OFFSET) N1 M98P[#503+37] BOX) M301 N2 M810 M302 M321 M820 G04 M05S0 G04 G04 G04U1.0 G04 G04 M308 G04 M98P9330(DETA /M61 G04 UKETORI) M05S50 #4=#100 G04 G04 #6=#101 M303 G04 #7=#102 G28U0W0 G04 #9=#103 M304 /M89 #16=#104 /M81 G04 #17=#105 G04 G04 #18=#106 N999 /M81T[[#2032]*100] #19=#107 G04 G04 #3=#108 M305 G04 G04 G04 M309 G04 G04 #2032=1.0 G04 G04 #2001=0 M830 G04 #2002=0 M840 #509=#100 #2004=0 G04 G04 #2006=0 G04 M306 #2101=0 G04 T300 #2102=0 G04 #2008=#509 #2104=0 #20=#100 G04 #2106=0 #21=#101 M307 G04 #23=#102 M01 M310 #27=#103 G04 /1/3GOTO999 #134=#104 IF[#509LT[57-2]]GOTO960 G04 #502=#105 IF[#509GT165.0]GOTO960 M99 #503=#106 G04 N960 #33=#107 M98P[#503+31](BOX #3000=180(REAR#2008 #26=#108 NEZISHITA) INPUT MIS) G04 G04 M30 G04 T300 G04 G04 M850 M98P[#502+35](BOX NEZI M860 SHIAGE) G04 G04 G04 IF[#3NE58]GOTO2 G04 M888 G04 M01 :9330(DETA UKETORI #2020=#100 #2021=#101 IF[#2332EQ0]GOTO3 G00Z30.0 #2022=#102 G00Z30.0 G04 M320 G01G41X[#27-0.5*#20+5.0]G04 N1 Z10.0F0.73M08 G04 X[#27-14.35*#20-6.0] IF[#3NE58]GOTO4 M870 G41Z-[8.0-6.35]M08 G01Z5.0F0.73 G04 G01X[#27-14.35*#20-1.0]F1Z2.0F0.6 G04 .0 X[#27-0.5*#20+1]Z0.0F0.45 G04 X[#27-20.35*#20-1.0]Z-[14.X[#27-0.5*#20]Z-0.5F0.15 G04 0-6.35]F0.25 X[#27-17.0*#20]Z-17.0F0.4 #1=ATAN[#20]/[2] X[#27-20.35*#20-1.0-[#2+2.X[#27-17.0*#20-#2]Z-[17.0#2=[[#27-[#19+15.875*#20]0]]Z-17.01 +#2*COS[30]]F0.22 ]/2*SIN[90-#1]/SIN[30-#1]] X[#31+11.35*#20-6.0]F2.0 X[#31+5.3*#20]Z-[#18-5.3]#5=[[[#27-[#17+15.875*#20G00Z-[#18-11.35-6.35] F0.75 ]]/2]*SIN[90-#1]/SIN[30-#1]G01X[#31+11.35*#20-1.0]FU-10.0W5.0F2.0 ]*COS[30] 1.0 G00G40Z-[#18-#2020-10] #8=[#17+[15.875+#9]*#20] X[#31+3.0*#20-1.0]Z-[#18-G01G41X[#2021-[10*TAN[#31=[#19-[#18-15.875]*#20] 3.0-6.35]F0.25 4]]*2-0.15*2]F2.0 #135=FIX[125000/[#27*3.1U-[#31-[#21-2.0]]W-[[[#31-[X[#2021+[#2020-3.209]*TA4]] #21-2.0]]/2]/TAN[#23]] N[4]*2-0.3]Z-[#18-3.209-0.1#136=FIX[132000/[#27*3.1G00G40Z30.0 5]F0.4 4]] X[#27-5.0] G01G40U-10.0W5.0F2.0 G04 M330 G00X[#21-4.0] G04 N2 G42Z-[#18+3.0] G04 X[#27-14.35*#20-6.0] G01X[#21+2.0+0.3]Z-[#18-M880 G41Z-7.0M08 0.15]F0.22 M99 G01X[#27-14.35*#20-1.0]F1X[#2022-0.15*2] .0 M777 X[#27-20.35*#20-1.0]Z-14.0G02X[#2021+[#2020-3.209] F0.25 *TAN[4]*2-0.15*2]W3.209 X[#27-20.35*#20-1.0-[#2+2.R2.25 0]]Z-[14.0+[#2+2.0]*COS[3G01U-10.0W5.0F2.0 :4031(BOX NEZISHITA) 0]] G00G40Z30.0 IF[#503NE4000.0]GOTO93X[#31+11.35*#20-6.0]F2.0 GOTO10 0 G00Z-[#18-11.35] G01Z5.0F0.8 G04 G01X[#31+11.35*#20-1.0]FN4 G51T3M41 1.0 Z2.0F0.6 M93 X[#31+3.0*#20-1.0]Z-[#18-X[#27-0.5*#20+1.0]Z0.0F0.G00W-150.0 3.0]F0.25 45 M310 U-[#31-[#21-2.0]]W-[[[#31-[X[#27-0.5*#20]Z-0.5F0.15 G97G99G40G00X[#27-5.0]#21-2.0]]/2]/TAN[#23]] X[#27-17.0*#20]Z-17.0F0.4 Z100.0S#135M03 G00G40Z30.0 X[#27-17.0*#20-#2]Z-[17.0IF[#2332EQ4]GOTO1 M340 +#2*COS[30]]F0.22 IF[#2332EQ2]GOTO2 N3 #30=[1.6/TAN[[180-30+#1]/ 2]] M01 6 X[#31+[#30*SIN[#1]*2]]Z-[G04 G00Z#9 #18-[#30*COS[#1]]]F0.5 G97G99G00G40U-200.0W-IF[#2330NE0]GOTO7 G03X[#31-#30]Z-[#18+#30*50.0S#134M04 G00Z[[#9-0.05]+[#2107]] COS[#23]]R1.6F0.4 GOTO2 X[[[#8+0.1]-[17.0+#5+#9]*#M777 N1 20]+[#2007]] G01X[#21-3.0]W-[[[#31-[#2M500 G32W-[17.0+#5+#9]E#4 1-3.0]]/2]/TAN[#23]]F0.45 G51T4 G32U-1.403W-1.215E3.954 G00G40Z30.0 M94 G32U-10.0W-8.66E4.992 N10 G51T5 G00Z[[#9+0.1]+[#2107]] IF[#7EQ1.0]GOTO5 M95 X[[[#8+0.2]-[17.0+#5+#9]*#X400.0 M510 20]+[#2007]] M360 M800 G32W-[17.0+#5+#9]E#4 M370 M01 G32U-1.403W-1.215E3.954 S#134 G04 G32U-10.0W-8.66E4.992 G83 G97G99G00G40U-200.0W-N7 M99 50.0S#134M03 G00Z#9 N5 N2 X#8(LAST PASS) X400.0M05 M555 G32U-[[#16+#9]*#20]W-[#1G04U1.0 Z60.0 6+#9]E#4R-5.0 M400 X[#19+[15.875+15.0]*#20] G32U-10.19W-1.854E17.44M410 Z15.0 6 G97S#134M04 IF[#3NE29]GOTO3 IF[#7EQ1.0]GOTO10 G83 G00Z[#9+0.098]M08 G00Z-50.0S#136 M99 X[#8-0.45] M666 N930 G32U-[[#16+#9]*#20]W-[#1Z50.0S#136M03 #3000=183(#503 DETA 6+#9]E#4R-5.0 U100.0 ERROR) G32U-10.19W-1.854E17.44G83 M99 6 M99 G00Z[#9+0.05] N10 X[#8-0.23] G00Z-50.0M05 G32U-[[#16+#9]*#20]W-[#1Z50.0 6+#9]E#4R-5.0 U100.0 :3035(V0.38R BOX NEZI G32U-10.19W-1.854E17.44M666 SHIAGE) 6 G97S#136M03 IF[#502NE3000.0]GOTO95G00Z#9 G83 0 GOTO4 M99 G04 Z#9M08 N950 IF[#7EQ0.0]GOTO1 N3Z#9M08 #3000=185(#502 DETA M500 N4 ERROR) G51T5 X[#8-0.06](1ST PASS) M99 M95 G32U-[[#16+#9]*#20]W-[#1 M510 6+#9]E#4R-5.0 M800 G32U-10.19W-1.854E17.44 M100 G00G40Z30.0 G04 N1 G04 G00Z30.0 M105 M305 :0000(OFFSET CHANGE) G04 G00G41X139.8Z5.0M08 G04 G01Z2.0F0.5 #2011=[#2011-[#2001]] G04 X135.2Z-0.3F0.15 #2012=[#2012-[#2002]] M110 Z-[3.15-[135.2-[134.7-3.15*#2013=[#2013-[#2003]] M30 #20]]/2]F0.25 #2014=[#2014-[#2004]] G03X[134.7-3.15*#20]Z-3.1#2015=[#2015-[#2005]] 5R1.5 #2016=[#2016-[#2006]] G01X[134.7-17.0*#20]Z-17.N1 0F0.35 #2001=0 U-[[#2*SIN[35]]*2]W-[#2*#2002=0 :7031(HUGHES NC50) COS[35]]F0.2 #2003=0 IF[#503NE7000.0]GOTO91#30=[1.5*TAN[#23/2]] #2004=0 0 X109.5Z-[15.875+[125.125-#2005=0 G04 109.5]/#20]F0.70 #2006=0 G51T3 Z-[132.0-#30]F0.35 M111 M93 G03X[109.5-[#30*SIN[#23]]#2111=[#2111-[#2101]] #1=ATAN[#20]/[2] *2]Z-[132.0+#30*COS[#23]#2112=[#2112-[#2102]] #2=[[[134.7-17.0*#20]-[125.]R1.5 #2113=[#2113-[#2103]] 125-1.125*#20]]/2*SIN[90-#M777 #2114=[#2114-[#2104]] 1]/SIN[35-#1]] G01X[#21-2.0]Z-[132.0+[[1#2115=[#2115-[#2105]] G00W-150.0 09.5-[#21-2.0]]/2]/TAN[#23]#2116=[#2116-[#2106]] M301 ]F0.35 N2 G99G97G40G00X131.0Z10G00G40Z30.0 #2101=0 0.0S#135M03 X400.0 #2102=0 IF[#2332NE2]GOTO1 M500 #2103=0 G00Z30.0 M302 #2104=0 M302 S#134M03 #2105=0 X125.0 G83 #2106=0 G41Z-8.0M08 M99 M222 G01X[134.7-17.0*#20-1.0]FN910 M30 1.0 #3000=180(#503 NOT Z-14.0F0.25 7000.0) U-[[#2*SIN[35]]*2]W-[#2*M30 COS[35]] X101.5F2.0 G00Z-122.0 G01X106.5F1.0 Z-129.0F0.25 :0010 X[#21-2.0]Z-[129.0+[[106.5-:7035(HUGHES NC50) G28W-100.0U-100.0 [#21-2.0]]/2]/TAN[#23]] IF[#502NE7000.0]GOTO95 0 G83 0S360M03 M333 M99 M300 G51T5 N950 G00X69.9 M95 #3000=180(#502 NOT Z30.0 #9=2.469 7000.0) G01Z20.0F1.0M08 #8=[131.615+[15.875+#9]*#M30 Z-270.0F0.56 20] U-2.0 M303 G00Z100.0M09 M800 M310 M01 G28U0.0W0.0 G97G40U-200.0W-50.0S#13:1000 G04 4M03 G51T3 M102 M555 M93 M05S20 G00G99Z50.0 G04U10.0 /M89 X[#8-6.49+[15.0-#9]*#20] G51T5 G04 Z15.0 M95 G04 Z#9M08 G04U10.0 G04 X[#8-0.05](1ST PASS) M99 M103 G32U-[[120.0+#9]*#20]W-[ /1/3GOTO999 120.0+#9]E6.354R-5.0 G04 G32U-10.19W-1.854E17.44 M30 6 G00Z#9 IF[#2330NE0]GOTO7 :8001(WELD TANMEN G00Z[[#9+0.1]+#2107] ONLY) X[[#8-2.97]+#2007] M70 G32W-[17.37+#9]E6.354 M71 :3235(V0.38R BOX G32U-1.302W-0.93E3.42 M79 SHIAGE) G32U-11.5W-8.2E4.624 G04 IF[#502NE3200.0]GOTO95 G00Z[[#9-0.45]+#2107] M100 0 X[[#8-2.87]+#2007] G04 G04 G32W-[17.37+#9]E6.354 N999 IF[#7EQ0.0]GOTO1 G32U-1.302W-0.93E3.42 G04 M500 G32U-11.5W-8.2E4.624 T500 G51T5 N7 M95 M95 G00Z#9 M101 M510 X#8(LAST PASS) M01 M800 G32U-[[120.0+#9]*#20]W-[/M81T500 M01 120.0+#9]E6.354R-5.0 G04 G04 G32U-10.19W-1.854E17.44T300 G97G99G00G40U-200.0W-6 M500 50.0S#134M04 G00Z-50.0 G51T3M41 GOTO2 M666 M93 N1 Z50.0S#136M03 G99G97G40G00U-5.0Z100.M500 G51T5 #2207=[#2207+1.0] G01X[#31+11.35*#20-1.0]FM95 G83 1.0 M510 M99 X[#31+3.0*#20-1.0]Z-[#18-M800 N10 3.0]F0.25 M01 G00Z50.0M05 U-[#31-[#21-2.0]]W-[[[#31-[G04 G04U1.0 #21-2.0]]/2]/TAN[#23]] G97G99G00G40U-200.0W-M666 G00G40Z30.0 50.0S#134M03 X400.0S#136M03 N1 N2 G83 G00Z30.0 M555 M99 G01G41X[#27-0.5*#20+5.0]Z60.0 N950 Z5.0F3.0M08 X[#19+[15.875+15.0]*#20] #3000=185(#502 DETA Z2.0F0.5 Z15.0 ERROR) X[#27-0.5*#20+1.0]Z0.0F0.Z#9M08 M99 45 X[#8-0.1](1ST PASS) X[#27-0.5*#20]Z-0.5F0.15 G32U-[[#16+#9]*#20]W-[#1 X[#27-17.0*#20]Z-17.0F0.36+#9]E#4R-5.0 5 G32U-10.19W-1.854E17.44 X[#27-17.0*#20-#2]Z-[17.06 +#2*COS[30]]F0.2 G00Z#9 #30=[1.6/TAN[[180-30+#1]/IF[#2330NE0]GOTO7 :4231(BOX NEZISHITA) 2]] G00Z[[#9-0.05]+[#2107]] IF[#503NE4200.0]GOTO93X[#31+[#30*SIN[#1]*2]]Z-[X[[[#8+0.1]-[17.0+#5+#9]*#0 #18-[#30*COS[#1]]]F0.55 20]+[#2007]] G04 G03X[#31-#30]Z-[#18+#30*G32W-[17.0+#5+#9]E#4 G51T3M41 COS[#23]]R1.6F0.25 G32U-1.403W-1.215E3.954 M93 M777 G32U-10.0W-8.66E4.992 M310 G01X[#21-3.0]W-[[[#31-[#2G00Z[[#9+0.1]+[#2107]] G99G97G40G00Z100.0S[#11-3.0]]/2]/TAN[#23]]F0.25 X[[[#8+0.2]-[17.0+#5+#9]*#35*0.9]M03 G00G40Z30.0 20]+[#2007]] M320 IF[#7EQ1.0]GOTO3 G32W-[17.0+#5+#9]E#4 X[#27-5.0] X400.0 G32U-1.403W-1.215E3.954 IF[#2332NE2]GOTO1 M360 G32U-10.0W-8.66E4.992 G00Z30.0 M370 N7 X[#27-14.35*#20-6.0] S#134 G00Z#9 G41Z-8.0M08 G83 X#8(LAST PASS) G01X[#27-14.35*#20-1.0]F1M99 G32U-[[#16+#9]*#20]W-[#1.0 N3 6+#9]E#4R-5.0 X[#27-20.35*#20-1.0]Z-14.0X400.0M05 G32U-10.19W-1.854E17.44F0.25 G04U1.0 6 X[#27-20.35*#20-1.0-[#2+2.M400 IF[#7EQ1.0]GOTO10 0]]Z-[14.0+[#2+2.0]*COS[3M410 G00Z50.0S#136M03 0]] G97S#134M04 M666 X[#31+11.35*#20-6.0]F2.0 G83 X400.0S#136M03 G00Z-[#18-11.35] M99 N930 G32U[[#9+#2]*#20]W-[#9+G32U1.467W-1.271E4.124 #3000=183(#503 DETA #2]E#4 G32U15.0W-12.99E4.997 ERROR) G32U1.294W-1.120E3.637 G00Z[[#9-0.15]+[#2107]] M99 G32U15.0W-12.99E4.99 X[[#8-0.2]+[#2007]] G00Z#9 G32U[[#9+#2]*#20]W-[#9+ X#8 #2]E#4 G32U[#15*#20]W-#15E#4RG32U1.29W-1.12E3.637 5.0 G32U15.0W-12.99E4.99 G32U16.19W-2.9463E17.44G00Z#9 6 X#8 :1215(V0.38R NEZI G00U10.0 G32U[#15*#20]W-#15E#4RSHIAGE) IF[#7EQ0.0]GOTO9 5.0 IF[#500NE1200.0]GOTO91G04 G32U16.19W-2.9463E17.440 M05 6 IF[#7EQ0.0]GOTO4 G04U1.0 G00U10.0 G51T4 N9 IF[#7EQ0.0]GOTO9 M94 M500 G04 G97S#130M04 S#131M03 M05 GOTO5 G83 G04U1.0 G04 M99 N9 G04 N10 M500 N4 G00X[#29-[#28-15.875+15.S#131M03 G51T2 0]*#20]Z15.0M08 G83 M92 G00X[#8+0.42]Z[#9+0.098] M99 G97S#130M03 G32U[#15*#20]W-#15E#4RN910 N5 5.0 #3000=181(#500 DETA IF[#3EQ29.0]GOTO10 G32U16.19W-2.9463E17.44ERROR) G00Z50.0 6 M99 X[#29-[#28-15.875+15.0]*#G00Z[#9+0.05] 20] G00X[#8+0.23] Z15.0M08 G32U[#15*#20]W-#15E#4R G00X[#8+0.1]Z#9 5.0 G32U[#15*#20]W-#15E#4RG32U16.19W-2.9463E17.44 5.0 6 G32U16.19W-2.9463E17.44G00Z#9 6 G00X[#8+0.10] G00Z[[#9+0.15]+[#2107]] G32U[#15*#20]W-#15E#4R:1213(V0.38R F ARA X[[#8-0.373]+[#2007]] 5.0 14PASS) G32U[[#9+#2]*#20]W-[#9+G32U16.19W-2.9463E17.44IF[#500NE1200.0]GOTO91#2]E#4 6 0 G32U1.467W-1.271E4.124 G00Z[[#9+0.15]+[#2107]] G51T1 G32U15.0W-12.99E4.997 X[[#8-0.373]+[#2007]] M91 G00Z[[#9-0.15]+[#2107]] G32U[[#9+#2]*#20]W-[#9+IF[#7EQ0.0]GOTO4 X[[#8-0.2]+[#2007]] #2]E#4 G99G97G40G00X[#29-[#28 -15.875+15.0]*#20]Z15.0M0G04 F0.25 8 G00X[#8+3.50]Z[#9+0.816] X[#27-20.35*#20-1.0-[#2+2.M200 M202 0]]Z-[14.0+[#2+2.0]*COS[3M05 M98P1014 0]] G04U1.0 G00X[#8+2.58]Z[#9+0.602] X[#31+11.35*#20-6.0]F2.0 M201 M98P1014 G00Z-[#18-11.35] G97S#130M04 G00X[#8+1.82]Z[#9+0.424] G01X[#31+11.35*#20-1.0]FGOTO5 M98P1014 1.0 G04 G00X[#8+1.15]Z[#9+0.269] X[#31+3.0*#20-1.0]Z-[#18-G04 M98P1014 3.0]F0.25 N4 G00X[#8+0.55]Z[#9+0.128] U-[#31-[#21-2.0]]W-[[[#31-[G99G97G40G00X[#29-[#28M98P1014 #21-2.0]]/2]/TAN[#23]] -15.875+15.0]*#20]Z15.0M0G83 G00G40Z30.0 8 M99 N1 M200 N910 G00Z30.0 G97S#130M03 #3000=181(#500 DETA M305 N5 ERROR) G00G41X[#33+4.6]Z5.0M0#5=0 M99 8 IF[#3EQ29.0]GOTO6 G01Z2.0F0.5 G00X[#8+5.23]Z[#9+1.095] X#33Z-0.3F0.15 M98P1014(1 PASS) Z-[3.18-[#33-[#27-3.18*#20]G00X[#8+4.48]Z[#9+0.92] ]/2]F0.25 M98P1014(2 PASS) G03X[#27-3.18*#20]Z-3.18#5=1 R1.5 G04 G01X[#27-17.0*#20]Z-17.0G00X[#8+3.38]Z[#9+0.66] :4531(HUGHES TYPE F0.4 M202 BOX) X[#27-17.0*#20-#2]Z-[17.0M98P1014(4 PASS) IF[#503NE4500.0]GOTO93+#2*COS[30]]F0.22 G00X[#8+2.54]Z[#9+0.47] 0 #30=[1.6/TAN[[180-30+#1]/M98P1014(6 PASS) G04 2]] G00X[#8+1.82]Z[#9+0.3] G51T3M41 X[#31+[#30*SIN[#1]*2]]Z-[M98P1014(8 PASS) M93 #18-[#30*COS[#1]]]F0.75 G00X[#8+1.2]Z[#9+0.16] G00W-150.0 G03X[#31-#30]Z-[#18+#30*M98P1014(10 PASS) M310 COS[#23]]R1.6F0.4 G00X[#8+0.74]Z[#9+0.05] G97G99G40G00X[#27-5.0]M777 M98P1014(12 PASS) Z100.0S#135M03 G01X[#21-3.0]W-[[[#31-[#2G83 IF[#2332NE2]GOTO1 1-3.0]]/2]/TAN[#23]]F0.45 M99 G00Z30.0 G00G40Z30.0 N6 M320 IF[#7EQ1.0]GOTO3 G00X[#8+5.70]Z[#9+1.327] X[#27-14.35*#20-6.0] X400.0 M98P1014 G41Z-8.0M08 M360 G00X[#8+4.74]Z[#9+1.104] G01X[#27-14.35*#20-1.0]F1M370 M98P1014 .0 S#134 #5=1 X[#27-20.35*#20-1.0]Z-14.0G83 M99 M91 G01X[#26+4.0]F0.2 N3 M99 G00G40W5.0 X400.0M05 X[#21-4.0] G04U1.0 Z-[#18+4.0] M400 G42Z-#18 M410 G01X#2022F0.2 G97S#134M04 :9508 G02X[#2021+[#2020-3.209] G83 N1 *TAN[4]*2]W3.209R2.25 M99 T100 G01X[#2021-[15.0*TAN[4] N930 T200 *2]]W15.0F0.2 #3000=183(#503 DETA T300 G00G40Z30.0T0300 ERROR) T400 #2110=0.0 M99 T500 M05S0 T600 G83 T500 M99 T400 N930 T300 #3000=183 T200 M99 :0007 T100 % T100 M99P1 M91 #1=1 T200 #2=6 M92 WHILE[#1LE6]DO1 T300 T[#1*100] M93 T300 T400 T[#2*100] M94 #1=#1+1 T500 #2=#2-1 M95 END1 T600 M99P1 M96 T100 M91 T600 :4037 M96 IF[#503NE4000.0]GOTO93T500 0 M95 G04 T400 G51T3M41 M94 M93 T300 G97G99G40G00S#135M03M93 T0310 T200 G00X#21Z30.0 M92 G42Z0.0M08 T100 X[#27-4.0]