VBasic > Delphi ich verstehe das was nicht

**robinWie**

Hallo,
ich habe mir die

Relaiskarte K8056 von Velleman gekauft und möchte eine eigene Anwendung dafür in Delphi entwickeln. In der Anleistung steht, dass die Befehlsfolge so ausehen muss:

Zitat:

1. CHR$(13)
2. Karntenaddresse(1...255)
3. Befehl
4. Addresse(1 ... 255) oder Relaisnummer ('1'..'9' ASCII)
5. 'checksum' Summe prüfen (2-Komplement der Summer der 4 vorigen Bytes +1);

Hier mal die Wichtigsten Befehle

Zitat:

[...]
'S': Relias einstellen. 'S'-Befehl soll durch Relais # '1' bis '8' gefolgt werden. [...]
'C': Relias löshcen. 'C'-Befehl soll durch Relais # '1' bis '8' gefolt werden. [...]

Das mit der Checksumme verstehe ich nicht. In Visual Basic sieht das so aus:

markieren

Code:

			checksum = (255 - ((((13 + address + Asc("S") + Asc("4")) / 256) - Int((13 + address + Asc("S") + Asc("4")) / 256)) * 256)) + 1
		

Niergendwo ist definiert was checksum eigentlich für ein Typ sein soll, das macht es für mich ja noch schwerer. Ihr könnt euch das Programm

hier runterladen, wenn euch das hilft. der Code ist in der Datei "K8056.frm".
Der Com-Port muss so konfiguriert werden:
Baud: 2400
Paritätt: Keine
Databits: 8
Stopbits: 1

Weiss jemand wie man das in Delphi umsetzt?

Danke im Voraus

VBasic > Delphi ich verstehe das was nicht

VBasic > Delphi ich verstehe das was nicht

Forumregeln