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 TOOL CALL 43 Z S2500 10 TOOL DEF 49 11 L B0 C0 FMAX M91 12 CALL LBL 91 13 FN 0: Q1=10. ; DIPPING PARAMETERS 14 FN 0: Q3=30. ; CUTTING FEED PARAMETER 15 ;******************Profile Operation 16 ; ----- PAH ----- 17 ;RESET PLANE AND ZEROPOINT 18 CALL LBL 19 19 ;GO TO SAFE POSITION 20 CALL LBL 91 21 ; NEW ZEROPOINT / PLANE 22 ; WCS -- YAN3 --- 23 ; ANGLES: B42.031 C56.31 --- 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 ; ANGLES: B42.031 C56.31 --- 63 CYCL DEF 7.0 NULLPUNKT 64 CYCL DEF 7.1 X+2.777 65 CYCL DEF 7.2 Y+3.047 66 CYCL DEF 7.3 Z+1.465 67 PLANE SPATIAL SPA+0 SPB+42.031 SPC+56.31 TURN FMAX SEQ+ TABLE ROT 68 ;******************Drill Operation 69 L X-1.4847 Y+2.2184 R0 FMAX M13 70 L Z-.5 R0 F MAX 71 L X-1.4847 Y+2.2184 R0 F MAX M13 72 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 73 L X-1.4847 Y+2.2184 R0 F MAX M13 74 L Z+.1 R0 F MAX M99 75 L Z+3.013 R0 F MAX 76 M09 M05 77 ;RESET PLANE AND ZEROPOINT 78 CALL LBL 19 79 ;GO TO SAFE POSITION 80 CALL LBL 91 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 OUTPUT INCH