Sub Program Call

[CNCMike]

I have a very short program that is going to spot, drill and tap a hole followed by machining a logo. The program will be run on a stack of 10 flanges that are .625" thick. After the first flange is completed I would like to offset the program .625" in the Y-axis and re-run the sequence.

 

Ideally I would run all of the spot cycles, then drill cycles, then tapping..... to reduce tool changes. Any suggestions as to how to go about this? Sub program call? Absolute and incremental?

 

Thanks in advance for your help!

[Mic6]

Transform Your Toolpath...Translate, Group NCI by operation type. Mess with that. HTH

[CNCMike]

Transform Your Toolpath...Translate, Group NCI by operation type. Mess with that. HTH

 

Thanks for the suggestion, I will give it a try. Any other ideas?

[Stan_z]

This is how we do it...... manually program and edit for the Haas controls..... PITA but it works

 

Pretty basic programming. The 8000 shifts are each of the parts "ref points" or zero's from our G54 main pick up point

%

O00001 ( FRAME CLAMP MAIN SERVER)

N10 M98 P9998 (1440.TXT 5/13/2010 )

N12 M98 P100 (SPOTTING CALLS 101 & 102)

N14 M98 P200 (TAP DRILLING CAllS 201 & 202)

N16 M98 P300 (RIGID TAPPING CALLS 301 & 302)

N18 M98 P400 (MILLING CALLS 401 & 402)

N20 M98 P9998

N22 M98 P8000

N24 G54 G00 X-15. Y8.

N26 M00 (BLOW OFF)

N28 X0.

N30 M30

O00100 (SPOTTING SERVER)

N32 M98 P9998

N34 M98 P8001

N36 T1 M06 (3/8 X 90 DEGREE SPOT DRILL)

N38 G00 G90 G55 X0. Y-1.25 S5500 M03

N40 M08

N42 G43 H01 Z0.5

N44 M98 P101

N46 M98 P8002

N48 M98 P102

N50 M98 P8003

N52 M98 P101

N54 M98 P8004

N56 M98 P102

N58 M98 P8005

N60 M98 P101

N62 M99

O00101 ( SPOT FRONT TO BACK )

N64 G00 G90 X0. Y-1.25

N66 G98 G81 Z-0.095 R0.05 F50.

N68 Y-0.8

N70 Y-0.55

N72 Y0.55

N74 Y0.8

N76 Y1.25

N78 G80

N80 M99

O00102 ( SPOT BACK TO FRONT )

N82 G00 G90 X0. Y1.25

N84 G98 G81 Z-0.095 R0.05 F50.

N86 Y0.8

N88 Y0.55

N90 Y-0.55

N92 Y-0.8

N94 Y-1.25

N96 G80

N98 M99

O00200 (DRILLING SERVER)

N100 M98 P9998

N102 M98 P8005

N104 T2 M06 ( # 21 JOBBER DRILL .159 Dia)

N106 G00 G90 G55 X0. Y1.25 S5500 M03

N108 M08

N110 G43 H02 Z0.5

N112 M98 P202

N114 M98 P8004

N116 M98 P201

N118 M98 P8003

N120 M98 P202

N122 M98 P8002

N124 M98 P201

N126 M98 P8001

N128 M98 P202

N130 M99

O00201 ( DRILL FRONT TO BACK )

N132 G00 G90 X0. Y-1.25

N134 G98 G81 Z-0.35 R0. F50.

N136 Y-0.8

N138 Y-0.55

N140 Y0.55

N142 Y0.8

N144 Y1.25

N146 G80

N148 M99

O00202 ( DRILL BACK TO FRONT )

N150 G00 G90 X0. Y1.25

N152 G98 G81 Z-0.35 R0. F50.

N154 Y0.8

N156 Y0.55

N158 Y-0.55

N160 Y-0.8

N162 Y-1.25

N164 G80

N166 M99

O00300 ( RIGID TAP SERVER)

N168 M98 P9998

N170 M98 P8001

N172 T3 M06 ( 10-32 SPIRAL FLUTE BOTTOM TAP )

N174 G00 G90 G55 X0. Y-1.25 S1600 M05

N176 M08

N178 G43 H03 Z0.5

N180 M98 P301

N182 M98 P8002

N184 M98 P302

N186 M98 P8003

N188 M98 P301

N190 M98 P8004

N192 M98 P302

N194 M98 P8005

N196 M98 P301

N198 M99

O00301 ( RIGID TAP FRONT TO REAR )

N200 G00 G90 X0. Y-1.25

N202 G98 G84 Z-0.265 R0.05 F50.

N204 Y1.25

N206 G80

N208 M99

O00302 ( RIGID TAP REAR TO FRONT )

N210 G00 G90 X0. Y1.25

N212 G98 G84 Z-0.265 R0.05 F50.

N214 Y-1.25

N216 G80

N218 M99

O00400 ( MILLING SERVER)

N220 M98 P9998

N222 M98 P8005

N224 T4 M06 ( 13/64 DE STUB CARB 2 FL EM .203 DIA)

N226 G00 G90 G55 X0. Y1.51 S6000 M03

N228 M08

N230 G43 H04 Z0.5

N232 M98 P402

N234 M98 P8004

N236 M98 P401

N238 M98 P8003

N240 M98 P402

N242 M98 P8002

N244 M98 P401

N246 M98 P8001

N248 M98 P402

N250 M99

O00401 ( MILL FRONT TO REAR )

N252 G00 G90 X0. Y-1.51

N254 Z0.05

N256 G01 Z-0.15 F5.

N258 G00 Z0.05

N260 Y-0.8

N262 G01 Z-0.15 F15.

N264 Y-0.55 F30.

N266 G00 Z0.5

N268 Y0.55

N270 G01 Z-0.15 F15.

N272 Y0.8

N274 G00 Z0.05

N276 Y1.51

N278 G01 Z-0.15 F15.

N280 G00 Z0.5

N282 M99

O00402 ( MILL REAR TO FRONT )

N284 G00 G90 X0. Y1.51

N286 Z0.05

N288 G01 Z-0.15 F5.

N290 G00 Z0.05

N292 Y0.8

N294 G01 Z-0.15 F15.

N296 Y0.55 F30.

N298 G00 Z0.5

N300 Y-0.55

N302 G01 Z-0.15 F15.

N304 Y-0.8

N306 G00 Z0.05

N308 Y-1.51

N310 G01 Z-0.15 F15.

N312 G00 Z0.5

N314 M99

O08000

N316 G52 X0. Y0.

N318 M99

O08001

N320 G52 X0.75 Y-1.95

N322 M99

O08002

N324 G52 X2. Y-1.95

N326 M99

O08003

N328 G52 X3.25 Y-1.95

N330 M99

O08004

N332 G52 X4.5 Y-1.95

N334 M99

O08005

N336 G52 X5.75 Y-1.95

N338 M99

%

 

 

Thanks for the suggestion, I will give it a try. Any other ideas?

[CNCMike]

Stan_Z, thanks for the reply.

 

I looked into the transform tool path and it looks very easy.

 

Thanks all.....

[Mic6]

 

I looked into the transform tool path and it looks very easy.

 

 

Oh, it is.