0 BEGIN PGM EXAMPLE_4 MM
1 ;MACHINE PLATE GAUGE
2 ;PROGRAMMER-JOE SMITH
3 ; 10/05/2021 15:08:09
4 ;-------------------
5 ;DRILL 15M HOLES AND CORNERS
6 L Z0 R F MAX M91
7 ;15MM UDRILL
8 TOOL CALL 24 Z S1000
9 L X0.0 Y0.0 R F MAX M03
10 L Z50.0 R F MAX M
11 CYCL DEF 200 DRILLING ~
  Q200=2.0 ;SET-UP CLEARANCE ~
   Q201=-18.0 ;DEPTH ~
   Q206=50.0 ;FEED RATE FOR PLUNGING ~
   Q202=-18.0 ;PLUNGING DEPTH ~
   Q210=0.0 ;DWELL TIME AT TOP ~
   Q203=0.0 ;SURFACE COORDINATE ~
   Q204=10.0 ;2ND SET-UP CLEARANCE ~
   Q211=0.0 ;DWELL TIME AT BOTTOM ~
   Q395=0 ;DEPTH REFERENCE
12 L X-68 Y177 F MAX M99 ;1
13 L X68 Y177 F MAX M99 ;2
14 L X39 Y169 F MAX M99 ;3
15 L X39 Y129 F MAX M99 ;4
16 L X-39 Y129 F MAX M99 ;5
17 L X-39 Y169 F MAX M99 ;6
18 L X-41 Y84 F MAX M99 ;7
19 L X41 Y84 F MAX M99 ;8
20 L Z50 FMAX M05
21 L Z0 R F MAX M91
22 M01
23 ;----------------
24 ;DRILL 30MM HOLES
25 L Z0 R F MAX M91
26 ;30MM UDRILL
27 TOOL CALL 25 Z S1000
28 L X0.0 Y0.0 R F MAX M03
29 L Z50.0 R F MAX M
30 CYCL DEF 200 DRILLING ~
  Q200=2.0 ;SET-UP CLEARANCE ~
   Q201=-20.0 ;DEPTH ~
   Q206=50.0 ;FEED RATE FOR PLUNGING ~
   Q202=-20.0 ;PLUNGING DEPTH ~
   Q210=0.0 ;DWELL TIME AT TOP ~
   Q203=0.0 ;SURFACE COORDINATE ~
   Q204=10.0 ;2ND SET-UP CLEARANCE ~
   Q211=0.0 ;DWELL TIME AT BOTTOM ~
   Q395=0 ;DEPTH REFERENCE
31 L X-76.5 Y99 F MAX M99 ;1
32 L X0 Y84 Y84 F MAX M99 ;2
33 L X76.5 Y99 F MAX M99 ;3
34 L Z50 FMAX M05
35 L Z0 R F MAX M91
36 M01
37 ;----------------
38 ;ROUGH & FINISH 94MM x 56MM RECT POCKET
39 L Z0 R F MAX M91
40 ;12MM CARBIDE END MILL
41 TOOL CALL 6 Z S1000
42 L X0 Y149 R F MAX M03
43 L Z2.0 R F MAX M
44 CYCL DEF 251 RECTANGULAR POCKET 
   Q215=1;MACHINING OPERATION 
   Q218=94;1ST SIDE LENGTH 
   Q219=56;2ND SIDE LENGTH 
   Q220=8;CORNER RADIUS 
   Q368=0.5;ALLOWANCE FOR SIDE 
   Q224=0;ANGLE OF ROTATION 
   Q367=0;POCKET POSITION 
   Q207=80;FEED RATE FOR MILLING 
   Q351=+1;CLIMB OR UP-CUT 
   Q201=-12;DEPTH 
   Q202=4;PLUNGING DEPTH 
   Q369=0;ALLOWANCE FOR FLOOR 
   Q206=25;FEED RATE FOR PLNGNG 
   Q338=30;INFEED FOR FINISHING 
   Q200=2;SET-UP CLEARANCE 
   Q203=0;SURFACE COORDINATE  
   Q204=10;2ND SET-UP CLEARANCE 
   Q370=1.25;TOOL PATH OVERLAP 
   Q366=2;PLUNGE 
   Q385=35;FEED RATE FOR FINISHING
45 CYCL CALL
46 L Z50 FMAX M05
47 M01
48 M09
49 M05
50 L Z0 R F MAX M91
51 M01
52 ;----------------
53 ;MILL 30MM SLOT
54 M09
55 L Z0 R F MAX M91
56 ;20MM CARBIDE END MILL
57 TOOL CALL 5 Z S1000
58 L X0.0 Y84.0 R0 F MAX M03
59 L Z50.0 R F MAX M
60 L Z0 F1500
61 LBL 1
62 L IZ-3 F1500
63 L X0 Y69 RL F100
64 L X41 
65 CC X41.0 Y84.0 
66 C X41.0 Y99.0 DR+ R F100 M
67 L X-41
68 CC X-41.0 Y84.0 
69 C X-41.0 Y69.0 DR+ R F100 M
70 L X0 Y69
71 L Y84 R0
72 LBL 0
73 CALL LBL1 REP3
74 M01
75 ;----------------
76 ;MILL PROFILE
77 M09
78 L Z0 R F MAX M91
79 ;25MM CARBIDE END MILL
80 TOOL CALL 7 Z S1000
81 L X0.0 Y0.0 R F MAX M03
82 L Z50.0 R F MAX M
83 l Z-20
84 L Y50 RL F1500
85 L X-76
86 CC X-76. Y80.0 
87 C X-106.0 Y80.0 DR- R F100 M
88 L Y121
89 L X-84 Y203
90 L X-37.5
91 L Y165
92 L X37.5
93 L Y203
94 L X84
95 L X106 Y121
96 L Y80
97 CC X76.0 Y80.0 
98 C X76.0 Y50.0 DR- R F100 M
99 L X-10
100 L Y0 R0
101 L Z0 R F MAX M91
102 M01
103 ;-------------
104 M09
105 M05
106 L Z0 R F MAX M91
107 END PGM EXAMPLE_4 MM