Lochbild in Rasterplatte von Smaler, 1000 Löcher und mehr !!!

Hallo,

noch eine Antwort auf Smaler´s Frage.

Habe da noch eine Möglichkeit, wie man X-beliebig viele Löcher bohren kann, wenn die Zeichung als DXF vorliegt.
Da benutze ich den CNC-EDITOR von Mauritzio Manzi,denn da kann man Bohrbilder aus DXF einlesen.Der rattert dann die Koordinaten in wenigen Min. herrunter.Dann noch ein paar kleine Ergänzungen und das Prg. ist fertig.
Habe unter Smaler´s Frage einen Ausschnitt aus einem Prg. angehängt.


Gruß an alle

Fidi

Dieses ist die Frage von Smaler
Guten Tag CNC'ler!

Ich wende mich an diejenigen, die mir für eine HH-407 bis max. Dienstag ein Programmbeispiel zur Verfügung stellen könnten mit dem ich eine Rasterplatte mit über 1000 Bohrungen fertigen kann.
Die Zeichnung liegt mir im Moment nicht vor, aber ich glaube es sind 1135 Stiche (also 25 * 41).

.

Gruß

0 BEGIN PGM 50092281 MM
1 BLK FORM 0.1 Z X-325,000 Y-325,000 Z-560,300
2 BLK FORM 0.2 X+325,000 Y+325,000 Z-535,300
3 CYCL DEF 7.0 NULLPUNKT
4 CYCL DEF 7.1 X+0,000
5 CYCL DEF 7.2 Y+0,000
6 CYCL DEF 7.3 Z-560,300
7 CYCL DEF 7.0 NULLPUNKT
8 CYCL DEF 7.1 IZ+25,000
9 LBL 10
10 TOOL CALL 0 Z S
11 L X+0,000 Y+0,000 Z+534,000 R0 F9998 M09
12 STOP M06
13 LBL 0
14 TOOL CALL 28 Z S 1100
15 CYCL DEF 1.0 TIEFBOHREN
16 CYCL DEF 1.1 ABST -2,000
17 CYCL DEF 1.2 TIEFE -7,500
18 CYCL DEF 1.3 ZUSTLG-7,500
19 CYCL DEF 1.4 V.ZEIT0,000
20 CYCL DEF 1.5 F220
21 L X+102,500 Y+177,535 R0 F9998 M03
22 Z+2,000 R F M08
23 CALL LBL 2 REP
24 L X-102,500 Y+177,535 R0 F MAX M
25 CALL LBL 2 REP
26 L X+102,500 Y-177,535 R0 F MAX M
27 CALL LBL 2 REP
28 L X-102,500 Y-177,535 R0 F MAX M
29 CALL LBL 2 REP
30 L X+205,000 Y+0,000 R0 F MAX M
31 CALL LBL 2 REP
32 L X-205,000 Y+0,000 R0 F MAX M
33 CALL LBL 2 REP
34 CALL LBL 10 REP
35 TOOL CALL 29 Z S 1880
36 CYCL DEF 1.0 TIEFBOHREN
37 CYCL DEF 1.1 ABST -2,000
38 CYCL DEF 1.2 TIEFE -28,000
39 CYCL DEF 1.3 ZUSTLG-28,000
40 CYCL DEF 1.4 V.ZEIT0,000
41 CYCL DEF 1.5 F124
42 L X+138,467 Y+271,757 R0 F9998 M03
43 Z+2,000 R F M08
44 CALL LBL 1 REP
45 L X-138,467 Y+271,757 R0 F MAX M
46 CALL LBL 1 REP
47 L X+138,467 Y-271,757 R0 F MAX M
48 CALL LBL 1 REP
49 L X-138,467 Y-271,757 R0 F MAX M
50 CALL LBL 1 REP
51 L X+215,668 Y+215,668 R0 F MAX M
52 CALL LBL 1 REP
53 L X-215,668 Y+215,668 R0 F MAX M
54 CALL LBL 1 REP
55 L X+215,668 Y-215,668 R0 F MAX M
56 CALL LBL 1 REP
57 L X-215,668 Y-215,668 R0 F MAX M
58 CALL LBL 1 REP
59 L X+271,757 Y+138,467 R0 F MAX M
60 CALL LBL 1 REP
61 L X-271,757 Y+138,467 R0 F MAX M
62 CALL LBL 1 REP
63 L X+271,757 Y-138,467 R0 F MAX M
64 CALL LBL 1 REP
65 L X-271,757 Y-138,467 R0 F MAX M
66 CALL LBL 1 REP
67 L X+301,245 Y+47,713 R0 F MAX M
68 CALL LBL 1 REP
69 L X-301,245 Y+47,713 R0 F MAX M
70 CALL LBL 1 REP
71 L X+301,245 Y-47,713 R0 F MAX M
72 CALL LBL 1 REP
73 L X-301,245 Y-47,713 R0 F MAX M
74 CALL LBL 1 REP
75 L X+47,713 Y+301,245 R0 F MAX M
76 CALL LBL 1 REP
77 L X-47,713 Y+301,245 R0 F MAX M
78 CALL LBL 1 REP
79 L X+47,713 Y-301,245 R0 F MAX M
80 CALL LBL 1 REP
81 L X-47,713 Y-301,245 R0 F MAX M
82 CALL LBL 1 REP
83 CALL LBL 10 REP
84 TOOL CALL 30 Z S 1217
85 CYCL DEF 1.0 TIEFBOHREN
86 CYCL DEF 1.1 ABST -2,000
87 CYCL DEF 1.2 TIEFE -29,000
88 CYCL DEF 1.3 ZUSTLG-29,000
89 CYCL DEF 1.4 V.ZEIT0,000
90 CYCL DEF 1.5 F124
91 L X+0,000 Y+0,000 R0 F9998 M03
92 Z+2,000 R F M08
93 CALL LBL 3 REP
94 L X+0,000 Y+148,956 R0 F MAX M
95 CALL LBL 3 REP
96 L X+0,000 Y-148,956 R0 F MAX M
97 CALL LBL 3 REP
98 L X+0,000 Y+74,478 R0 F MAX M
99 CALL LBL 3 REP
100 L X+0,000 Y-74,478 R0 F MAX M
101 CALL LBL 3 REP
102 L X+107,500 Y+111,717 R0 F MAX M
103 CALL LBL 3 REP
104 L X-107,500 Y+111,717 R0 F MAX M
105 CALL LBL 3 REP
106 L X+107,500 Y-111,717 R0 F MAX M
107 CALL LBL 3 REP
108 L X-107,500 Y-111,717 R0 F MAX M
109 CALL LBL 3 REP
110 L X+107,500 Y+37,239 R0 F MAX M
111 CALL LBL 3 REP
112 L X-107,500 Y+37,239 R0 F MAX M
113 CALL LBL 3 REP
114 L X+107,500 Y-37,239 R0 F MAX M
115 CALL LBL 3 REP
116 L X-107,500 Y-37,239 R0 F MAX M
117 CALL LBL 3 REP
118 L X+129,000 Y+0,000 R0 F MAX M
119 CALL LBL 3 REP
120 L X-129,000 Y+0,000 R0 F MAX M
121 CALL LBL 3 REP
122 L X+129,000 Y+148,956 R0 F MAX M
123 CALL LBL 3 REP
124 L X-129,000 Y+148,956 R0 F MAX M
125 CALL LBL 3 REP
126 L X+129,000 Y-148,956 R0 F MAX M
127 CALL LBL 3 REP
128 L X-129,000 Y-148,956 R0 F MAX M
129 CALL LBL 3 REP
130 L X+129,000 Y+74,478 R0 F MAX M
131 CALL LBL 3 REP
132 L X-129,000 Y+74,478 R0 F MAX M
133 CALL LBL 3 REP
134 L X+129,000 Y-74,478 R0 F MAX M
135 CALL LBL 3 REP
136 L X-129,000 Y-74,478 R0 F MAX M
137 CALL LBL 3 REP
138 L X+150,500 Y+111,717 R0 F MAX M
139 CALL LBL 3 REP
140 L X-150,500 Y+111,717 R0 F MAX M
141 CALL LBL 3 REP
142 L X+150,500 Y-111,717 R0 F MAX M
143 CALL LBL 3 REP
144 L X-150,500 Y-111,717 R0 F MAX M
145 CALL LBL 3 REP
146 L X+150,500 Y+37,239 R0 F MAX M
147 CALL LBL 3 REP
148 L X-150,500 Y+37,239 R0 F MAX M
149 CALL LBL 3 REP
150 L X+150,500 Y-37,239 R0 F MAX M
151 CALL LBL 3 REP
152 L X-150,500 Y-37,239 R0 F MAX M
153 CALL LBL 3 REP
154 L X+172,000 Y+0,000 R0 F MAX M
155 CALL LBL 3 REP
156 L X-172,000 Y+0,000 R0 F MAX M
157 CALL LBL 3 REP
158 L X+172,000 Y+74,478 R0 F MAX M
159 CALL LBL 3 REP
160 L X-172,000 Y+74,478 R0 F MAX M
161 CALL LBL 3 REP
162 L X+172,000 Y-74,478 R0 F MAX M
163 CALL LBL 3 REP
164 L X-172,000 Y-74,478 R0 F MAX M
165 CALL LBL 3 REP
166 L X+21,500 Y+111,717 R0 F MAX M
167 CALL LBL 3 REP
168 L X-21,500 Y+111,717 R0 F MAX M
169 CALL LBL 3 REP
170 L X+21,500 Y-111,717 R0 F MAX M
171 CALL LBL 3 REP
172 L X-21,500 Y-111,717 R0 F MAX M
173 CALL LBL 3 REP
174 L X+21,500 Y+186,195 R0 F MAX M
175 CALL LBL 3 REP
176 L X-21,500 Y+186,195 R0 F MAX M
177 CALL LBL 3 REP
178 L X+21,500 Y-186,195 R0 F MAX M
179 CALL LBL 3 REP
180 L X-21,500 Y-186,195 R0 F MAX M
181 CALL LBL 3 REP
182 L X+21,500 Y+37,239 R0 F MAX M
183 CALL LBL 3 REP
184 L X-21,500 Y+37,239 R0 F MAX M
185 CALL LBL 3 REP
186 L X+21,500 Y-37,239 R0 F MAX M
187 CALL LBL 3 REP
188 L X-21,500 Y-37,239 R0 F MAX M
189 CALL LBL 3 REP
190 L X+43,000 Y+0,000 R0 F MAX M
191 CALL LBL 3 REP
192 L X-43,000 Y+0,000 R0 F MAX M
193 CALL LBL 3 REP
194 L X+43,000 Y+148,956 R0 F MAX M
195 CALL LBL 3 REP
196 L X-43,000 Y+148,956 R0 F MAX M
197 CALL LBL 3 REP
198 L X+43,000 Y-148,956 R0 F MAX M
199 CALL LBL 3 REP
200 L X-43,000 Y-148,956 R0 F MAX M
201 CALL LBL 3 REP
202 L X+43,000 Y+74,478 R0 F MAX M
203 CALL LBL 3 REP
204 L X-43,000 Y+74,478 R0 F MAX M
205 CALL LBL 3 REP
206 L X+43,000 Y-74,478 R0 F MAX M
207 CALL LBL 3 REP
208 L X-43,000 Y-74,478 R0 F MAX M
209 CALL LBL 3 REP
210 L X+64,500 Y+111,717 R0 F MAX M
211 CALL LBL 3 REP
212 L X-64,500 Y+111,717 R0 F MAX M
213 CALL LBL 3 REP
214 L X+64,500 Y-111,717 R0 F MAX M
215 CALL LBL 3 REP
216 L X-64,500 Y-111,717 R0 F MAX M
217 CALL LBL 3 REP
218 L X+64,500 Y+37,239 R0 F MAX M
219 CALL LBL 3 REP
220 L X-64,500 Y+37,239 R0 F MAX M
221 CALL LBL 3 REP
222 L X+64,500 Y-37,239 R0 F MAX M
223 CALL LBL 3 REP
224 L X-64,500 Y-37,239 R0 F MAX M
225 CALL LBL 3 REP
226 L X+86,000 Y+0,000 R0 F MAX M
227 CALL LBL 3 REP
228 L X-86,000 Y+0,000 R0 F MAX M
229 CALL LBL 3 REP
230 L X+86,000 Y+148,956 R0 F MAX M
231 CALL LBL 3 REP
232 L X-86,000 Y+148,956 R0 F MAX M
233 CALL LBL 3 REP
234 L X+86,000 Y-148,956 R0 F MAX M
235 CALL LBL 3 REP
236 L X-86,000 Y-148,956 R0 F MAX M
237 CALL LBL 3 REP
238 L X+86,000 Y+74,478 R0 F MAX M
239 CALL LBL 3 REP
240 L X-86,000 Y+74,478 R0 F MAX M
241 CALL LBL 3 REP
242 L X+86,000 Y-74,478 R0 F MAX M
243 CALL LBL 3 REP
244 L X-86,000 Y-74,478 R0 F MAX M
245 CALL LBL 3 REP
246 Z+50,000 R0 F9998 M09
247 TOOL CALL 0 Z S
248 L X+0,000 Y+300,000 Z+534,000 R0 F9998 M30
249 LBL 1
250 CYCL CALL M
251 LBL 0
252 LBL 2
253 CYCL CALL M
254 LBL 0
255 LBL 3
256 CYCL CALL M
257 LBL 0
258 END PGM 50092281 MM

