海德漢系統，宏程序編程實例銑圓，銑槽，銑方，誰有，幫下忙啊，謝謝了

參考下新代系統

@MACRO;

G40 G57 G90 G80 G49 G17;

M6T6;

M3 S2500;

M08;

G0 X0 Y0;

Z0;

A0;

#1=0;

WHILE(#1<=315.0)DO;

G0 A#1;

#2=0;

N100 G0 Z-#2;

G1 X-35.0 F1500.0;

Y-8.0;

X0;

Y-16.0;

X-35.0;

Y-24.0;

X0;

G0 X0 Y0;

#2=#2+0.5;

IF(#2<=6)THEN GOTO100;

END_IF;

G0 Z20.0

#1=#1+45.0;

END_WHILE;

G0 Z50.0;

G91 G28 Z0.0;

M09;

M05;

M30;

%

FANUC銑槽程序：