Heidenhain Cykl 275
-
Autor tematu - Specjalista poziom 1 (min. 100)
- Posty w temacie: 10
- Posty: 218
- Rejestracja: 22 lis 2015, 13:02
- Lokalizacja: Polska
- Kontakt:
Witam
doszedłem do tego co chciałem dzięki za pomoc oto przykład programu dziękuję wszystkim za pomoc i jeszcze -uczyłem się na sterowniku fanuc i od niedawna mam heidenhain TNC 640/620
i mogę powiedzieć że fanuc to gów..
0 BEGIN PGM FREZOWANIE-CZOPU1 MM
1 BLK FORM 0.1 Z X-100 Y-100 Z-40
2 BLK FORM 0.2 X+100 Y+100 Z+0
3 CALL PGM TNC:\Bigos-Programy\Reset.H
4 CYCL DEF 247 USTAWIENIE PKT.BAZ ~
Q339=+0 ;NR PKT BAZOWEGO
5 TOOL CALL 12 Z S1500
6 M3 M8 M17
7 CYCL DEF 14.0 GEOMETRIA KONTURU
8 CYCL DEF 14.1 PODPR.KONTURU1 /2
9 CYCL DEF 20 DANE KONTURU ~
Q1=-20 ;GLEBOKOSC FREZOWANIA ~
Q2=+1 ;ZACHODZENIE TOROW ~
Q3=+0.1 ;NADDATEK NA STRONE ~
Q4=+0.1 ;NADDATEK NA DNIE ~
Q5=+0 ;WSPOLRZEDNE POWIERZ. ~
Q6=+2 ;BEZPIECZNA WYSOKOSC ~
Q7=+50 ;BEZPIECZNA WYSOKOSC ~
Q8=+0.1 ;PROMIEN ZAOKRAGLENIA ~
Q9=-1 ;KIERUNEK OBROTU
10 CYCL DEF 22 FREZ.ZGR.WYBRANIA ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q18=+0 ;NARZ.DO OBR.ZGRUB. ~
Q19=+150 ;POSUW PRZY R. WAHAD. ~
Q208=+5000 ;POSUW RUCHU POWROTN. ~
Q401=+100 ;WSPOLCZYNNIK POSUWU ~
Q404=+0 ;STRAT.PRZEC.WYKONCZ.
11 CYCL CALL M3
12 CYCL DEF 23 FREZOW. NA GOT.DNA ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q208=+2000 ;POSUW RUCHU POWROTN.
13 CYCL CALL
14 CYCL DEF 24 FREZOW.NA GOT.BOKU ~
Q9=+1 ;KIERUNEK OBROTU ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q14=+0 ;NADDATEK NA STRONE
15 CYCL CALL
16 Z+250 R0 FMAX
17 L Z-1 R0 FMAX M91
18 M5 M9
19 CALL PGM TNC:\Bigos-Programy\Reset.H
20 L X+10 Y-10 R0 FMAX M91
21 M30
22 LBL 1
23 L X-100 Y+0 RR
24 L Y+100
25 L X+100
26 L Y-100
27 L X-100
28 L Y+0
29 LBL 0
30 LBL 2
31 L X-30 Y+0 RL
32 L Y+15
33 L X-15
34 L Y+30
35 L X+15
36 L Y+15
37 L X+30
38 L Y-15
39 L X+15
40 L Y-30
41 L X-15
42 L Y-15
43 L X-30
44 L Y+0
45 LBL 0
46 END PGM FREZOWANIE-CZOPU1 MM
doszedłem do tego co chciałem dzięki za pomoc oto przykład programu dziękuję wszystkim za pomoc i jeszcze -uczyłem się na sterowniku fanuc i od niedawna mam heidenhain TNC 640/620
i mogę powiedzieć że fanuc to gów..
0 BEGIN PGM FREZOWANIE-CZOPU1 MM
1 BLK FORM 0.1 Z X-100 Y-100 Z-40
2 BLK FORM 0.2 X+100 Y+100 Z+0
3 CALL PGM TNC:\Bigos-Programy\Reset.H
4 CYCL DEF 247 USTAWIENIE PKT.BAZ ~
Q339=+0 ;NR PKT BAZOWEGO
5 TOOL CALL 12 Z S1500
6 M3 M8 M17
7 CYCL DEF 14.0 GEOMETRIA KONTURU
8 CYCL DEF 14.1 PODPR.KONTURU1 /2
9 CYCL DEF 20 DANE KONTURU ~
Q1=-20 ;GLEBOKOSC FREZOWANIA ~
Q2=+1 ;ZACHODZENIE TOROW ~
Q3=+0.1 ;NADDATEK NA STRONE ~
Q4=+0.1 ;NADDATEK NA DNIE ~
Q5=+0 ;WSPOLRZEDNE POWIERZ. ~
Q6=+2 ;BEZPIECZNA WYSOKOSC ~
Q7=+50 ;BEZPIECZNA WYSOKOSC ~
Q8=+0.1 ;PROMIEN ZAOKRAGLENIA ~
Q9=-1 ;KIERUNEK OBROTU
10 CYCL DEF 22 FREZ.ZGR.WYBRANIA ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q18=+0 ;NARZ.DO OBR.ZGRUB. ~
Q19=+150 ;POSUW PRZY R. WAHAD. ~
Q208=+5000 ;POSUW RUCHU POWROTN. ~
Q401=+100 ;WSPOLCZYNNIK POSUWU ~
Q404=+0 ;STRAT.PRZEC.WYKONCZ.
11 CYCL CALL M3
12 CYCL DEF 23 FREZOW. NA GOT.DNA ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q208=+2000 ;POSUW RUCHU POWROTN.
13 CYCL CALL
14 CYCL DEF 24 FREZOW.NA GOT.BOKU ~
Q9=+1 ;KIERUNEK OBROTU ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q14=+0 ;NADDATEK NA STRONE
15 CYCL CALL
16 Z+250 R0 FMAX
17 L Z-1 R0 FMAX M91
18 M5 M9
19 CALL PGM TNC:\Bigos-Programy\Reset.H
20 L X+10 Y-10 R0 FMAX M91
21 M30
22 LBL 1
23 L X-100 Y+0 RR
24 L Y+100
25 L X+100
26 L Y-100
27 L X-100
28 L Y+0
29 LBL 0
30 LBL 2
31 L X-30 Y+0 RL
32 L Y+15
33 L X-15
34 L Y+30
35 L X+15
36 L Y+15
37 L X+30
38 L Y-15
39 L X+15
40 L Y-30
41 L X-15
42 L Y-15
43 L X-30
44 L Y+0
45 LBL 0
46 END PGM FREZOWANIE-CZOPU1 MM
Bigda
Tagi:
-
- Specjalista poziom 3 (min. 600)
- Posty w temacie: 3
- Posty: 948
- Rejestracja: 28 gru 2009, 15:56
- Lokalizacja: Miasto nieudaczników
Mądrze Kolega prawi, Witamy po lepszej stroniePiotrBigda pisze:Witam
doszedłem do tego co chciałem dzięki za pomoc oto przykład programu dziękuję wszystkim za pomoc i jeszcze -uczyłem się na sterowniku fanuc i od niedawna mam heidenhain TNC 640/620
i mogę powiedzieć że fanuc to gów..



