ponizej programm dla potomnych

Kod: Zaznacz cały
%
O00014 (35111)
#5221= -669.2 (G54 X)
#5222= -333.5 (G54 Y)
#5223= -643.8 (G54 Z)
#5301= -669.2 (G58 X)
#5302= -633.5 (G58 Y)
#5303= -643.8 (G58 Z)
G00 G91 G28 Z0
T30 M6 (RENISHAW TASTER)
M1
G69
G0G80G90G40G17G54X0Y0
G43H30Z50
G65P9832
G65P9810Z-8.F3000
G65P9814D75.S1 (1 POMIAR PKT G54)
G65P9810Z70.F3000
G58
G65P9810X0.Y0.F3000
G65P9810Z-8.F3000
G65P9814 D32. S5 (2 POMIAR PKT G58)
G65P9833
N20
#10=#5221-#5301
#11=#5222-#5302
#12=[ #10 / #11 ](LICZY TANGENS)
#13=ATAN[#12](WYNIK KATA ATAN)
G0G91G28Z0
G0G90G40G54G17
(JESLI POD MAKRO #13 JEST WYNIK KATA TJ FUNKCJE TRZEBA ZAPISAC TAK)
G68X0Y0 R - #13
T2 M6 (SCHAFTFRAESER D20)
S1500M3F800
G0G40G80G17G90G54X0Y0
G43 H02 D02 Z50
Z5
G1Z-20
G1 G41 X35.000 Y0.000
G3 X-35.5 Y0.000 I-35.250 J-0.035
G3 I35.5
G3 X0 Y-35.4 R35.4
G1G40X0Y0
G0Z50
G0X0Y-300
Z5
G1Z-20
G1 G41 X15. Y-300.
G3 X-15.5 Y-300. I-15.250 J-0.070
G3 I15.5
G3 X0. Y-315.4 R15.4
G1G40X0.Y-300.M9
G69
G0G91G28Z0M5
GOTO999
N970T30M6(RENISHAW)
G0G90G80G40G54X0Y0
G43H30Z50
G65P9832
G65P9810 Z-8. F3000
G65P9814D71.00U0.19
G65P9833
N999G0G91G28Z0
G0G90G53X-500Y0
M30
%