??? 08/06/07 16:22 Read: times |
#142823 - The formula Responding to: ???'s previous message |
This is in VB6, but it translates well. and Make your own tables
Public Function CRC8Byte(ByVal Data As Byte, ByVal CRC As Byte) As Byte Dim j As Integer Dim k As Integer Const POLY = &H107 'X8 + X2 + X1 + 1 'Const POLY = &H12F 'X8 + X5 + X3 + X2 + X1 + 1 '8 7654 3210 '1 0010 1111 j = (Data Xor CRC) And &HFF For k = 1 To 8 If (j And &H80) Then j = (j * 2) Xor POLY Else j = j * 2 End If Next k CRC8Byte = j And &HFF |
Topic | Author | Date |
How to create a crc table? | 01/01/70 00:00 | |
simple | 01/01/70 00:00 | |
RE: simple | 01/01/70 00:00 | |
I said it\'s simple | 01/01/70 00:00 | |
Thank you | 01/01/70 00:00 | |
Protocols | 01/01/70 00:00 | |
examples | 01/01/70 00:00 | |
Runtime Computed Table?? | 01/01/70 00:00 | |
RE: Runtime...? | 01/01/70 00:00 | |
table is not necessary | 01/01/70 00:00 | |
Benchmark | 01/01/70 00:00 | |
I did benchmarks as such on AVR | 01/01/70 00:00 | |
Similar findings | 01/01/70 00:00 | |
no beavers that I've tended to!! | 01/01/70 00:00 | |
not bitwise.... | 01/01/70 00:00 | |
Better is a strong word | 01/01/70 00:00 | |
Also comment about SMBus PEC Code... | 01/01/70 00:00 | |
The Table | 01/01/70 00:00 | |
The Nibble Table for Poly 107 | 01/01/70 00:00 | |
The formula | 01/01/70 00:00 | |
Have you seen this? | 01/01/70 00:00 | |
Now I have | 01/01/70 00:00 | |
Yes, that is a Key Document! | 01/01/70 00:00 |