Kod: Zaznacz cały

( ------------------------------ )
(  Ścieżka  z palca             )
( ------------------------------ )
( Kamar                          )
( Time-stamp: <31-07-2014> )
( ------------------------------ )
o<sciezka> sub

#<tool> = #1 (=1 gniazdo)
#<nr> = #2 (=1 numer narzędzia)
#<obr> = #3 (=400 obroty)
#<odboczka> = #4 (=0 <> odboczka)
#<posuw> = #5 (= 0.2 posuw)
#<w_z> = #6 (   Z  do zmiany)
#<w_x> = #7 (   X  do zmiany)
#<woda> = #8 (=1 <> chłodzenie)
#<stala_predkosc> = #9 (=0 <> stała prędkość skrawania)
#<obroty_max> = #10 (=250 obroty max)
#<predkosc_skrawania> = #11 (=200 prędkość skrawania)

/o9 if [#<posuw> gt 1 ]
 / (msg, Za duży posuw!)
 / m2
/o9 endif

o13 if [#<stala_predkosc> eq 1]
  g96 d#<obroty_max> s#<predkosc_skrawania>
  
o13 endif

/o<zmiana> call [#<tool>] [#<nr>]
/g0 f#<posuw>
/o2 if [#<odboczka> eq 1]
 / #<obr> = [#<obr> * 8]
/o2 endif
m3 s#<obr>
(                        poczatek ścieżki narzedzia         )







(                        Koniec ścieżki narzedzia           )


g0 z#<w_z>
g0 x#<w_x>
     

o<sciezka> endsub