vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
C-Funktion nach VB konvertieren 
Autor: Tom
Datum: 19.07.02 08:33

Hallo,
ich hab ein ziemlich blödes Problem: eine kleine ANSI C Funktion soll nach VB konvertiert werden.
Die Funktion errechnet eine CRC über einen Eingabe-Buffer. Als Test habe ich die C-Funktion mit "testbuffer" gefüttert und als Ergebnis die CRC "DF7D" erhalten.

Kann mir jemand helfen, eine VB Funktion daraus zu basteln?

Hier die C-Funktion:
************************************************************************* */
#define CCITT16_POLYNOM 0x1021 /* CRC polynomial */

word calc_crc(
word *buff, /* input stream like a word buffer */
word blen) /* length of the input bytes! */
{
word one_data, crc, i, t;
word wlen; /* length in words */

wlen = blen / 2;
crc = *buff++;
one_data = *buff++;

for (i = 1; i < wlen; i++, one_data = *buff++)
{
t = crc & 0x8000 ? 1 : 0;
crc <<= 1;
if (t != 0)
{
crc ^= CCITT16_POLYNOM;
}
crc ^= one_data;
}
return(crc);

} /* end of calc_crc() */


/* ********************************************************************** */
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
C-Funktion nach VB konvertieren59Tom19.07.02 08:33
Re: C-Funktion nach VB konvertieren38Atarifreak19.07.02 16:26

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel