UPDATE:
Fixed G91 G90 incremental and absolute computing (i think
)
Added a new feature LBLize, yes because i want to kill my brain
This funtion replace repeated movements with LBL's
Need to be tested but seems to work correctly
- rep.jpg (23.79 KiB) Viewed 3865 times
The picture show a profile path repeated with different depth values
And the original code is very long
Code: Select all
0 BEGIN PGM MyJob MM
1 TOOL CALL 1 Z S1600 ;FR D6
2 L Z100.000 R0 F8000 M3
3 L X-50.000 Y30.000 Z6.000 R0 F8000 M
4 L Z100.000 R0 F8000 M
5 L Y1.000 Z-2.000 R0 F1000 M
6 L X-39.948 R0 F480 M
7 CC X-39.999 Y-14.999
8 C X-24.000 Y-14.948 DR- R0 F480 M
9 L Y-67.550 R0 F480 M
10 CC X-29.989 Y-67.402
11 C X-28.764 Y-73.266 DR- R0 F480 M
12 CC X-29.987 Y-67.551
13 C X-31.395 Y-73.224 DR- R0 F480 M
14 L X-96.226 Y-55.852 R0 F480 M
15 CC X-82.996 Y-6.635
16 C X-107.938 Y-51.079 DR- R0 F480 M
17 CC X-173.791 Y-167.883
18 C X-139.105 Y-38.358 DR+ R0 F480 M
19 L X-183.903 Y-26.355 R0 F480 M
20 CC X-182.200 Y-20.601
21 C X-182.355 Y-14.602 DR- R0 F480 M
22 L X-120.695 R0 F480 M
23 CC X-120.631 Y-13.352
24 C X-119.951 Y-14.402 DR+ R0 F480 M
25 L X-94.595 Y0.237 R0 F480 M
26 CC X-91.680 Y-4.947
27 C X-91.748 Y1.000 DR- R0 F480 M
28 L X-50.000 R0 F480 M
29 L Z-5.000 R0 F1000 M
30 L X-39.948 R0 F480 M
31 CC X-39.999 Y-14.999
32 C X-24.000 Y-14.948 DR- R0 F480 M
33 L Y-67.550 R0 F480 M
34 CC X-29.989 Y-67.402
35 C X-28.764 Y-73.266 DR- R0 F480 M
36 CC X-29.987 Y-67.551
37 C X-31.395 Y-73.224 DR- R0 F480 M
38 L X-96.226 Y-55.852 R0 F480 M
39 CC X-82.996 Y-6.635
40 C X-107.938 Y-51.079 DR- R0 F480 M
41 CC X-173.791 Y-167.883
42 C X-139.105 Y-38.358 DR+ R0 F480 M
43 L X-183.903 Y-26.355 R0 F480 M
44 CC X-182.200 Y-20.601
45 C X-182.355 Y-14.602 DR- R0 F480 M
46 L X-120.695 R0 F480 M
47 CC X-120.631 Y-13.352
48 C X-119.951 Y-14.402 DR+ R0 F480 M
49 L X-94.595 Y0.237 R0 F480 M
50 CC X-91.680 Y-4.947
51 C X-91.748 Y1.000 DR- R0 F480 M
52 L X-50.000 R0 F480 M
53 L Z-8.000 R0 F1000 M
54 L X-39.948 R0 F480 M
55 CC X-39.999 Y-14.999
56 C X-24.000 Y-14.948 DR- R0 F480 M
57 L Y-67.550 R0 F480 M
58 CC X-29.989 Y-67.402
59 C X-28.764 Y-73.266 DR- R0 F480 M
60 CC X-29.987 Y-67.551
61 C X-31.395 Y-73.224 DR- R0 F480 M
62 L X-96.226 Y-55.852 R0 F480 M
63 CC X-82.996 Y-6.635
64 C X-107.938 Y-51.079 DR- R0 F480 M
65 CC X-173.791 Y-167.883
66 C X-139.105 Y-38.358 DR+ R0 F480 M
67 L X-183.903 Y-26.355 R0 F480 M
68 CC X-182.200 Y-20.601
69 C X-182.355 Y-14.602 DR- R0 F480 M
70 L X-120.695 R0 F480 M
71 CC X-120.631 Y-13.352
72 C X-119.951 Y-14.402 DR+ R0 F480 M
73 L X-94.595 Y0.237 R0 F480 M
74 CC X-91.680 Y-4.947
75 C X-91.748 Y1.000 DR- R0 F480 M
76 L X-50.000 R0 F480 M
77 L Z-10.000 R0 F1000 M
78 L X-39.948 R0 F480 M
79 CC X-39.999 Y-14.999
80 C X-24.000 Y-14.948 DR- R0 F480 M
81 L Y-67.550 R0 F480 M
82 CC X-29.989 Y-67.402
83 C X-28.764 Y-73.266 DR- R0 F480 M
84 CC X-29.987 Y-67.551
85 C X-31.395 Y-73.224 DR- R0 F480 M
86 L X-96.226 Y-55.852 R0 F480 M
87 CC X-82.996 Y-6.635
88 C X-107.938 Y-51.079 DR- R0 F480 M
89 CC X-173.791 Y-167.883
90 C X-139.105 Y-38.358 DR+ R0 F480 M
91 L X-183.903 Y-26.355 R0 F480 M
92 CC X-182.200 Y-20.601
93 C X-182.355 Y-14.602 DR- R0 F480 M
94 L X-120.695 R0 F480 M
95 CC X-120.631 Y-13.352
96 C X-119.951 Y-14.402 DR+ R0 F480 M
97 L X-94.595 Y0.237 R0 F480 M
98 CC X-91.680 Y-4.947
99 C X-91.748 Y1.000 DR- R0 F480 M
100 L X-50.000 R0 F480 M
101 L Z6.000 R0 F8000 M5
102 END PGM MyJob MM
After LBLize you can see there's a very big difference
Code: Select all
0 BEGIN PGM MyJob MM
1 TOOL CALL 1 Z S1600 ;FR D6
2 L Z100.000 R0 F8000 M3
3 L X-50.000 Y30.000 Z6.000 R0 F8000 M
4 L Z100.000 R0 F8000 M
5 L Y1.000 Z-2.000 R0 F1000 M
6 LBL 1
7 L X-39.948 R0 F480 M
8 CC X-39.999 Y-14.999
9 C X-24.000 Y-14.948 DR- R0 F480 M
10 L Y-67.550 R0 F480 M
11 CC X-29.989 Y-67.402
12 C X-28.764 Y-73.266 DR- R0 F480 M
13 CC X-29.987 Y-67.551
14 C X-31.395 Y-73.224 DR- R0 F480 M
15 L X-96.226 Y-55.852 R0 F480 M
16 CC X-82.996 Y-6.635
17 C X-107.938 Y-51.079 DR- R0 F480 M
18 CC X-173.791 Y-167.883
19 C X-139.105 Y-38.358 DR+ R0 F480 M
20 L X-183.903 Y-26.355 R0 F480 M
21 CC X-182.200 Y-20.601
22 C X-182.355 Y-14.602 DR- R0 F480 M
23 L X-120.695 R0 F480 M
24 CC X-120.631 Y-13.352
25 C X-119.951 Y-14.402 DR+ R0 F480 M
26 L X-94.595 Y0.237 R0 F480 M
27 CC X-91.680 Y-4.947
28 C X-91.748 Y1.000 DR- R0 F480 M
29 L X-50.000 R0 F480 M
30 LBL 0
31 L Z-5.000 R0 F1000 M
32 CALL LBL 1
33 L Z-8.000 R0 F1000 M
34 CALL LBL 1
35 L Z-10.000 R0 F1000 M
36 CALL LBL 1
37 L Z6.000 R0 F8000 M5
38 END PGM MyJob MM
UPDATED on first post
I think this could be useful