| ??? 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 |



