o sub (MAKRO NA MERENI DELKY NASTROJE) (verze 1 - initial verze) (verze 2 - pridano sondovani i velkych nastroju) M9 (vypnout vodu) M5 (zastavit vreteno) G0 G53 Z0 (zajet na koncak v Z ose) (tady ulozit kompenzaci nastroje) G49 (vypnout kompenzaci nastroje) (tady ulozit aktualni souradny system) G59 (prepnout na souradny system sondy) G0 Y0 (najet nad sondu) o22 IF [#5410 GE 18] (pokud mame nastroj vetsiho prumeru nez 18mm) #1 = [#5410/2] G91 (relativne odjedeme v Y ose s nastrojem) G0 Y-#1 G90 o22 ENDIF G38.2 Z-75 F1000 (rychle najet na sondu) G91 G91 G0 Z3 (vyjet nad sondu) G38.2 Z-11 F50 (zmerit nastroj) (G91 G0 Z8 vyjet nad sondu) G10 L1 P#5400 Z[#5063-0.045](nastavit novy offset do tabulky nastroju) G90 (prepnout na absolutni odmerovani) (tady vratit souradny system) G0 G53 Z0 (zajet na koncak v Z ose - hotovo) (tady zapnout kompenzaci nastroje pokud byla zapnuta) o endsub M2