32MM Machine Ejector Pin Macro

Updated Sunday, January 28, 2001

Following is a macro written specifically for our current 32mm capacity machines, which are the SR-32C, the SV-32J, and the SV-32. The program has a variable setting for the type of machine, as well as alarms for improper data settings, and is presented as a decent example of a macro program, requiring only a cutoff tool, a turning tool, a threading tool, and an endmill, set on the gang slide. To use the program, follow the below instructions:

1. Install collet, guide bushing, and barstock.

2. Set a right-hand cutoff tool in T100 at least .060 wide. In wear offset 1, enter an offset for the tool width in the Z column, enter 3 in the T column, and enter the tool corner radius in the R column.

3. Set a right-hand 55-degree turning tool in T200. In wear offset 2, enter 4 in the T column, and enter the tool nose radius in the R column.

4. Set a right-hand 60-degree "V" thread tool in T300. The tool must be capable of .030" thread depth, and must be less than .187 wide. Do not enter a Z offset for this tool.

5. Set a .375" diameter endmill in T600. A minimum of a .312" diameter endmill is required in order to make the proper flat width. In wear offset 6, enter (.512 - 1/2 the endmill diameter) in the Z column.

6. Set the bar diameter on the Machining Data screen.

7. Do an "Auto Cutoff" operation.

8. Edit the program to reflect the proper variable values for the diameter and length of the pin to be made. The pin extension length will be added to the standard pin length.

9. Feel free to incorporate any part of this program into one of your own. ;-)

10. Make sure you are in Head 1, reset to top of program, switch to Memory, turn One Cycle on, and press Start.

