谁能看懂这西门子程序就牛逼了

liu65178454 · 发表于 2013-10-31 22:08:04

%_N_L9851_SPF
PROC L9851(INT TOOLNO)
DEF INT ACT_TOOLNO
DEF REAL ACT_TOOL_LENGTH,W_POS,V_POS
IF $P_SUBPAR[1]==TRUE
ACT_TOOLNO=TOOLNO
ELSE
ACT_TOOLNO=$P_TOOLNO
ENDIF
ACT_TOOL_LENGTH=$TC_DP3[ACT_TOOLNO,1]+$TC_DP12[ACT_TOOLNO,1]
W_POS=$AA_IM[W]
V_POS=$AA_IM[V]
$P_CHBFR[0]=CTRANS(Z,ACT_TOOL_LENGTH-W_POS-V_POS)
R0=$P_GG[8]
G[8]=R0
M17

lxg254 · 发表于 2013-10-31 22:08:36

这是一个循环程序

hua_102a · 发表于 2013-10-31 22:09:21

回复 2# lxg254
专业人士顶

liu65178454 · 发表于 2013-10-31 22:10:02

镗铣床，每把刀镗杆和滑枕长度不一样，这程序是刀补计算，z轴。

tuya194 · 发表于 2013-10-31 22:10:42

我承认，我看不懂

重庆打杂工 · 发表于 2013-10-31 22:11:14

我承认，我看不懂
tuya194 发表于 2010-10-15 23:15

牛B的人不屑回答，所以楼主自问自答了

liu65178454 · 发表于 2013-10-31 22:11:59

你的意思是你牛逼了

wq96151 · 发表于 2013-10-31 22:12:59

知道了TOOLNO $P_SUBPAR[1]等这些是什么就知道了

huangpan1234 · 发表于 2013-10-31 22:13:29

不是这行 ,

yanyongqing · 发表于 2013-10-31 22:13:59

这是高级编程里面的内容。