这个是我在其它帖子中发过的，可以在二进制与格雷间相互转换

SUBROUTINE_BLOCK GRAY_B:SBR0
TITLE=格雷码与二进制互转(字节)
// 输入编码为二进制时，转换结果为格雷码，类型参数为'B'
// 输入编码为格雷码时，转换结果为二进制，类型参数为'G'(实际上非'B'即可)
VAR_INPUT
bInType:BYTE; // 输入数据编码：'G'=格雷码、'B'=二进制
bIn:BYTE; // 待转换数据
END_VAR
VAR_OUTPUT
bOut:BYTE; // 转换结果
END_VAR

BEGIN
Network 1
LD SM0.0
MOVB LB1, LB2
Network 2
LBL 0
Network 3
LD SM0.0
SRB LB1, 1
XORB LB1, LB2
Network 4
LDB= LB0, 'B'
CRET
Network 5
LDB<> LB1, 0
JMP 0
END_SUBROUTINE_BLOCK

转换算法是长度自适应的，循环最长是8次，但一般要少于8次
如果需要转换16位，将In/Out变量定义为WORD，相应的字节指令换成字指令即可