11. When the program has set the Z1 zero position, processed to the "M20", and stopped, press Start again to begin machining. Get a cup of coffee while the machine cycles - be sure you have loaded a bar of the toughest material available prior to leaving.... <g> JUST KIDDING!

    ---

    The Program...

    %
    :0009(EJECTOR PIN MACRO) 
    (32MM MAIN PROGRAM)
    (02/16/00)(KLF)
     
    #531=1.0(BAR DIAMETER)
    #100=.984(PIN DIAMETER)
    #101=0(PIN EXTENSION)
    
    (SPECIFY MACHINE TYPE)
    (ENTER 0 FOR SR SERIES)
    (ENTER 1 FOR SV SERIES)
    #102=1.0
    
    (T100 - RH CUTOFF)
    (T200 - 55 DEGREE TURN)
    (T300 - RH V THREAD TOOL)
    (T600 - .375" ENDMILL)
     
    (VARIABLE DATA ENTRY CHECKS)
    IF[#531LT1.0]GOTO3300
    IF[#531GT1.250]GOTO3310
    IF[#100LT.250]GOTO3320
    IF[#100GT1.250]GOTO3330
    IF[#101LT0]GOTO3340
    IF[#101GT9.300]GOTO3350
    IF[#102GT2.0]GOTO3355
    IF[#102LT1.0]GOTO3355
    
    (WEAR OFFSET DATA ENTRY CHECKS)
    IF[#2302NE4]GOTO3360(T2 T)
    IF[#2202GT.050]GOTO3370(T2 R)
    IF[#2101LT.095]GOTO3380(T1 Z)
    IF[#2201NE3]GOTO3385(T1 T)
    IF[#2301GT.030]GOTO3386(T1 R)
    IF[#2103LT0]GOTO3390(T3 Z)
    IF[#2103GT.035]GOTO3400(T3 Z)
    IF[#2106GT.365]GOTO3410(T6 Z)
    IF[#2106LT.315]GOTO3420(T6 Z)
    
    G97S500M3
    M11
    (SET HEADSTOCK ZERO POINT)
    G28W0T0
    G0W[9.320-#101]
    (12.0-MINIMUM PIN LENGTH 2.680-PIN EXTENSION)
    G50Z0
    M10
    M20
     
    M10
    T100 
    M27
    G0X2.0W-.020M25
    M01(CHECK COOLANT) 
     
    N1(TURN THREADED AREA) 
    T200 
    G150 
    G97S3000M3 
    G0X[#531+.100]Z-.050T2 
    M01
    G99G1X.600F.010
    G41X.660Z-.005
    X.680F.002 
    X.780W.050F.003
    Z.650
    X.700W.040 
    Z.790
    X[#531-.100]
    X#531W.050
    W.050
    G40G0X2.0 
    M01T0
     
    N2(THREAD) 
    T300 
    G150 
    G97S1000M3 
    G0X[#531+.100]Z-.100T3 
    M01
    X1.0 
    G92X.780Z.750F.0394
    X.770
    X.760
    X.750
    X.745
    X.745
    X.745
    G0X2.0Z-.100M5 
    M01T0
    
    N3(TURN FLATTED AREA)
    T200
    G97S3000M3
    G0X[#531+.100]Z.700T2
    M01
    G99G1X.800F.010
    G41X.890Z.785
    X.900F.002
    X1.0W.050
    Z1.250
    X#531W.050
    W.050
    G40G0X2.0M5
    M01T0
    
    IF[#102EQ1.0]GOTO1000
    (CHECK FOR SR)
    
    N4(MILL 22MM FLATS IF SV)
    (#102=1.01)
    T600
    S2000M36
    G0X[#531+.100]A.600Z1.240C0T6
    M01
    G101G1X.866F.010
    A-.600F.005
    W-.140F.010
    A.600F.005
    G0H180.0
    Z1.240
    G1A-.600
    W-.140F.010
    A.600F.005
    G0X2.0M38
    M59
    M01T0
    GOTO2000
    
    N1000
    N4(MILL 22MM FLATS IF SR)
    (#102=1.01)
    T600
    S2000M36
    G0Y[#531+.100]A.600Z1.240C0T6
    M01
    G101G1Y.866F.010
    X-1.200F.005
    W-.140F.010
    X1.200F.005
    G0H180.0
    Z1.240
    G1X-1.200
    W-.140F.010
    X1.200F.005
    G0Y4.0M38
    M59
    M01T0
    
    N2000
    N5(TURN PIN) 
    T200 
    G97S3000M3 
    G0X[#531+.100]Z1.200T2
    M01
     
    IF[#100LT1.0]GOTO100
     
    (TURN BIG PEN)
    (MAKES 45 DEGREE ANGLE UP)
    (TO PIN DIAMETER) 
    G99G1X1.005F.002
    Z1.245
    #33=[[1.0-#100]/2]
    (#33=Z MOVE FOR 45 DEGREE ANGLE)
    X#100W#33 
    Z[2.680+#101]
    X#531W.050
    W.050
    GOTO200
     
    N100(TURN SMALL PIN)
    (MAKES 30 DEGREE ANGLE)
    (DOWN TO PIN DIAMETER)
    #32=[[[1.0-#100]/2]*1.732] 
    (#32=Z MOVE FOR 30 DEGREE ANGLE)
    G99G1X1.005F.002 
    Z1.245 
    X#100W#32 
    Z[2.680+#101]
    X#531W.050
    W.050
     
    N200 
    G0X2.0 
    M01T0
     
    N6(CUTOFF)
    (RADIUS END OF PIN) 
    T100 
    G97S2500M3 
    G0X[#531+.100]Z[2.680+#101]T1 
    M01
    G99G1X[#100-.150]
    X[#100+.100]
    W-.050
    X[#100+.002]
    G2U-.100W.050R.050
    G1X.100F.001
    X0F.0005 
    X-.060F.002
    M99
    
    (MACRO ALARMS)
    N3300
    #3000=300(BARSTOCK TOO SMALL)
    N3310
    #3000=310(BARSTOCK TOO BIG)
    N3320
    #3000=320(PIN DIAMETER TOO SMALL)
    N3330
    #3000=330(PIN DIAMETER TOO BIG)
    N3340
    #3000=340(PIN EXTENSION LESS THAN ZERO)
    N3350
    #3000=350(PIN EXTENSION TOO LONG)
    N3355
    #3000=355(MACHINE TYPE SETTING ERROR)
    N3360
    #3000=360(T2 T DATA IS NOT 4)
    N3370
    #3000=370(T2 R DATA TOO LARGE)
    N3380
    #3000=380(T1 Z DATA TOO SMALL)
    N3385
    #3000=385(T1 T DATA IS NOT 3)
    N3386
    #3000=386(T1 R DATA TOO LARGE)
    N3390
    #3000=390(T3 Z DATA TOO SMALL)
    N3400
    #3000=400(T3 Z DATA TOO LARGE)
    N3410
    #3000=410(T6 Z DATA TOO LARGE)
    N3420
    #3000-420(T6 Z DATA TOO SMALL)
    %

    ---

Return to Star Tech Center, Ohio, Main Page