宏程序加工流水号

茶叶同学

刻字2.rar (1.61 KB, 下载次数: 165)

2024-4-24 14:42 上传

点击文件名下载附件
下载积分: G币 -1

新手勿喷，看论坛里的内容自己琢磨的，优点是只有一个程序。
有一个版本可以随意改变大小角度，但是我到处找都没有找到资源，就自己写了这个，已在北京精雕机床上测试
字中心距和字深可以更改，中心距改G52后面的X值，字深改每个数字程序的Z值
逻辑就是把十个数字的程序都在原点编出来，把四位数拆分出来，0~9999，用IF去判定加工位置，用G52去偏移距离
然后直接GOTO数字程序，数字程序的行号是 数字是多少 就加100，比如数字0 行号100，数字1 行号101
具体用法：#600输入0则加工0001，输入1则加工0002
如果要加位数，按照逻辑继续加就行了，要加日期，就要读取机床日期，然后拆分，还没有研究
变量值，程序头尾可以根据自己机床更改
下面为逻辑内容，所有内容请看附件
%
O0001
G91G28Z0
G90G40G49G98
G21G0G58G17

T6M6
(TOOL NAME      :[锥度平底]JD-30-0.20)
(字高            :4)
(字中心距         :2.5)
(字深            :0.2)
G90G40G49G58G17
S12000M3
G0X0Y0M7
M590 P1 L1
G43H6


#600=#600+1(工件计数)

#604=FIX[#600/1000](拆分千位数字)
#603=FIX[#600/100]-FIX[#600/1000]*10(拆分百位数字)
#602=FIX[#600/10]-FIX[#600/100]*10(拆分十位数字)
#601=#600-FIX[#600/10]*10(拆分个位数字)

#610=0(工序归零)
N89
#610=#610+1(以下五个IF工序选择判定)
IF[#610EQ1] GOTO91
IF[#610EQ2] GOTO92
IF[#610EQ3] GOTO93
IF[#610EQ4] GOTO94
IF[#610GT4] GOTO110

N91
G52X-7.5Y0(千位数字坐标原点，非模态偏移，不影响其它程序段)
GOTO[#604+100](千位数字值+100行号，与数字加工工序行号对应)

N92
G52X-5Y0(百位数字坐标原点)
GOTO[#603+100](百位数字值+100行号，与数字加工工序行号对应)

N93
G52X-2.5Y0(十位数字坐标原点)
GOTO[#602+100](十位数字值+100行号，与数字加工工序行号对应)

N94
G52X0Y0(个位数字坐标原点)
GOTO[#601+100](个位数字值+100行号，与数字加工工序行号对应)

茶叶同学

更新增加年月日，读取机床的当前日期，可改字深，间距，一共12位数

gsphzc

下载看看，谢谢分享！！

xl147258

学习了

hyl163

根据数控廖哥来的

茶叶同学

hyl163 发表于 2024-4-24 22:41
根据数控廖哥来的

确实也参考了他的:daxiao:

qq312523146

好好学习，天天向上

FZHJUN

下载看看，谢谢分享！

lg333

好学习，天天向上

tombai691019

下载学习一下，谢谢分享。