加工中心宏程序案例

编圆

G90G0G54X-10.Y0M3S4500

G43Z50.H1M8

#1=0.5

WHILE[#1LE50.]DO1

#2=50.-#1

#3=SQRT[2500.-[#2*#2]]

G1Z-#1F20

X-#3F500

G2I#3

#1=#1+0.5

END1

G0Z50.M5

M30 

铣槽

X Y 对称中心为坐标原点，

顶面为Z原点，

中心下刀回字形走刀

，先Y后X，

顺铣，

分层加工。

#1=240，

#2=175，

#3=20，

#4=30，

#5=0，

#17=3，

#6=0.8*#3,

#7=#1-#3,

#8=#2-#3，

M3s1000,

G90G54G0X0Y0,

G43Z100H1,Z3M8,,

WHILE[#5LT#4]DO1,

Z[-#5+1],

G1Z-[#5+#17]F150,

IF[#1GE#2]GOTO1,

N1

#9=FIX[#8/#6],

IF[#1GE#2]GOTO3,

IF[#1LT#2]GOTO2,

N2

#9=FIX[#7/#6],

IF[#1LT#2]GOTO3,

N3

#10=FIX[#9/2],

WHILE[#10GE0]DO2,

#11=#7/2-#10*#6,

#12=#8/2-#10*#6,

Y#12,

X-#11,Y-#12,

X#11,Y#12,

X0,

#10=#10-1,

END2,

G0Z100M9,

X0Y0,

#5=#5+#17,

END1,

M5,

M30,

注#3等于平铣刀刀具半径

% 

O8113(ML CIR IN)

#1=100 

#2=20

#3=10

#4=0 

#17=0.5

#5=[#1-#3]/2 

G00G90G54X0Y0

G43H01Z50. 

M03S1000 

X#5

Z[#4+2]

G01Z#4F60

WHILE[#4LT#2]DO1 

#4=#4+#17

G03I-#5Z-#4F1000 

END1 

G03I-#5

G01X[#5-1]F60

G00Z50.

M15

M30

#1=圆孔直径

#@圆孔深度

#3平底铣刀直径

#4Z坐标设为自便量

#17z美刀进给、

#5=[#1-#3]/2  Z刀具回转半径

M3S1200

G54G90G0X0Y0

G0X5

Z[-#4+1]

G1Z-#4F200

G41X5Y0D1

WHILE[#4LT#2]DO1

#4=#4-#17

G3I-5Z-#4F1000

END1

G3i-5

G1G40X[#5-1]

M30

#1=圆孔直径

#2=圆孔深度

#3=平底铣刀直径

#4=0Z坐标设为自变量，赋初始值为0

#17=Z坐标每次递增量。. m" w. c' ~$ y  J

#5=（#1-#3）/2刀具回转半径

S1000M3

G54G90G0XOY0Z30

GOOX5；

Z（-#4+1）；

G1Z-#4F200

WHILE（#4LT#2）DO1；

#4=#4=#17

G3I-5Z-#4F1000；

END1；

G3I-5； 

G1X（#5-1）

G0Z30；