Hallo, ich möchte für ein Zahlungsterminal eine Schnittstelle mit CRC-Prüfsumme programmieren.
Als Muster habe ich einen C++ Quellcode bekommen, den ich nicht in Object Pascal übersetzt kriege.
Hat jemand Erfahrung mit so etwas oder kann mir diesen übersetzen?
Hier der Quellcode :
<PRE>
/*-------------------------------------------------------------------------*
/
unsigned int crc16update (unsigned int crc, char cData)
{
unsigned int bitlen,akku;
bitlen = 8;
while(bitlen --)
{
akku = cData ^ crc;
crc >>= 1;
if(akku & 1)
crc ^= 0x8408;
cData >>= 1;
}
return(crc);
}
/*-------------------------------------------------------------------------*
/
>/PRE>
Als Muster habe ich einen C++ Quellcode bekommen, den ich nicht in Object Pascal übersetzt kriege.
Hat jemand Erfahrung mit so etwas oder kann mir diesen übersetzen?
Hier der Quellcode :
<PRE>
/*-------------------------------------------------------------------------*
/
unsigned int crc16update (unsigned int crc, char cData)
{
unsigned int bitlen,akku;
bitlen = 8;
while(bitlen --)
{
akku = cData ^ crc;
crc >>= 1;
if(akku & 1)
crc ^= 0x8408;
cData >>= 1;
}
return(crc);
}
/*-------------------------------------------------------------------------*
/
>/PRE>