Példa: Négyszögcsap mérése és utánmunkálása
Programozási sorrend
- Négyszögcsap nagyolása 0,5 mm-es simítási ráhagyással
- Négyszögcsap mérése
- Négyszögcsap simítása a mért értékeknek megfelelően
0 BEGIN PGM TOUCHPROBE MM | |||
1 TOOL CALL 5 Z S6000 | ; Szerszámhívás előzetes megmunkálás | ||
2 Q1 = 81 | ; Négyszög hossza X irányban (nagyolási méret) | ||
3 Q2 = 61 | ; Négyszög hossza Y irányban (nagyolási méret) | ||
4 L Z+100 R0 FMAX M3 | ; Szerszám visszahúzása | ||
5 CALL LBL 1 | ; Megmunkáló alprogram behívása | ||
6 L Z+100 R0 FMAX | ; Szerszám visszahúzása | ||
7 TOOL CALL 600 Z | ; Tapintó behívása | ||
8 TCH PROBE 424 NEGYSZ.CSAP MERESE ~ | |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
9 Q1 = Q1 - Q164 | ; Hossz számítása X-ben a mért eltérés alapján | ||
10 Q2 = Q2 - Q165 | ; Hossz számítása Y-ben a mért eltérés alapján | ||
11 L Z+100 R0 FMAX | ; Tapintó visszahúzása | ||
12 TOOL CALL 25 Z S8000 | ; Szerszámhívás simítás | ||
13 L Z+100 R0 FMAX M3 | ; Szerszám kijáratása, program vége | ||
14 CALL LBL 1 | ; Megmunkáló alprogram behívása | ||
15 L Z+100 R0 FMAX | |||
16 M30 | |||
17 LBL 1 | ; Alprogram négyszögcsap megmunkáló ciklussal | ||
18 CYCL DEF 256 NEGYSZOGCSAP ~ | |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
| |||
19 L X+50 Y+50 R0 FMAX M99 | ; Ciklushívás | ||
20 LBL 0 | ; Alprogram vége | ||
21 END PGM TOUCHPROBE MM |