更新KUKA程序
This commit is contained in:
12
KUKA/KRC/R1/Program/Mylib/INT_TO_STR.src
Normal file
12
KUKA/KRC/R1/Program/Mylib/INT_TO_STR.src
Normal file
@@ -0,0 +1,12 @@
|
||||
&ACCESS RVO
|
||||
DEFFCT CHAR[32] INT_TO_STR(iVal:IN)
|
||||
DECL INT iVal,I,offset
|
||||
DECL CHAR Ret[32]
|
||||
DECL STATE_T state
|
||||
offset=0
|
||||
FOR I=1 TO 32
|
||||
Ret[I]=0
|
||||
ENDFOR
|
||||
SWRITE(Ret[],state,offset,"%d",iVal)
|
||||
Return (Ret[])
|
||||
ENDFCT
|
||||
Reference in New Issue
Block a user