变螺距变曹宽矩形螺纹

变螺距变曹宽矩形螺纹

变螺距变曹宽矩形螺纹


编写程序首先我们要利用公式算出一些我们程序中需要的参数,具体参数如下:

H(牙顶宽度)=5

*P(每次递增螺距)=2

P(初始螺距)=8

Pn(终止螺距)=20

V(刀具宽度)=3

从上面这些参数我们在利用公式计算:

U(Z方向总赶刀量)=Pn-V-H=20-3-5=12

Q(需要赶刀次数)=U/V=12/2.5=4.8(这里取整数5)

Z1(Z值起刀坐标)=P=8

Z2(赶刀最终的Z坐标)=2P-*P-V-H=2*8-2-3-5=6

M(每次赶刀Z值得变化量)=[Z2-Z1]/Q=[6-8]/5=-0.4

N(每一次赶刀的螺距变化量)=*P/Q=2/5=0.4

从上面计算出的这些参数我们得到条件判断的数据,每次赶刀Z值递加-0.4,递加5次以后我们的Z加工起点变化为6,螺距每次赶刀递减0.4,5次最后起刀螺距变化为6,好现在我们可以来编制这个程序,同样采取分层法来编制这个程序,程序如下:

M3S500G99

T0101M08

G0X55.Z10.

#1=50(螺纹大直径)

#2=40(螺纹底部直径)

#10=-0.4(z每次的赶刀量)

#11=0.4(初始螺距每次的变化量)

N10#3=8(初始螺距)

#4=8(Z起刀坐标)

#1=#1-0.5(X深度递减)

G0Z#4(Z定位)

X#1(X进刀)

N20G32W-#3F#3(螺纹变螺距)

#3=#3+2(螺距每次递加2)

IF[#3LE20]GOTO20(如果螺距没有到达20,跳转N20继续变螺距车削)

G0X55.(X退刀)

Z10.(Z退刀)

首先车完一个变顶宽的螺纹完毕,下面开始赶刀,变化曹宽)

#5=8(Z起点坐标)

#6=8(初始螺距)

N30#5=#5+#10(计算出Z赶刀坐标)

#6=#6-#11(计算赶刀后的初始螺距)

#7=#6(把#6的值赋值给#7)

G0Z#5(Z定位)

X#1(X进刀)

N40G32W-#7F#7(变螺距车削)

#7=#7+2(螺距递加2)

IF[#7LE20]GOTO40(如果螺距小于20,跳转N40继续车削)

G0X55.(退刀)

Z10.(退刀)

IF[#5EQ6]GOTO50(如果赶刀Z值的坐标等于6,跳出循环)

IF[#5GE6]GOTO30(如果赶刀Z值没有到达6,继续循环)

N50IF[#1EQ#2]GOTO60(如果螺纹深度到达,跳出循环)

IF[#1GE#2]GOTO10(如果螺纹深度没有到达返回N10执行下一层车削)

N60G0X120.Z130.(退刀)

M30(程序结束)

完整程序如下:

M3S500G99

T0101M08

G0X55.Z10.

#1=50

#2=40

#10=-0.4

#11=0.4

N10#3=8

#4=8

#1=#1-0.5

G0Z#4

X#1

N20G32W-#3F#3

#3=#3+2

IF[#3LE20]GOTO20

G0X55.

Z10.

#5=8

#6=8

N30#5=#5+#10

#6=#6-#11

#7=#6

G0Z#5

X#1

N40G32W-#7F#7

#7=#7+2

IF[#7LE20]GOTO40

G0X55.

Z10.

IF[#5EQ6]GOTO50

IF[#5GE6]GOTO30

N50IF[#1EQ#2]GOTO60

IF[#1GE#2]GOTO10

N60G0X120.Z130.

M30

更多宏教程请微信关注 zgsklm 如果文字教程你看不懂可以找我购买视频教程


发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注