N10 G70 N20 G17 G90 G40 G64 N30; N40 CYCLE832(0,_OFF,1) N50;------------------------------------------- N60; --- TOOLLIST BEGIN --- N70; T43 ENDMILL Dia..5 "1/4 2 FLUTE HSS EM" N80; T49 DRILL Dia..5 "1/2 SCREW MACH DRILL" N90;------------------------------------------------- N100; --- TOOLLIST END --- N110 TRAFOOF N120 CYCLE800() N130; N140;--- HOME POSITION ----------------------------- N150 G0 G153 Z-0.1 D0 N160 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N170;----------------------------------------------- N180; N190 MSG("1/4 2 FLUTE HSS EM") N200 T43 N210; T="1/4 2 FLUTE HSS EM" N220 M6 N230 M1 N240;--- HOME POSITION ----------------------------- N250 G0 G153 Z-0.1 D0 N260 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N270;----------------------------------------------- N280; N290 T49 N300 D1 ; Tool Reference tip N310; N320 G0 G17 G90 G54 S2500 M3 N330 M8 N340 MSG("******************Profile Operation") N350 CYCLE800() N360; N370;--- HOME POSITION ----------------------------- N380 G0 G153 Z-0.1 D0 N390 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N400;----------------------------------------------- N410; N420 CYCLE800(0,"DMG",100000,57,0,0,0,42.031,56.31,0,0,0,0,-1,100,0) N430 X-2.3714 Y1.0315 Z3.013 N440 X-2.3714 Y1.0315 N450 Z2.113 N460 G1 Z-.25 F10. N470 X-4.84 Y2.4029 F30. N480 X-4.8162 Y2.6581 N490 X.1581 Y4.3162 N500 X.25 Y4.25 N510 Y-.25 N520 X.0971 Y-.34 N530 X-2.3714 Y1.0315 N540 G0 Z2.113 N550 Z3.013 M5 M9 N560 TRAFOOF N570 CYCLE800() N580; N590;--- HOME POSITION ----------------------------- N600 G0 G153 Z-0.1 D0 N610 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N620;----------------------------------------------- N630; N640 MSG("1/2 SCREW MACH DRILL") N650 T49 N660; T="1/2 SCREW MACH DRILL" N670 M6 N680 M1 N690;--- HOME POSITION ----------------------------- N700 G0 G153 Z-0.1 D0 N710 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N720;----------------------------------------------- N730; N740 T1 N750 D1 ; Tool Reference tip N760; N770 G0 G17 G90 G54 S802 M3 N780 M8 N790 MSG("******************Drill Operation") N800 CYCLE800() N810; N820;--- HOME POSITION ----------------------------- N830 G0 G153 Z-0.1 D0 N840 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N850;----------------------------------------------- N860; N870 CYCLE800(0,"DMG",100000,57,0,0,0,42.031,56.31,0,0,0,0,-1,100,0) N880 X-1.4847 Y2.2184 Z3.013 N890 X-1.4847 Y2.2184 Z-.5 N900 Z3.013 N910 MCALL CYCLE83(3.013,0,.1,,0.5,,.1,1,0.,0.,1,1,3,2,1,0.,) N920 X-1.4847 Y2.2184 F3.6898 N930 MCALL N940 CYCLE800() N950 M1 N960 M9 N970 CYCLE800(1,"DMG",0,57,0,0,0,0,0,0,0,0,0,0,1,) N980 CYCLE800() N990;--- HOME POSITION ----------------------------- N1000 G0 G153 Z-0.1 D0 N1010 G0 G153 X-75 Y-0.2 D1 ; Tool Reference tip N1020;----------------------------------------------- N1030; N1040 M2 ;PROGRAMM END