更新优化程序
This commit is contained in:
10
KUKA/KRC/R1/Program/Mylib/GetInt16.src
Normal file
10
KUKA/KRC/R1/Program/Mylib/GetInt16.src
Normal file
@@ -0,0 +1,10 @@
|
||||
&ACCESS RV
|
||||
DEFFCT INT GetInt16 (iVal:IN )
|
||||
DECL INT iVal,iRet
|
||||
IF iVal>32767 THEN
|
||||
iRet=iVal-65536
|
||||
ELSE
|
||||
iRet=iVal
|
||||
ENDIF
|
||||
RETURN iRet
|
||||
ENDFCT
|
||||
Reference in New Issue
Block a user