Wierszowanie fazy po okregu
: 21 sie 2013, 18:35
Siema.
Jako ze sam szukalem, czy ktos popelnil podobny programik i nie znalazlem, wiec w ciagu 4 godzin roboczych zmajstrowalem cos sam. Sie podziele, moze komus sie przyda. Jak ktos widzi cos do poprawienia dajcie znac.
Dla starych wyjadaczy to pewnie nic, ale dopiero sie ucze tych parametrow. Norki stworki wszystko z CAMa laduja i byli w szoku jak zobaczyli te parametryczne programowanie.
Jako ze sam szukalem, czy ktos popelnil podobny programik i nie znalazlem, wiec w ciagu 4 godzin roboczych zmajstrowalem cos sam. Sie podziele, moze komus sie przyda. Jak ktos widzi cos do poprawienia dajcie znac.
Mozna wydziargac jaki kat sie chce. Mialem do zrobienia faze 25stopni ze srednicy 103 do 43. Fazownika takowego nie posiadalem, wiec zrobilem program i wyciachalem frezem fi 25. Zajelo to jakies 10 minut.0 BEGIN PGM FAZA MM
1 BLK FORM 0.1 Z X-100 Y-100 Z-100
2 BLK FORM 0.2 X+100 Y+100 Z+5
3 TOOL CALL 18 Z S1500
4 L X+0 Y+0 Z+100 R0 F MAX M3
5 FN 0: Q1 = +51,5 ; PROMIEN
6 FN 0: Q2 = +0 ; START Z
7 FN 0: Q3 = +1 ; SKOK NA R
8 FN 0: Q4 = +0,466 ; SKOK Z
9 FN 0: Q5 = -15 ; GLEBOKOSC Z
10 FN 0: Q50 = +1000 ; POSOW
11 FN 0: Q10 = +Q2
12 FN 12: IF +Q10 LT +Q5 GOTO LBL 3
13 FN 11: IF +Q10 GT +Q5 GOTO LBL 1
14 CALL LBL 1
15 LBL 1
16 CALL LBL 2
17 FN 2: Q1 = +Q1 - +Q3
18 FN 1: Q10 = +Q10 + -Q4
19 FN 2: Q2 = +Q2 - +Q4
20 FN 11: IF +Q10 GT +Q5 GOTO LBL 1
21 FN 10: IF +Q10 NE +Q5 GOTO LBL 3
22 FN 12: IF +Q10 LT +Q5 GOTO LBL 3
23 LBL 0
24 LBL 2
25 L X+0 Y+0 R0 F MAX M3
26 L Z+Q2 R0 F MAX M3
27 L Z+Q2 RR FQ50 M3
28 CC X+0 Y+0
29 L X+Q1 RR FQ50 M3
30 C X+Q1 DR+ RL FQ50 M3
31 LBL 0
32 LBL 3
33 L X+0 Y+0 R0 F MAX M3
34 L Z+100 R0 F MAX M5
35 STOP M30
36 LBL 0
37 END PGM FAZA MM

Dla starych wyjadaczy to pewnie nic, ale dopiero sie ucze tych parametrow. Norki stworki wszystko z CAMa laduja i byli w szoku jak zobaczyli te parametryczne programowanie.