Hallo,
jetzt mal eine Dumme Frage,
wieso wird nach jeder Position der Zyklus mit
Call LBL 2
(LBL 2
253 CYCL CALL M
254 LBL 0)
aufgerufen .

Das wäre doch viel einfacher wenn in jedem Satz M99 steht, oder M98 beim ersten .
Dann wird bei allen folgenden Sätzen automatisch der letzte Zyklus abgearbeitet. Mit M99 bei der letzten Bohrung wird M89 wieder aufgehoben.
15 CYCL DEF 1.0 TIEFBOHREN
16 CYCL DEF 1.1 ABST -2,000
17 CYCL DEF 1.2 TIEFE -7,500
18 CYCL DEF 1.3 ZUSTLG-7,500
19 CYCL DEF 1.4 V.ZEIT0,000
20 CYCL DEF 1.5 F220
21 L X+102,500 Y+177,535 R0 F9998 M03
22 Z+2,000 R F M89
24 L X-102,500 Y+177,535 R0 F MAX M
26 L X+102,500 Y-177,535 R0 F MAX M
28 L X-102,500 Y-177,535 R0 F MAX M
30 L X+205,000 Y+0,000 R0 F MAX M
32 L X-205,000 Y+0,000 R0 F MAX M99

Wenn ich mich nicht vertan hab ist das doch ein regelmässiges Lochmuster
in X von - nach +172 mit Sprung von 21.5 und in Y von -nach +148.956 mit Abstand von 37.239.

