L W#16#FFFF
T #Crc_Code
L P##Data_Send
LAR1
L W [AR1,P#2.0]
T #Len_Data
L D [AR1,P#6.0]
LAR1
L #Len_Data
L_1: T #Len_Data_1
L B [AR1,P#0.0]
L #Crc_Code
XOW
T #Crc_Code
L 8
L_2: T #N
L #Crc_Code
SRW 1
T #Crc_Code
L W#16#1
L #Crc_Code
AW
JP J_1
JU J_2
J_1: L W#16#A001
L #Crc_Code
XOW
T #Crc_Code
J_2: L #N
LOOP L_2
TAR1
L 8
+D
LAR1
L #Len_Data_1
LOOP L_1

不知道错在哪里，希望斑竹指点一下