发布于 2012-02-01 14:51:12
8楼
//CRC Calculate
#CRC := W#16#FFFF;
FOR #i := 1 TO #CNT DO
#CRC := #CRC XOR BYTE_TO_WORD(#CRCMes[#i]);
FOR #j := 1 TO 8 DO
#TM1 := #CRC; #CRC := SHR(IN := #CRC, N := 1); #TM2 := SHL(IN := #CRC, N := 1);
IF #TM1 <> #TM2 THEN #CRC := #CRC XOR W#16#A001; END_IF;
END_FOR;
END_FOR;
I can do it