Цитата (MiXaS)
Подскажите, в расчет црц входитя данные от адреса до црц не включительно?
Вот сама функция на рыбе:
Код
SUB CRC_16()'-------- Функция расчета контрольной суммы CRC16 ------------------
CONST Generator = 40961
DIM Temp AS WORD
DIM CRC AS WORD
DIM i AS BYTE
DIM j AS BYTE
DIM BitVal AS BIT
CRC = 65535
FOR i = 1 TO LengthMB
Temp = BufferMB(i)
CRC = CRC XOR Temp
FOR j = 1 TO 8
BitVal = CRC.0
CRC = CRC >> 1
IF BitVal = 1 THEN
CRC = CRC XOR Generator
ENDIF
NEXT
NEXT
Crc16(0) = CRC.byte0' CRC16 low byte
Crc16(1) = CRC.byte1' CRC16 high byte
END SUB'------------------------------------------------------------------------
