Jeff Short
-
Posts
1 -
Joined
-
Last visited
Jeff Short's Achievements
Newbie (1/14)
1
Reputation
-
Hello, I need some help getting my post edits made to post correct code. The following are the examples of the current code being posted. %O0001 (TEST TAPPING CYCLES)G0 G28 V0N1(M3 LATHE RIGID TAP)(M3 X .5 PLUG TAP)G20 G99 G18 M46M5G0G28V0G0 G53 X0. Z-6.G50 S2500G0 T0909G54 G97 S325 M03 (Drop M3 & S value)X0. Y0. Z.25 M08Z.04M29 S325G84 Z-.5 F50.8 (feed rate is not in inches per rev)G80G0 Z.25G28 V0.G53 X0. Z-6.M5M05M01N2G0 M05(C-AXIS FACE TAP)( NO. 10-32 TAPRH)G98 G17 M45M5G0G28V0G0 G53 X0. Z-6.G28 H0.G0 T0404C90.Z.25X1.3274 Y0.G99M29 S1407 (M29 should be M329)G84 Z-.5 R.15 F.0313G80G28 V0.M5G0 G53 X0. Y0. Z-6.M46M01N3(C-AXIS CROSS TAP)( NO. 8-32 TAPRH)G98 G17 M45M5G0G28V0G0 G53 X0. Z-6.G28 H0.G0 T1010 M08S1630 M13 (drop line)C90.Z1.(M329 S1630 goes here)X1.8274 Y0.G87 X.3274 R.15 F50.95 (G87 should be G88)G80M09G28 V0.M5G0 G53 X0. Y0. Z-6.M46M30% This is what our current post in the tap section looks like. ptap$ #Canned Tap Cycle pdrlcommonb if recallflg | drlcyc = 0, [ #RH/LH based on spindle direction if not(mr3$), sm29 = "M29" #Z~~ if rigid_tap, pbld, pn, *sm29, *speed, pe #Rigid Tapping if cuttype = 4, #Lathe Tapping [ if use_pitch = 0, [ pcan1, pbld, pn, *sgdrlref, psgdrill, pdrlxyz, pdepth, paout, pcout, *feed, strcantext, pe ] else, [ if met_tool$, pitch = n_tap_thds$ # Tap pitch (mm per thread) else, [ #if metric_vals, pitch = 1/n_tap_thds$/25.4 # Tap pitch (inches per thread) if metric_vals, pitch = n_tap_thds$/25.4 # Tap pitch (inches per thread) else, pitch = 1/n_tap_thds$ # Tap pitch (inches per thread) ] pcan1, pbld, pn, *sgdrlref, psgdrill, pdrlxyz, pdepth, paout, pcout, *pitch, !feed, strcantext, pe ] ] else, #Mill Tapping [ if use_pitch = 0, [ pcan1, pbld, pn, *sgdrlref, psgdrill, pdrlxyz, pdepth, paout, pcout, prdrlout, [if dwell$, *dwell$], *feed, strcantext, pe ] else, [ if met_tool$, pitch = n_tap_thds$ # Tap pitch (mm per thread) else, [ #if metric_vals, pitch = 1/n_tap_thds$/25.4 # Tap pitch (inches per thread) if metric_vals, pitch = n_tap_thds$/25.4 # Tap pitch (inches per thread) else, pitch = 1/n_tap_thds$ # Tap pitch (inches per thread) ] pcan1, pbld, pn, *sgdrlref, psgdrill, pdrlxyz, pdepth, paout, pcout, prdrlout, [if dwell$, *dwell$], *pitch, !feed, strcantext, pe ] ] drlcyc = 1 recallflg = 0 ] else, [ pcan1, pbld, pn, pdrlxyz, pdepth, paout, pcout, prdrlout, !feed, strcantext, pe ] pcom_movea if cuttype = 4, pcanceldc$ I am sure there needs to be changes made like switching the *sm29 but I am not sure just how it should look. Can someone please let me know what changes need to be made, Thanks!
