N1 MSG("PROGRAM DATE - 8-2-2019 Time=15:50:20 ") N2 MSG("PART FILE NAME - Mill 4 axis.SLDPRT") N3 MSG("OPERATION NAME - Finish Mill1") N4 MSG("TOOL NAME - 1" 4 FLUTE HSS EM") N5 MSG("TOOL DIAMETER - 1.000") N6 MSG("TOOL CORNER RAD - .000") N7 MSG("XY ALLOWANCE - .00000") N8 MSG("ESTIMATED RUN TIME= 0 HRS. 3 MIN. 6 SEC.") N9 T23 N10 M06 N11 D01 N12 G00 G90 G40 G94 G70 G64 G54 N13 S2500 M03 N14 SOFT N15 COMPCAD N16 G642 N17 FFWON N18 M08 N19 M24 N20;******************Profile Operation N21 X1.5 Y.5 A0 N22 G00 Z.1 N23 G01 Z-.5 F10. N24 G41 X3.5 Y.5 F30. N25 Y-5.5 N26 X-.5 N27 Y.5 N28 X1.5 N29 G00 Z.1 N30 Z1. N31 M05 N32 M09 N33 G40 X1.5 Y.5 N34 M01 N35 MSG("OPERATION NAME - Drill1") N36 MSG("TOOL NAME - 1/2 COBALT JOBBER DRILL") N37 MSG("TOOL DIAMETER - .500") N38 T43 N39 M06 N40 D01 N41 S1500 M03 N42 M08 N43;******************Drill Operation N44 G00 X1.5 Y-4.5 N45 Z1. N46 Z.1 N47 F5. N48 MCALL CYCLE82(1.,0,.1,-1.,,0,0,0,12) N49 X1.5 Y-4.5 N50 Y-.5 N51 MCALL N52 G00 Z10. N53 M05 N54 M09 N55 M01 N56 MSG("OPERATION NAME - Finish Mill2") N57 MSG("TOOL NAME - 1" 4 FLUTE HSS EM") N58 MSG("TOOL DIAMETER - 1.000") N59 MSG("TOOL CORNER RAD - .000") N60 MSG("XY ALLOWANCE - .00000") N61 T23 N62 M06 N63 D01 N64 S2500 M03 N65 M08 N66;******************Profile Operation N67 Y.5 A90. N68 G00 Z.1 N69 G01 Z-.5 F10. N70 G41 X3.5 Y.5 F30. N71 Y-5.5 N72 X-.5 N73 Y.5 N74 X1.5 N75 G00 Z.1 N76 Z1. N77 M05 N78 M09 N79 G40 X1.5 Y.5 N80 M01 N81 MSG("OPERATION NAME - Drill2") N82 MSG("TOOL NAME - 1/2 COBALT JOBBER DRILL") N83 MSG("TOOL DIAMETER - .500") N84 T43 N85 M06 N86 D01 N87 S1500 M03 N88 M08 N89;******************Drill Operation N90 G00 X1.5 Y-4. N91 Z1. N92 Z.1 N93 F5. N94 MCALL CYCLE82(1.,0,.1,-1.,,0,0,0,12) N95 X1.5 Y-4. N96 Y-1. N97 MCALL N98 G00 Z1. N99 M05 N100 M09 N101ROTS Z0.0 N102 M25 N103 M30