kamar pisze:Robota lubi ......
No lubi,

kamar pisze:Robota lubi ......

Kod: Zaznacz cały
%
O1000 (Subrutyna - Gwintowanie frezem)
(Parametry wejsciowe:)
(#1 = X pozycja srodka otworu)
(#2 = Y pozycja srodka otworu)
(#3 = Z pozycja gornej krawedzi gwintu)
(#4 = Srednica nominalna gwintu)
(#5 = Skok gwintu)
(#6 = Glebokosc gwintu)
(#7 = Srednica frezu)
(Obliczenia)
#100 = [#4 - #7] / 2 (Promien ruchu srodka frezu)
#101 = #3 - #6 (Z koncowe)
#102 = #5 (Skok na obrot)
(Bezpieczne podejscie)
G00 X#1 Y#2 (Nad srodkiem otworu)
G00 Z[#3 + 5.0] (Bezpieczna wysokosc)
G01 Z[#3 + 2.0] F500 (Zbliżenie)
(Wejscie na promien)
G01 X[#1 + #100] F300
(Gwintowanie spiralne)
G91 (Tryb przyrostowy)
G03 X0 Y0 Z-#102 I-#100 J0 F200 (Pierwszy obrot w dol)
G90 (Tryb absolutny)
(Petla gwintowania)
#103 = #3 (Aktualna glebokosc Z)
WHILE [#103 GT #101] DO1
#103 = #103 - #102 (Zmniejsz Z o skok)
IF [#103 LT #101] THEN #103 = #101 (Korekta ostatniego przejscia)
G91
G03 X0 Y0 Z-#102 I-#100 J0 F200
G90
END1
(Wyjscie z gwintu - 1 obrot bez zaglebienia)
G91
G03 X0 Y0 Z0 I-#100 J0 F200
G90
(Wyjscie ze srodka)
G01 X#1 Y#2 F300
(Bezpieczny powrot)
G00 Z[#3 + 5.0]
M99 (Powrot z subrutyny)
%

kamar pisze:Zajęło mu to ze trzy minuty

A powinieneś...
Kod: Zaznacz cały
(Bezpieczne podejscie)
G00 X#1 Y#2 (Nad srodkiem otworu)
G00 Z[#3 + 5.0] (Bezpieczna wysokosc)
G01 Z[#3 + 2.0] F500 (Zbliżenie)
W razie gdyby to rzeczywiście kogoś interesowało to poszczególne narzędzia wykroiły wierszy :

ZX Spectrum miało 48 kilobajtów RAM, pierwsze pecety 640 kilobajtów, ale zupełnie nie o to chodzi.


tuxcnc pisze:Jeśli na przykład zechcesz przesunąć jeden otwór, to będziesz musiał zrobić to w CAD
