Bascomneuling 3 Byts abfragen

Jörg Drube Gast #147900
Lesenswert?
• ▲
▼ 
Hallo Leute ich bin hier neu und ein blutiger Anfänger. Aber ich glaube
jeder hat einmal angefangen. Ich möchte 3 Bytes an einem Pin
abfragen.Diese lauten: 00 85 A5 und kommen auch in dieser Reihenfolge.
1 Byte kann ich abfragen aber wie geht das mit 3 ?
Vielleicht kann mir einer von Euch einen Tip geben denn ich verzweifle
bald. In meinen Büchern habe ich leider auch nichts gefunden oder nicht
verstanden.

Config Portd = Input
Config Portb = Output
Config Portb.0 = 0

Dim A As Byte
Do
Inputbin A

Select Case A
Case &H85 : Portb = 1
Case &H81 : Portb = 0
End Select
Loop

Wäre sehr, sehr Dankbar für einen Tip.
Gruss Jörg
Antwort Zitieren Bearbeiten Thread verschieben Thread sperren Anmeldepflicht aktivieren Anpinnen Thread löschen Thread mit anderem zusammenführen Beitrag melden
Jörg Drube Gast #147902
Lesenswert?
• ▲
▼ 
Danke für die Antwort. Input a,b,c habe ich versucht. Aber wie muss dann
diese Zeile aussehen ? Denn nur wenn alle 3Bytes  kommen soll der Portb
= 1 sein. Mein Englisch ist leider nicht sehr gut und eine gute
deutsche Erklärung habe ich noch nicht gefunden.

select case A , B , C           '???
Case &H0085A5 : Portb = 1       '???

Nochmals Danke für die Hilfe
Antwort Zitieren Bearbeiten Löschen Beitrag melden
Thread beobachten

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

Bestehender Account

oder

Mit Google-Account einloggen

Noch kein Account?

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren