找回密码
 立即注册

QQ登录

只需一步,快速开始

微信扫码登录

搜索
楼主: fongkk

[分享] 自动记录每把刀加工数量和装刀时间的宏程序

[复制链接]

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 16:56:42 | 显示全部楼层
你这个是有16把刀,我实际有24把刀,只要自己加上去就可以了对吧。

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 16:59:14 | 显示全部楼层
#1到#16是设定报警次数,#17是什么意思?  我是小白,别人以前是用G65 P——    A30.来设定次数。

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 17:02:12 | 显示全部楼层
%
O0127
#1=10001
#2=701(DAO-CHANG)
#3=731(JIA-GONG-SHU-LIANG)
#4=761(HUAN-DAO-SHI-JIAN)
#5=#2+24(DAO-JU-SHU-LIANG)
WHILE[#2LE#5]DO1
IF[ABS[#[#2]-#[#1]]LE0.03]GOTO1
#[#3]=0
#[#4]=#3011-FIX[#3011*0.0001]*10000+FIX[#3012*0.01]*0.0001
#[#2]=#[#1]
N1
#2=#2+1
#1=#1+1
#4=#4+1
#[#3]=#[#3]+1
#3=#3+1
END1


#1=1000
#2=1000
#3=1000
#4=1000
#5=1000
#6=1000
#7=1000
#8=1000
#9=1000
#10=1000
#11=1000
#12=1000
#13=1000
#14=1000
#15=1000
#16=1000
#17=1000
#18=1000
#19=1000
#20=1000
#21=1000
#22=1000
#23=1000
#24=1000
#25=10000

#101=631
#102=1
WHILE[#101LE647]DO2
IF[#[#101]GE#[#102]]GOTO2
#102=#102+1
#101=#101+1
END2
M99
N2
T[#102]M6
#3000=2
M99
%

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 17:03:29 | 显示全部楼层
#25=10000要不要,还有三菱和法兰克是不是#1=10001改成#1=11001就可以了?

21

主题

408

回帖

3330

积分

中尉

积分
3330
 楼主| 发表于 2019-10-9 17:18:39 | 显示全部楼层
hzqwjx 发表于 2019-10-9 17:03
#25=10000要不要,还有三菱和法兰克是不是#1=10001改成#1=11001就可以了?

那个不用的,写到25就可以
WHILE[#101LE647]DO2,这个647要改,改成655.是数量是从631记录到655

21

主题

408

回帖

3330

积分

中尉

积分
3330
 楼主| 发表于 2019-10-9 17:22:44 | 显示全部楼层
hzqwjx 发表于 2019-10-9 17:03
#25=10000要不要,还有三菱和法兰克是不是#1=10001改成#1=11001就可以了?

#5=#2+24(DAO-JU-SHU-LIANG)这个24改成23,因为#2=701.再加个24就等于25把刀了

21

主题

408

回帖

3330

积分

中尉

积分
3330
 楼主| 发表于 2019-10-9 17:27:22 | 显示全部楼层
hzqwjx 发表于 2019-10-9 17:03
#25=10000要不要,还有三菱和法兰克是不是#1=10001改成#1=11001就可以了?

24把刀的。不要随便改动里面的数


#1=10001
#2=601(DAO-CHANG)
#3=631(JIA-GONG-SHU-LIANG)
#4=661(HUAN-DAO-SHI-JIAN)
#5=#2+23(DAO-JU-SHU-LIANG)
WHILE[#2LE#5]DO1
IF[ABS[#[#2]-#[#1]]LE0.03]GOTO1
#[#3]=0
#[#4]=#3011-FIX[#3011*0.0001]*10000+FIX[#3012*0.01]*0.0001
#[#2]=#[#1]
N1
#2=#2+1
#1=#1+1
#4=#4+1
#[#3]=#[#3]+1
#3=#3+1
END1


#1=1000
#2=1000
#3=1000
#4=1000
#5=1000
#6=1000
#7=1000
#8=1000
#9=1000
#10=1000
#11=1000
#12=1000
#13=1000
#14=1000
#15=1000
#16=1000
#17=1000
#18=1000
#19=1000
#20=1000
#21=1000
#22=1000
#23=1000
#24=1000


#101=631
#102=1
WHILE[#101LE654]DO2
IF[#[#101]GE#[#102]]GOTO2
#102=#102+1
#101=#101+1
END2
M99
N2
T[#102]M6
#3000=2

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 18:26:05 | 显示全部楼层
#2=1000我把这个改成#2,实际加工次数732里面有200多次还不报警。希望可以自动记录每把刀加工数量和装刀时间,对刀后清零重新计数,报警后不改刀补还会报警只有在改了长度补偿或者长度磨损,加工数量才会变成0,报警才会消除。

4

主题

616

回帖

3996

积分

中尉

积分
3996
发表于 2019-10-9 18:26:54 | 显示全部楼层
方便的话可以加一下我QQ819109739

21

主题

408

回帖

3330

积分

中尉

积分
3330
 楼主| 发表于 2019-10-9 19:22:01 | 显示全部楼层
hzqwjx 发表于 2019-10-9 18:26
#2=1000我把这个改成#2,实际加工次数732里面有200多次还不报警。希望可以自动记录每把刀加工数量和装刀时间 ...

把你机床上的宏程序发过来,看下有什么问题
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

咨询QQ:1359218528|发帖须知!|Archiver|手机版|小黑屋|UG爱好者论坛 ( 京ICP备10217105号-2 )

GMT+8, 2025-5-16 11:01

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表