Wenn das mit modalem Aufruf als Lochreihe programmiert wird ist das alles in 11 Sätzen erledigt. wobei ich davon ausgeh dass HH das wirklich in einem und nicht in nem halben Dutzend sätzen macht. Ansonsten könnte man das mit 2 geschachtelten schleifen ebenfalls programmieren.

ungefähr so

Q1=-172 ;X-Wert
Q2=-148.956 ;Y-Wert
lbl1
lbl2
X=q1 Y=q2
Bohrzyklusaufruf
Q1=Q1+21.5
if Q1 <172 then lbl2
q2=Q2+37.239
If Q2 < 148.956 then lbl1

Ich kenn mich mit HH nur ganz wenig aus also wenn da ein oder mehrere Fehler drin sind sagt mir wo.

Auf die Methode können, selbst wenns um ne Million Löcher gehen sollte die gebraucht werden die Positionen ganz simpel berechnet werden. Wichtig ist nur dass die Abstände irgendwie regelmässig angeordnet sind.

Hallo Anton,

das gleiche habe ich auch erst gedacht und wollte schon eine E-Mail schicken,um zu Fragen warum nicht mit M99.

Dann kam die Erleuchtung !!

Es wird ja erst ein Koordinatensatz und dann ein Unterprog.-aufruf geschrieben. Der Vorteil bei dieser programmierweise ist, daß man im Unterprg. eigendlich alles schreiben kann, ob es M99 oder Konturen sind.

Also, ich meine das diese Art zu programmieren nicht das schlechteste ist.
Hat mir schon ne Menge Zeitersparniss eingebracht.
Was auch noch einen Vorteil ist, daß man keine Positionsfehler hat,weil das eintippen ja wegfällt.



Gruß

Fidi