Strona 1 z 1
Wiercenie z "udarem"
: 04 cze 2017, 07:20
autor: kamar
Witam.
Ma ktoś może cykl do wiercenia z wycofaniem o podaną wartość ?
Wiercę w g. aluminium i muszę pokruszyć wióra.
Coś takiego ale w cyklu :
Kod: Zaznacz cały
g0 x0 y0 z0
#1 =0
o100 while [#1 gt -40]
#1=[#1-1]
g1 z#1 f50
g0 z[#1+2]
z#1
o100 endwhile
m30
: 04 cze 2017, 11:22
autor: k-m-r1
G83 Peck Drilling Cycle
G83 axes R L Q
R = Retract Position
L = Repeat
Q = Increment
G73 Drilling Cycle with Chip Breaking
G73 axes R Q L
R = Retract Position
Q = Increment
L = Repeat
Q - przyrost po osi nie możne być 0 lub ujemne to częste błędy
Kod: Zaznacz cały
N2 G90 G80 G40 G54 G20 G17 G50 G94 G64 (safety block)
N5 G90 G80 G20
N10 M06 T3 G43 H3
N15 M03 S1200
N20 G00 X1 Y1
N25 G83 Z-0.75 R0.125 Q0.0625 F5 (Invoke G83 cycle)
N30 X2
N35 X3
N40 Y2
N45 X2
N50 X1
N55 G80 G00 Z1
N60 X0 Y0
N65 M05
N70 M30
N2 G90 G80 G40 G54 G20 G17 G50 G94 G64 (safety block)
N5 G90 G80 G20
N10 M06 T3 G43 H3
N15 M03 S1200
N20 G00 X1 Y1
N25 G73 Z-0.75 R0.125 Q0.0625 F5 (Invoke G73 cycle)
N30 X2.0
N35 X3.0
N40 Y2.0
N45 X2.0
N50 X1.0
N55 G80 G00 Z1 (Canned cycle cancel)
N60 X0 Y0
N65 M05
N70 M30
: 04 cze 2017, 13:31
autor: kamar
Dzięki.
G73 by mogło być gdyby się dało określić wielkość wycofania. Te stale dwie dychy to czasem za mało.
G83 to nie to bo wyjeżdza do wierzchu.
: 04 cze 2017, 16:53
autor: k-m-r1
To pozostaje dogrzebać sie do funkcji G73 w plikach i pozmieniać wartości lub napisać własną funkcje.
: 04 cze 2017, 16:57
autor: kamar
k-m-r1 pisze: lub napisać własną funkcje.
Zawsze lepiej poszukać , a nóż ktoś ma gotowca. Pisze się w ostateczności
Re:
: 19 cze 2018, 07:38
autor: szary11
kamar pisze:
Zawsze lepiej poszukać , a nóż ktoś ma gotowca. Pisze się w ostateczności
jeżeli jeszcze nie masz swojego:
Kod: Zaznacz cały
( ------------------------------ )
( W I E R C E N I E 2 )
( ------------------------------ )
( Adam )
( Time-stamp: <2018-06-10 13:33> )
( wiercenie z urywaniem z użyciem G73, wycofanie przy urwaniu nie jest sterowalne)
( ------------------------------ )
(info: wiercenie )
o<wier> sub
#<glebokosc> = #1 (=-15 Glebokość wiercenia)
#<skok> = #2 (=2 Co ile urwanie)
#<cofniecie_urwania> = #3 (=0.5 Cofnięcie przy urwaniu)
#<skok_cof> = #4 (=5 Co ile wycofanie)
#<predkosc> = #5 (=30 prędkosć)
#<wyjazd> = #6 (=60 wyjazd koncowy)
#<woda> = #7 (=0 <> chłodzenie)
#<nr> = #8 (=12 nr narzędzia)
M6 T#<nr> G43
g61
g17
m3 s500
g0 z10
g0 z2
o1 if [#<woda> eq 1]
M8
o1 endif
o90 if [#<skok_cof> gt 0] (właczone wyrzucanie wiora)
#<aktualna_glebokosc> = 0
#<nowy_start> = #<aktualna_glebokosc>
o95 while [#<aktualna_glebokosc> gt #<glebokosc>]
#<aktualna_glebokosc> = [#<aktualna_glebokosc> - #<skok_cof>]
o96 if[#<aktualna_glebokosc> le #<glebokosc>]
#<aktualna_glebokosc> = #<glebokosc>
o96 endif
g1 z#<nowy_start> F#<predkosc>
o100 if [#<skok> gt 0] (wlaczone urywanie wiora)
#<aktualna_glebokosc_urywania> = #<nowy_start>
o110 while [#<aktualna_glebokosc_urywania> gt #<aktualna_glebokosc>]
#<aktualna_glebokosc_urywania> = [#<aktualna_glebokosc_urywania> - #<skok>]
o97 if[#<aktualna_glebokosc_urywania> le #<aktualna_glebokosc>]
#<aktualna_glebokosc_urywania> = #<aktualna_glebokosc>
o97 endif
g1 z[#<aktualna_glebokosc_urywania>] F#<predkosc> (wierc az do kolejnego urwania)
g0 z[#<aktualna_glebokosc_urywania> + #<cofniecie_urwania>] (urwij i wycofaj na zdefiniowana odlegosc)
g0 z[#<aktualna_glebokosc_urywania> + 0.1] (powroć na pozycje do kontunowania wiercenia _ offset 0.1 mm)
o110 endwhile
o100 else
g81 z#<aktualna_glebokosc> R#<nowy_start> F#<predkosc>
o100 endif
#<nowy_start> = #<aktualna_glebokosc>
g0 z2 (wyrzucenie wior)
g0 z[#<nowy_start> + 0.5] (powrot nowy start zeby kontynuowac)
o95 endwhile
o90 else
o101 if [#<skok> gt 0] (wlaczone urywanie wiora)
g73 z#<glebokosc> R2 Q#<skok> F#<predkosc>
o101 else
g81 z#<glebokosc> R2 F#<predkosc>
o101 endif
o90 endif
g80
m5
g0 z#<wyjazd>
m2
o<wier> endsub