Spaceclam
Cruisin' Guzzisti
of course, if there is interest, (like 6 or so people) i might do another batch
If anyone wants to go through the effort and do it themselves, here is the code. This will work on any HAAS machine that will read an R value. If you still live in the days of I, J, and K, you have a little work to do.
All you have to do is adjust the depth of cut in the sub routines, set the "o" number, and off you go.
%
OXXXXX (TAILX6)
T1 M06 (SPOTDRILL)
G90 G54 G00 X1.2657 Y0.25 S1000 M03
G43 G00 Z0.025 H01 M08
G81 Z-0.16 R0.025 F2.5
X2.7707
X2.3107 Y1.425
X1.7007
X0.9725 Y2.4016
X2.4264 Y2.6181
X5.1289 Y0.4006
X7.9414
Y6.1506
X5.1289
X2.4264 Y3.9331
X0.9725 Y4.1496
X1.2657 Y6.3013
X2.7707
X2.3107 Y5.1263
X1.7007
G00 Z1. M09
T2 M06 (.2DRILL)
G90 G54 G00 X1.2657 Y0.25 S800 M03
G43 G00 Z0.1 H02 M08
G04 P1000
G81 Z-0.6 R0.1 F2.5
X2.7707
X2.3107 Y1.425
X1.7007
X0.9725 Y2.4016
X2.4264 Y2.6181
X5.1289 Y0.4006
X7.9414
Y6.1506
X5.1289
X2.4264 Y3.9331
X0.9725 Y4.1496
X1.2657 Y6.3013
X2.7707
X2.3107 Y5.1263
X1.7007
G80 G00 Z1. M09
M00
T3 M06 (3/8EM)
G90 G55 G00 X1.2 Y-0.75 S530 M03
G43 G00 Z0.1 H03 M08
G04 P1000
G01 Z0 F4.
M97 P300 L1 (8)
G00 Z1.
X1.3 Y7.5
G00 Z0.1
G01 Z0 F4.
M97 P320 L8
G00 Z1.
X0 Y2.5
G00 Z0.1
G01 F2.
M97 P340 L8
G00 Z1. M09
T4 M06 (REMOVEBOLTS.375EM)
G90 G55 G00 X0.9725 Y2.4016 S533 M03
G43 G00 Z0.025 H03 M08
G04 P1000
G81 Z-0.47 R0.025 F2.
Y4.1496
G80 X2.3107 Y4.25
X2.3107
Y5.1263
G81 Z-0.32 R0.025 F2.
G80 G00 Z1.
Y1.425
G00 Z0.025
G81 Z-0.32 R0.025
G00 Z1. M09
Z4.
M30
N300 G01 G91 Z-0.057 F2.
N301 G90 G42 X1.2507 Y0 D03 F4.2
N302 X2.7707
N303 G03 X3.0153 Y0.3018 R0.25
N304 G01 X2.7402 Y1.6018
N305 G03 X2.4956 Y1.8 R0.25
N306 G01 X1.5258
N307 G03 X1.2813 Y1.6018 R0.25
N308 G01 X1.0061 Y0.3018
N309 G03 X1.2507 Y0 R0.25
N310 G01 G40 X1.2 Y-0.75
N311 M99
N320 G91 G01 Z-0.057 F2.
N321 G90 G42 X1.2507 Y6.5513 F4.2
N322 G03 X1.0061 Y6.2495 R0.25
N323 G01 X1.2813 Y4.9495
N324 G03 X1.5258 Y4.7513 R0.25
N325 G01 X2.4956
N326 G03 X2.7402 Y4.9495 R0.25
N327 G01 X3.0153 Y6.2495
N328 G03 X2.7707 Y6.5513 R0.25
N329 G01 X1.2507
N330 G03 X1.0061 Y6.2495 R0.25
N331 G01 G40 X0.5
N332 Y7.5
N333 X1.3
N334 M99
N340 G91 G01 Z-0.057 F2.
N341 G90 G42 X0.66 Y2.4016 F4.2
N342 G03 X1.0085 Y2.0912 R0.375
N343 G01 X1.3701 Y2.2098
N344 G02 X1.4278 Y2.2131 R0.5
N345 G01 X4.1548
N346 G02 X5.0531 Y0.7737 R1.
N347 G01 X4.9243 Y0.5105
N348 G03 X5.3734 Y0.2908 R0.25
N349 G01 X5.6568 Y0.8701
N350 G02 X7.4534 Y0.8701 R1.
N351 G01 X7.7368 Y0.2908
N352 G03 X8.1705 Y0.5375 R0.25
N353 G02 Y6.0137 R5.
N354
N355 G03 X7.7368 Y6.2605 R0.25
N356 G01 X7.4534 Y5.6811
N367 G02 X5.656 Y5.6811 R1.
N358 G01 X5.3734 Y6.2605
N359 G03 X4.9243 Y6.0408 R0.25
N360 G01 X5.0531 Y5.7775
N361 G02 X4.1548 Y4.3381 R1.
N362 G01 X1.4278
N363 G02 X1.3701 Y4.3415 R0.5
N364 G01 X1.0085 Y4.46
N365 G03 X0.66 Y4.1496 R0.375
N366 G01 Y2.4016
N367 G03 X1.0085 Y2.0912 R0.375
N368 G40 G01 X1.1 Y1.8
N369 X0
N370 Y2.5
N371 M99
%
If anyone wants to go through the effort and do it themselves, here is the code. This will work on any HAAS machine that will read an R value. If you still live in the days of I, J, and K, you have a little work to do.
All you have to do is adjust the depth of cut in the sub routines, set the "o" number, and off you go.
%
OXXXXX (TAILX6)
T1 M06 (SPOTDRILL)
G90 G54 G00 X1.2657 Y0.25 S1000 M03
G43 G00 Z0.025 H01 M08
G81 Z-0.16 R0.025 F2.5
X2.7707
X2.3107 Y1.425
X1.7007
X0.9725 Y2.4016
X2.4264 Y2.6181
X5.1289 Y0.4006
X7.9414
Y6.1506
X5.1289
X2.4264 Y3.9331
X0.9725 Y4.1496
X1.2657 Y6.3013
X2.7707
X2.3107 Y5.1263
X1.7007
G00 Z1. M09
T2 M06 (.2DRILL)
G90 G54 G00 X1.2657 Y0.25 S800 M03
G43 G00 Z0.1 H02 M08
G04 P1000
G81 Z-0.6 R0.1 F2.5
X2.7707
X2.3107 Y1.425
X1.7007
X0.9725 Y2.4016
X2.4264 Y2.6181
X5.1289 Y0.4006
X7.9414
Y6.1506
X5.1289
X2.4264 Y3.9331
X0.9725 Y4.1496
X1.2657 Y6.3013
X2.7707
X2.3107 Y5.1263
X1.7007
G80 G00 Z1. M09
M00
T3 M06 (3/8EM)
G90 G55 G00 X1.2 Y-0.75 S530 M03
G43 G00 Z0.1 H03 M08
G04 P1000
G01 Z0 F4.
M97 P300 L1 (8)
G00 Z1.
X1.3 Y7.5
G00 Z0.1
G01 Z0 F4.
M97 P320 L8
G00 Z1.
X0 Y2.5
G00 Z0.1
G01 F2.
M97 P340 L8
G00 Z1. M09
T4 M06 (REMOVEBOLTS.375EM)
G90 G55 G00 X0.9725 Y2.4016 S533 M03
G43 G00 Z0.025 H03 M08
G04 P1000
G81 Z-0.47 R0.025 F2.
Y4.1496
G80 X2.3107 Y4.25
X2.3107
Y5.1263
G81 Z-0.32 R0.025 F2.
G80 G00 Z1.
Y1.425
G00 Z0.025
G81 Z-0.32 R0.025
G00 Z1. M09
Z4.
M30
N300 G01 G91 Z-0.057 F2.
N301 G90 G42 X1.2507 Y0 D03 F4.2
N302 X2.7707
N303 G03 X3.0153 Y0.3018 R0.25
N304 G01 X2.7402 Y1.6018
N305 G03 X2.4956 Y1.8 R0.25
N306 G01 X1.5258
N307 G03 X1.2813 Y1.6018 R0.25
N308 G01 X1.0061 Y0.3018
N309 G03 X1.2507 Y0 R0.25
N310 G01 G40 X1.2 Y-0.75
N311 M99
N320 G91 G01 Z-0.057 F2.
N321 G90 G42 X1.2507 Y6.5513 F4.2
N322 G03 X1.0061 Y6.2495 R0.25
N323 G01 X1.2813 Y4.9495
N324 G03 X1.5258 Y4.7513 R0.25
N325 G01 X2.4956
N326 G03 X2.7402 Y4.9495 R0.25
N327 G01 X3.0153 Y6.2495
N328 G03 X2.7707 Y6.5513 R0.25
N329 G01 X1.2507
N330 G03 X1.0061 Y6.2495 R0.25
N331 G01 G40 X0.5
N332 Y7.5
N333 X1.3
N334 M99
N340 G91 G01 Z-0.057 F2.
N341 G90 G42 X0.66 Y2.4016 F4.2
N342 G03 X1.0085 Y2.0912 R0.375
N343 G01 X1.3701 Y2.2098
N344 G02 X1.4278 Y2.2131 R0.5
N345 G01 X4.1548
N346 G02 X5.0531 Y0.7737 R1.
N347 G01 X4.9243 Y0.5105
N348 G03 X5.3734 Y0.2908 R0.25
N349 G01 X5.6568 Y0.8701
N350 G02 X7.4534 Y0.8701 R1.
N351 G01 X7.7368 Y0.2908
N352 G03 X8.1705 Y0.5375 R0.25
N353 G02 Y6.0137 R5.
N354
N355 G03 X7.7368 Y6.2605 R0.25
N356 G01 X7.4534 Y5.6811
N367 G02 X5.656 Y5.6811 R1.
N358 G01 X5.3734 Y6.2605
N359 G03 X4.9243 Y6.0408 R0.25
N360 G01 X5.0531 Y5.7775
N361 G02 X4.1548 Y4.3381 R1.
N362 G01 X1.4278
N363 G02 X1.3701 Y4.3415 R0.5
N364 G01 X1.0085 Y4.46
N365 G03 X0.66 Y4.1496 R0.375
N366 G01 Y2.4016
N367 G03 X1.0085 Y2.0912 R0.375
N368 G40 G01 X1.1 Y1.8
N369 X0
N370 Y2.5
N371 M99
%