Jeżeli pomogłem kliknij pomógł 

-
Autor tematu - Specjalista poziom 1 (min. 100)
- Posty w temacie: 10
- Posty: 218
- Rejestracja: 22 lis 2015, 13:02
- Lokalizacja: Polska
- Kontakt:
-
Autor tematu - Specjalista poziom 1 (min. 100)
- Posty w temacie: 10
- Posty: 218
- Rejestracja: 22 lis 2015, 13:02
- Lokalizacja: Polska
- Kontakt:
Witam
poprawiłem troszkę program i już nie robi niepotrzebnej szlichty tylko szlichtę wysepki o to przykład dodałem tylko CYCL DEF 14.0 GEOMETRIA KONTURU
15 CYCL DEF 14.1 PODPR.KONTURU3
0 BEGIN PGM FREZOWANIE-CZOPU2 MM
1 BLK FORM 0.1 Z X-100 Y-100 Z-40
2 BLK FORM 0.2 X+100 Y+100 Z+0
3 CALL PGM TNC:\Bigos-Programy\Reset.H
4 CYCL DEF 247 USTAWIENIE PKT.BAZ ~
Q339=+0 ;NR PKT BAZOWEGO
5 TOOL CALL 12 Z S1500
6 M3 M8 M17
7 CYCL DEF 14.0 GEOMETRIA KONTURU
8 CYCL DEF 14.1 PODPR.KONTURU1 /2
9 CYCL DEF 20 DANE KONTURU ~
Q1=-20 ;GLEBOKOSC FREZOWANIA ~
Q2=+1 ;ZACHODZENIE TOROW ~
Q3=+0.1 ;NADDATEK NA STRONE ~
Q4=+0.1 ;NADDATEK NA DNIE ~
Q5=+0 ;WSPOLRZEDNE POWIERZ. ~
Q6=+2 ;BEZPIECZNA WYSOKOSC ~
Q7=+50 ;BEZPIECZNA WYSOKOSC ~
Q8=+0.1 ;PROMIEN ZAOKRAGLENIA ~
Q9=-1 ;KIERUNEK OBROTU
10 CYCL DEF 22 FREZ.ZGR.WYBRANIA ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q18=+0 ;NARZ.DO OBR.ZGRUB. ~
Q19=+150 ;POSUW PRZY R. WAHAD. ~
Q208=+5000 ;POSUW RUCHU POWROTN. ~
Q401=+100 ;WSPOLCZYNNIK POSUWU ~
Q404=+0 ;STRAT.PRZEC.WYKONCZ.
11 CYCL CALL M3
12 CYCL DEF 23 FREZOW. NA GOT.DNA ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q208=+2000 ;POSUW RUCHU POWROTN.
13 CYCL CALL
14 CYCL DEF 14.0 GEOMETRIA KONTURU
15 CYCL DEF 14.1 PODPR.KONTURU3
16 CYCL DEF 24 FREZOW.NA GOT.BOKU ~
Q9=+1 ;KIERUNEK OBROTU ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q14=+0 ;NADDATEK NA STRONE
17 CYCL CALL
18 Z+250 R0 FMAX
19 L Z-1 R0 FMAX M91
20 M5 M9
21 CALL PGM TNC:\Bigos-Programy\Reset.H
22 L X+10 Y-10 R0 FMAX M91
23 M30
24 LBL 1
25 L X-105 Y+0 RR
26 L Y+105
27 L X+105
28 L Y-105
29 L X-105
30 L Y+0
31 LBL 0
32 LBL 2
33 L X-30 Y+0 RL
34 L Y+15
35 L X-15
36 L Y+30
37 L X+15
38 L Y+15
39 L X+30
40 L Y-15
41 L X+15
42 L Y-30
43 L X-15
44 L Y-15
45 L X-30
46 L Y+0
47 LBL 0
48 LBL 3
49 L X-30 Y+0 RL
50 L Y+15
51 L X-15
52 L Y+30
53 L X+15
54 L Y+15
55 L X+30
56 L Y-15
57 L X+15
58 L Y-30
59 L X-15
60 L Y-15
61 L X-30
62 L Y+0
63 LBL 0
64 END PGM FREZOWANIE-CZOPU2 MM
i teraz jeszcze jedno czy jest mozliwość zrobienia tej wysepki żeby ścianki szły pod kontem?
poprawiłem troszkę program i już nie robi niepotrzebnej szlichty tylko szlichtę wysepki o to przykład dodałem tylko CYCL DEF 14.0 GEOMETRIA KONTURU
15 CYCL DEF 14.1 PODPR.KONTURU3
0 BEGIN PGM FREZOWANIE-CZOPU2 MM
1 BLK FORM 0.1 Z X-100 Y-100 Z-40
2 BLK FORM 0.2 X+100 Y+100 Z+0
3 CALL PGM TNC:\Bigos-Programy\Reset.H
4 CYCL DEF 247 USTAWIENIE PKT.BAZ ~
Q339=+0 ;NR PKT BAZOWEGO
5 TOOL CALL 12 Z S1500
6 M3 M8 M17
7 CYCL DEF 14.0 GEOMETRIA KONTURU
8 CYCL DEF 14.1 PODPR.KONTURU1 /2
9 CYCL DEF 20 DANE KONTURU ~
Q1=-20 ;GLEBOKOSC FREZOWANIA ~
Q2=+1 ;ZACHODZENIE TOROW ~
Q3=+0.1 ;NADDATEK NA STRONE ~
Q4=+0.1 ;NADDATEK NA DNIE ~
Q5=+0 ;WSPOLRZEDNE POWIERZ. ~
Q6=+2 ;BEZPIECZNA WYSOKOSC ~
Q7=+50 ;BEZPIECZNA WYSOKOSC ~
Q8=+0.1 ;PROMIEN ZAOKRAGLENIA ~
Q9=-1 ;KIERUNEK OBROTU
10 CYCL DEF 22 FREZ.ZGR.WYBRANIA ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q18=+0 ;NARZ.DO OBR.ZGRUB. ~
Q19=+150 ;POSUW PRZY R. WAHAD. ~
Q208=+5000 ;POSUW RUCHU POWROTN. ~
Q401=+100 ;WSPOLCZYNNIK POSUWU ~
Q404=+0 ;STRAT.PRZEC.WYKONCZ.
11 CYCL CALL M3
12 CYCL DEF 23 FREZOW. NA GOT.DNA ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q208=+2000 ;POSUW RUCHU POWROTN.
13 CYCL CALL
14 CYCL DEF 14.0 GEOMETRIA KONTURU
15 CYCL DEF 14.1 PODPR.KONTURU3
16 CYCL DEF 24 FREZOW.NA GOT.BOKU ~
Q9=+1 ;KIERUNEK OBROTU ~
Q10=-5 ;GLEBOKOSC DOSUWU ~
Q11=+150 ;WARTOSC POSUWU WGL. ~
Q12=+500 ;POSUW PRZY ROZWIERC. ~
Q14=+0 ;NADDATEK NA STRONE
17 CYCL CALL
18 Z+250 R0 FMAX
19 L Z-1 R0 FMAX M91
20 M5 M9
21 CALL PGM TNC:\Bigos-Programy\Reset.H
22 L X+10 Y-10 R0 FMAX M91
23 M30
24 LBL 1
25 L X-105 Y+0 RR
26 L Y+105
27 L X+105
28 L Y-105
29 L X-105
30 L Y+0
31 LBL 0
32 LBL 2
33 L X-30 Y+0 RL
34 L Y+15
35 L X-15
36 L Y+30
37 L X+15
38 L Y+15
39 L X+30
40 L Y-15
41 L X+15
42 L Y-30
43 L X-15
44 L Y-15
45 L X-30
46 L Y+0
47 LBL 0
48 LBL 3
49 L X-30 Y+0 RL
50 L Y+15
51 L X-15
52 L Y+30
53 L X+15
54 L Y+15
55 L X+30
56 L Y-15
57 L X+15
58 L Y-30
59 L X-15
60 L Y-15
61 L X-30
62 L Y+0
63 LBL 0
64 END PGM FREZOWANIE-CZOPU2 MM
i teraz jeszcze jedno czy jest mozliwość zrobienia tej wysepki żeby ścianki szły pod kontem?
Bigda
-
Autor tematu - Specjalista poziom 1 (min. 100)
- Posty w temacie: 10
- Posty: 218
- Rejestracja: 22 lis 2015, 13:02
- Lokalizacja: Polska
- Kontakt:
-
- Specjalista poziom 3 (min. 600)
- Posty w temacie: 3
- Posty: 948
- Rejestracja: 28 gru 2009, 15:56
- Lokalizacja: Miasto nieudaczników
Tylko za pomocą Q-parametrów można coś takiego stworzyć, ale ja za bardzo już się nie orientuję. Nie pracuje na HH od ponad 3miesięcy i już mi się trochę zapomniało. Jest tu użytkownik MAREKPROCHON (albo jakoś podobnie) i odniosłem wrażenie, że robi coś takiego nacodzień, może coś pomoże. W HH 620 z tego co pamiętam był wprowadzony jakiś cykl właśnie do wybrań/wysepek z pochylonymi ścianami, ale nigdy tego nie testowałem i nie wiem jak działa.
Jeżeli pomogłem kliknij pomógł 

-
- Specjalista poziom 1 (min. 100)
- Posty w temacie: 1
- Posty: 153
- Rejestracja: 30 gru 2010, 21:08
- Lokalizacja: TARNÓW
-
Autor tematu - Specjalista poziom 1 (min. 100)
- Posty w temacie: 10
- Posty: 218
- Rejestracja: 22 lis 2015, 13:02
- Lokalizacja: Polska
- Kontakt: