HEIDENHAIN TNC 410 - Instrukcja (Strona 242)

229 HEIDENHAIN TNC 410
10.10 Przykłady pr
ogramowania
23 LBL 10
24 FN 1: Q23 = +Q11 + +Q6
25 FN 0: Q24 = +Q4
26 FN 1: Q26 = +Q6 + +Q108
27 FN 0: Q28 = +Q8
28 FN 1: Q16 = +Q6 + Q10
29 CYKL DEF 7.0 PUNKT ZEROWY
30 CYKL DEF 7.1 X+Q1
31 CYKL DEF 7.2 Y+Q2
32 CYKL DEF 7.3 Z Q16
33 CYKL DEF 10.0 OBRÓT
34 CYKL DEF 10.1 OBR+Q8
35 CC X+0 Y+0
36 LP PR+Q26 PA+Q8 R0 FQ12
37 LBL 1
38 CC Z+0 X+Q108
39 L Y+0 Z+0 FQ12
40 LBL 2
41 LP PR+Q6 PA+Q24 R0 FQ12
42 FN 2: Q24 = +Q24 +Q14
43 FN 11: IF +Q24 GT +Q5 GOTO LBL 2
44 LP PR+Q6 PA+Q5
45 L Z+Q23 R0 F1000
46 L X+Q26 R0 F MAX
47 FN 1: Q28 = +Q28 + +Q18
48 FN 0: Q24 = +Q4
49 CYKL DEF 10.0 OBRÓT
50 CYKL DEF 10.1 OBR+Q28
51 FN 12: IF +Q28 LT +Q9 GOTO LBL 1
52 FN 9: IF +Q28 EQU +Q9 GOTO LBL 1
53 CYKL DEF 10.0 OBRÓT
54 CYCL DEF 10.1 OBR+0
55 CYKL DEF 7.0 PUNKT ZEROWY
56 CYKL DEF 7.1 X+0
57 CYKL DEF 7.2 Y+0
58 CYKL DEF 7.3 Z+0
59 LBL 0
60 END PGM KULA MM
Podprogram 10: obróbka
Obliczyć Z współrz dn dla pozycjonowania wst pnego
Skopiować k t startu przestrzeni (płaszczyzna Z/X)
Skorygować promień kuli dla pozycjonowania wst pnego
Skopiować położenie obrotu na płaszczyźnie
Uwzgl dnić naddatek przy promieniu kuli
Przesun ć punkt zerowy do centrum kuli
Wyliczyć k t startu położenia obrotu na płaszczyźnie
Wyznaczyć biegun na płaszczyźnie X/Y dla pozycjonowania wst pnego
Pozycjonować wst pnie na płaszczyźnie
Pozycjonować wst pnie w osi wrzeciona
Wyznaczyć biegun na płaszczyźnie Z/X, przesuni ty o promień narz dzia
Najeżdżanie na gł bokość
Zbliżony „łuk” jechać w gór
Zaktualizować k t przestrzenny
Zapytanie czy łuk gotowy, jeśli nie, to z powrotem do LBL2
Najechać k t końcowy w przestrzeni
Przemieścić swobodnie w osi wrzeciona
Pozycjonować wst pnie dla nast pnego łuku
Zaktualizować położenie obrotu na płaszczyźnie
Wycofać k t przestrzenny
Aktywować nowe położenie obrotu
Zapytanie czy nie gotowa, jeśli tak, to powrót do LBL 1
Wycofać obrót
Wycofać przesuni cie punktu zerowego
Koniec podprogramu