腰形槽键槽光刀宏程序

腰形槽光刀宏程序

坐标系建立：四面分中，顶面为零

当#17=0时，一刀光底或光侧，余量由#108（侧） #109（底）表示，如下图：

当#17=2.5（每刀深度）时，多层轮廓走刀，适合对侧面光刀加工，如下图：

完整程序内容：

%

O8052

G90 G17 G40 G49 G80

G91 G28 Z0.

#1=30

#12=16

#2=10

#3=10

#20=6

#19=6500

#9=1200

#26=0

#17=2.5

#108=0

#109=0

#119=#2-#109

T#20 M6

G90 G54

G0 X-[#1/2] Y0. S#19 M3

G43 Z10. H#20

/M8

G1 Z0.3 F2500.

#24=[[#1+#12]/2]-[#3/2]-#108

#25=[[#12/2]-[#3/2]-#108]

#26=#26+#17

IF[#17EQ#119]GOTO100

WHILE[#26LT#119]DO1

G1 Z-#26 F#9

G3 X-#24 I-[[#24-[#1/2]]/2]

G3 X-[#1/2] Y-#25 I[#24-[#1/2]]

G1 X[#1/2]

G3 X[#1/2] Y#25 J[#24-[#1/2]]

G1 X-[#1/2]

G3 X-#24 Y0. J-[#24-[#1/2]]

G3 X-[#1/2] I[[#24-[#1/2]]/2]

#26=#26+#17

END1

N100

G1 Z-#119 F#9

G3 X-#24 I-[[#24-[#1/2]]/2]

G3 X-[#1/2] Y-#25 I[#24-[#1/2]]

G1 X[#1/2]

G3 X[#1/2] Y#25 J[#24-[#1/2]]

G1 X-[#1/2]

G3 X-#24 Y0. J-[#24-[#1/2]]

G3 X-[#1/2] I[[#24-[#1/2]]/2]

G0 Z10.

M9

M5

G91 G28 Z0.

G28 Y0.

M30

%