Kod: Zaznacz cały
o<ciecie_z_faza> sub
#<sr_pocz> = #1 (=60 Średnica początkowa)
#<sr_koncowa> = #2 (=30 srednica koncowa)
#<z_pocz> = #3 (=0 Z początkowe)
#<noz> = #4 (=2 Szerokość fazy)
#<posuw> = #5 (=21 Posuw)
#<przesuniecie osi Z> = #6 (=0 przesuniecie osi Z)
#<pauza> = #7 (=0 pauza)
#<g54 > =#8 (=54 g54)
g61
g#8
g18
g0 x[#1+1]
z0
g1 f90 x#1
g1 f#5 x[#1-#4*2]
g0 x[#1+0.3]
z#4 (szerokosc fazy)
g1 x#1
x[#1-#4*2] z0 (glebokosc fazy)
g0 x[#1+0.3]
z-#4 (szerokosc fazy)
g1 x#1
z0 x[#1-#4*2] (glebokosc fazy)
x#2 (glebokosc ciecia)
g4 p#7
g0 x[#1+10]
z#6 (przesuniecie osi z)
o<ciecie_z_faza> endsub
Kod: Zaznacz cały
o<seger_wew> sub
#<sr_pocz> = #1 (=30 Średnica początkowa)
#<sr_koncowa> = #2 (=60 srednica koncowa)
#<z_pocz> = #3 (=0 Z początkowe)
#<noz> = #4 (=2 Szerokość fazy)
#<posuw> = #5 (=4 Posuw)
#<przesuniecie osi Z> = #6 (=0 przesuniecie osi Z)
#<pauza> = #7 (=0 pauza)
#<g54 > =#8 (=54 g54)
g61
g#8
g18
g0 x[#1-0.5]
z0
g1 f90 x#1
g1 f#5 x[#1+#4*2]
g0 x[#1-0.3]
z#4 (szerokosc fazy)
g1 x#1
x[#1+#4*2] z0 (glebokosc fazy)
g0 x[#1-0.3]
z-#4 (szerokosc fazy)
g1 x#1
z0 x[#1+#4*2] (glebokosc fazy)
x#2 (glebokosc ciecia)
g4 p#7
g0 x[#1-0.5]
z#6 (przesuniecie osi z)
o<seger_wew> endsub