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 A0 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 CYCL DEF 7.0 NULLPUNKT 24 CYCL DEF 7.1 X+2.777 25 CYCL DEF 7.2 Y+3.047 26 CYCL DEF 7.3 Z+1.465 27 PLANE SPATIAL SPA+42.0311 SPB+0. SPC+56.3099 TURN MB MAX F MAX SEQ- TABLE ROT 28 L X-2.3714 Y+1.0315 R0 F MAX M13 29 L Z+3.013F MAX 30 L Z+2.113 F MAX M08 31 L Z-.25 FQ0 32 L X-4.84 Y+2.4029 FQ0 33 L X-4.8162 Y+2.6581 34 L X+.1581 Y+4.3162 35 L X+.25 Y+4.25 36 L X+.25 Y-.25 37 L X+.0971 Y-.34 38 L X-2.3714 Y+1.0315 39 L Z+2.113 R0 F MAX 40 L Z+3.013 R0 F MAX M09 41 ;Drill1 42 CYCL DEF 247 DATUM SETTING ~ 43 Q339=54 ;DATUM NUMBER 44 CALL LBL 19 45 CALL LBL 91 46 ;1/2 SCREW MACH DRILL 47 TOOL CALL 49 Z S802 48 TOOL DEF 43 49 L A0 C0 FMAX M91 50 CALL LBL 91 51 FN 0: Q1=3.6898 ; DIPPING PARAMETERS 52 FN 0: Q3=3.6898 ; CUTTING FEED PARAMETER 53 L M08 54 ; ----- PAH ----- 55 ;RESET PLANE AND ZEROPOINT 56 CALL LBL 19 57 ;GO TO SAFE POSITION 58 CALL LBL 91 59 ; NEW ZEROPOINT / PLANE 60 ; WCS -- YAN3 --- 61 CYCL DEF 7.0 NULLPUNKT 62 CYCL DEF 7.1 X+2.777 63 CYCL DEF 7.2 Y+3.047 64 CYCL DEF 7.3 Z+1.465 65 PLANE SPATIAL SPA+42.0311 SPB+0. SPC+56.3099 TURN MB MAX F MAX SEQ- TABLE ROT 66 * -******************Drill Operation 67 L X-1.4847 Y+2.2184 R0 FMAX M13 68 L Z-.5 R0 F MAX 69 L X-1.4847 Y+2.2184 R0 F MAX M13 70 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 71 L X-1.4847 Y+2.2184 R0 F MAX M13 72 L Z+.1 R0 F MAX M99 73 L Z+3.013 R0 F MAX 74 M09 M05 75 ;RESET PLANE AND ZEROPOINT 76 CALL LBL 19 77 ;GO TO SAFE POSITION 78 CALL LBL 91 79 L A+Q121 C+Q122 R0 FMAX 80 M129 81 STOP M30 ; 82 LBL 19 83 ;RESET PLANE AND ZEROPOINT 84 PLANE RESET STAY 85 CYCL DEF 7.0 NULLPUNKT 86 CYCL DEF 7.1 X+0. 87 CYCL DEF 7.2 Y+0. 88 CYCL DEF 7.3 Z+0. 89 LBL 0 90 LBL 91 91 ;GO TO SAFE POSITION 92 L Z+0. R0 FMAX M91 93 L X+0 Y+0 R0 FMAX M91 94 LBL 0 95 END PGM OUTPUT INCH