828D链条式刀库的换刀程序不解?

我有一段台湾刀库换刀程序几个程序段宏程序不理解,可以给分段解释解释吗?
 PROC L6 SAVE DISPLOF SBLOF
N10 DEF INT T_SP,T_ORDER
N20 T_SP=$TC_MPP6[9998,1]
N30 GETSELT(T_ORDER)(以上部分不用解释,下面开始望详解)
N40 STOPRE
N50 IF(($P_SIM==1) OR ($P_ISTEST==1)) GOTOF END1;?
N60   IF(($P_SEARCH<>0) OR ($P_DRYRUN==1)) GOTOF END1;?
;N90 IF $A_DBW[0]==5 GOTOF INFO2?
N100 IF $A_DBW[0]==4 GOTOF INFO3?
N110 IF $A_DBW[0]==6 GOTOF INFO4?
N120 IF $MN_USER_DATA_FLOAT[4]==0 GOTOF INFO5?
就这几句有些问题,谢谢?

最佳答案

这是个标准的换刀程序,可惜只是很小的一部分程序,我分析大致意思为:
IF(($P_SIM==1) OR ($P_ISTEST==1)) GOTOF END1;程序模拟,程序测试激活;
 IF(($P_SEARCH<>0) OR ($P_DRYRUN==1)) GOTOF END1;程序段搜索,空运行激活;
IF $A_DBW[0]==5 GOTOF INFO2 ;5 = 刀库未回零,不能换刀;
IF $A_DBW[0]==4 GOTOF INFO3 ;4 = 轴未回零,不能换刀;
IF $A_DBW[0]==6 GOTOF INFO4 ;6 = 刀库调试模式激活,不能换刀;
IF $MN_USER_DATA_FLOAT[4]==0 GOTOF INFO5 ;MD14514[4]=0,换刀速度未设置,不能换刀;
此程序与我应用的换刀程序类似,供参考!

提问者对于答案的评价:

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc308019.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2020年11月1日
下一篇 2020年11月1日

相关推荐