Omlouvám zpoždění, nevím kde mi hlava stojí.
Tak se to nakonec tak nějak vyřešilo samo. Mašina si totiž nulové body přenáší sama a to i pod úhlem. A na natočení hlavy je tam zašitej speciální cyklus, kterej spočítá natočení těles hlavy na základě požadovanýho úhlu nástroje. Takže si zadám, pod jakým úhlem potřebuju nástroj a mašina to sama spočítá (v případě "prostorového úhlu" natočím stůl). Pak už jen hlídat délku nástroje, bo 1 hlava má o 1,44mm jinou délku.
A program od našeho programátora:
0 BEGIN PGM Kriz_Forse_5 MM
1 ; C.V.
2 ; VYBRANI S=347.8 Z DELSI STRANY +1MM/PL.
3 ; FREZA D=100/R=8
4 ; DRZAK ANTIVIBRACNI KENNAMETAL
5 ; HLAVA TU144
6 Q599 = 50000 ; hodnota F pri naklopeni (fnc PLANE)
7 Q502 = - 100 ; hodnota Zmax pro odjezd v M91
8 Q503 = - 500 ; pozice V osy behem otaceni stolu (M91)
9 BLK FORM 0.1 Z X-447,132 Y-360 Z+369,422
10 BLK FORM 0.2 X+0 Y+0 Z+580
11 CALL LBL 888 ;Reset roviny obrabeni
12 L Z+Q502 FMAX M91
13 ;
14 ;========================================
15 ;.... S E Z N A M N A S T R O J U ....
16 Q1603 = 7 ;BULL NOSE MILL >> D100.0 R8.0 Z7.0 H=420.0 .................. ~
Zmin=-0.823
17 ;========================================
18 ;
19 TOOL CALL Q1603 Z S300
20 CYCL DEF 32.0 TOLERANCE
21 CYCL DEF 32.1 T0,02
22 CYCL DEF 32.2 HSC-MODE:0 TA0,5
23 Q515 = 300 ;pracovni posuv
24 Q516 = 300 ;dokoncovaci posuv
25 ;
/ 26 M0 ; nasleduje natoceni: B+180. C+0.
27 L Z+Q502 FMAX M91
28 ;
29 ; Nastavit polohu -> Mac 1 Position 8
30 ; TU144_XYZAC b=180 c=0
31 CALL LBL 888 ;Reset roviny obrabeni
32 L M608
33 L X-300 Y+500 R0 FMAX
34 CYCL DEF 7.0 NULOVY BOD
35 CYCL DEF 7.1 X+0
36 CYCL DEF 7.2 Y+0
37 CYCL DEF 7.3 Z+0
38 PLANE AXIAL B+180 C+0 STAY SEQ+
/ 39 M0 ; nasleduje natoceni b=180 c=0
40 CYCL DEF 302 HEAD ORIENTATION ~
Q352=+0 ;ANGLE FOR C AXIS ~
Q353=+180 ;ANGLE FOR B AXIS ~
Q354=+0 ;TOOL WEIGHT
41 ; Lokalni posun v naklonene pracovni rovine pro tuto operaci - muze menit~
obsluha:
42 CYCL DEF 7.0 NULOVY BOD
43 CYCL DEF 7.1 IX+0
44 CYCL DEF 7.2 IY+0
45 CYCL DEF 7.3 IZ+0
46 ;
47 L X+123,583 Y+631,735 Z+20 R0 FMAX M3
48 L Z-360 FMAX
49 L X+158,078 Y+503 FQ516
50 L X+372,322
51 L X+436,954 Y+448 FQ516
52 L X+115,875
53 L X+64,085 Y+641,279
54 L Z+25 FMAX
55 L M111
56 ;
57 L M5
58 CALL LBL 888 ;Reset roviny obrabeni
59 L M30
60 ;**************************
61 ;* KONEC PROGRAMU *
62 ;**************************
63 ;
64 ; Reset roviny obrabeni
65 LBL 888
66 L M129 M115 ;RTCP DEACTIVE
67 PLANE RESET STAY
68 CYCL DEF 10.0 OTACENI
69 CYCL DEF 10.1 ROT+0
70 CYCL DEF 7.0 NULOVY BOD
71 CYCL DEF 7.1 X+0
72 CYCL DEF 7.2 Y+0
73 CYCL DEF 7.3 Z+0
74 LBL 0
75 END PGM Kriz_Forse_5 MM