0 BEGIN PGM OUTPUT INCH 1 BLK FORM 0.1 Z X+0. Y+0. Z+0. 2 BLK FORM 0.2 X+0. Y+0. Z+0. 3 ;Finish Mill1 4 CYCL DEF 247 DATUM SETTING ~ 5 Q339=54 ;DATUM NUMBER 6 CALL LBL 19 7 CALL LBL 91 8 ;1/4 2 FLUTE HSS EM 9 M32 10 TOOL CALL 43 Z S2500 11 TOOL DEF 49 12 L B0 C0 FMAX M91 13 CALL LBL 91 14 FN 0: Q1=10. ; DIPPING PARAMETERS 15 FN 0: Q3=30. ; CUTTING FEED PARAMETER 16 * -******************Profile Operation 17 ; ----- PAH ----- 18 ;RESET PLANE AND ZEROPOINT 19 CALL LBL 19 20 ;GO TO SAFE POSITION 21 CALL LBL 91 22 ; NEW ZEROPOINT / PLANE 23 ; WCS -- YAN3 --- 24 CYCL DEF 7.0 NULLPUNKT 25 CYCL DEF 7.1 X+2.777 26 CYCL DEF 7.2 Y+3.047 27 CYCL DEF 7.3 Z+1.465 28 PLANE SPATIAL SPA+0 SPB+42.031 SPC+56.31 TURN FMAX SEQ- TABLE ROT 29 L X-2.3714 Y+1.0315 R0 F MAX M13 30 L Z+3.013F MAX 31 L Z+2.113 F MAX M08 32 L Z-.25 FQ0 33 L X-4.84 Y+2.4029 FQ0 34 L X-4.8162 Y+2.6581 35 L X+.1581 Y+4.3162 36 L X+.25 Y+4.25 37 L X+.25 Y-.25 38 L X+.0971 Y-.34 39 L X-2.3714 Y+1.0315 40 L Z+2.113 R0 F MAX 41 L Z+3.013 R0 F MAX M09 42 ;Drill1 43 CYCL DEF 247 DATUM SETTING ~ 44 Q339=54 ;DATUM NUMBER 45 CALL LBL 19 46 CALL LBL 91 47 ;1/2 SCREW MACH DRILL 48 TOOL CALL 49 Z S802 49 TOOL DEF 43 50 L B0 C0 FMAX M91 51 CALL LBL 91 52 FN 0: Q1=3.6898 ; DIPPING PARAMETERS 53 FN 0: Q3=3.6898 ; CUTTING FEED PARAMETER 54 L M08 55 ; ----- PAH ----- 56 ;RESET PLANE AND ZEROPOINT 57 CALL LBL 19 58 ;GO TO SAFE POSITION 59 CALL LBL 91 60 ; NEW ZEROPOINT / PLANE 61 ; WCS -- YAN3 --- 62 CYCL DEF 7.0 NULLPUNKT 63 CYCL DEF 7.1 X+2.777 64 CYCL DEF 7.2 Y+3.047 65 CYCL DEF 7.3 Z+1.465 66 PLANE SPATIAL SPA+0 SPB+42.031 SPC+56.31 TURN FMAX SEQ- TABLE ROT 67 * -******************Drill Operation 68 L X-1.4847 Y+2.2184 R0 FMAX M13 69 L Z-.5 R0 F MAX 70 L X-1.4847 Y+2.2184 R0 F MAX M13 71 CYCL DEF 200 DRILL ~ Q200=.1 ;SET-UP CLEARANCE ~ Q201=-.5 ;DEPTH ~ Q206=3.6898 ;FEED RATE FOR PLUNGING ~ Q202=.1 ;PLUNGING DEPTH ~ Q210=0 ;DWELL TIME AT TOP ~ Q203=+0. ;SURFACE COORDINATE ~ Q204=3.013 ;2ND SET-UP CLEARANCE ~ Q211=0 ;DWELL TIME AT DEPTH 72 L X-1.4847 Y+2.2184 R0 F MAX M13 73 L Z+.1 R0 F MAX M99 74 L Z+3.013 R0 F MAX 75 M09 M05 76 ;RESET PLANE AND ZEROPOINT 77 CALL LBL 19 78 ;GO TO SAFE POSITION 79 CALL LBL 91 80 M01 81 L B+Q121 C+Q122 R0 FMAX 82 M127 83 STOP M30 84 LBL 19 85 ;RESET PLANE AND ZEROPOINT 86 PLANE RESET STAY 87 CYCL DEF 7.0 NULLPUNKT 88 CYCL DEF 7.1 X+0. 89 CYCL DEF 7.2 Y+0. 90 CYCL DEF 7.3 Z+0. 91 LBL 0 92 LBL 91 93 ;GO TO SAFE POSITION 94 L Z+0. R0 FMAX M91 95 L X+0 Y+0 R0 FMAX M91 96 LBL 0 97 END PGM 1 INCH