
Jakby co to subika mam.
kamar pisze:Jakby co to subika mam.
Kod: Zaznacz cały
( ------------------------------ )
( Kanał spiralny )
( ------------------------------ )
( Kamar )
( Time-stamp: <2019-08-02 08:45> )
( ------------------------------ )
( USTAWIENIA )
( ------------------------------ )
o<kanal_spirala> sub
#<obr> = #1 (=1500 obroty)
#<frez> = #2 (=8 frez)
#<sr_otworu> = #3 (=20 średnica)
#<glebokosc> = #4 (=-10 głębokość)
#<predkosc> = #5 (=60 prędkość)
#<skok> = #6 (=2 skok)
#<woda> = #7 (=1 <> chlodzenie)
#<w_z> = #8 (wyjazd Z)
#<w_x> = #9 (wyjazd X)
#<w_y> = #10 (wyjazd Y)
( ------------------------------ )
( ------------------------------ )
#<promien_freza> = [#<frez> / 2] ( promien freza )
#<promien_otworu> = [#<sr_otworu> / 2] ( promien otworu )
#<promien> = [#<promien_otworu> - #<promien_freza>] ( dojazd )
g0 z5
g0 x0 y0
m3 s#<obr>
o1 if [#<woda> eq 1]
m8
o1 endif
#1 = 0
G0 X[-1 * #<promien>] F#<predkosc>
G0 Z1
g1 z0
#<akt_z> = 0
o100 while [#<akt_z> gt #<glebokosc>]
#<akt_z> = [#<akt_z> - #<skok>]
( jezeli za gleboko to jade na max )
o110 if [#<akt_z> lt #<glebokosc>]
#<akt_z> = #<glebokosc>
o110 endif
G2 X0 Y#<promien> R#<promien> Z[#<akt_z> + [0.75 * #<skok>]]
G2 X#<promien> Y0 R#<promien> Z[#<akt_z> + [0.5 * #<skok>]]
G2 X0 Y[-1 * #<promien>] R#<promien> Z[#<akt_z> + [0.25 * #<skok>]]
G2 X[-1 * #<promien>] Y0 R#<promien> Z#<akt_z>
o100 endwhile
m5
g0 x#<w_x> y#<w_y>
g0 z#<w_z>
o<kanal_spirala> endsub
Patent polegał na wykorzystaniu noża do gwintów jaki ma prawie każdy, z frezami bywa różnie. Ja np. nie posiadam żadnego a kanałek trzeba było zrobić.