Bascomneuling 3 Byts abfragen

[Jörg Drube (Gast)]

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

[formtapez (Gast)]

Inputbin A, B, C
(Steht übrigens in der Hilfe)

MfG
formtapez

[Jörg Drube (Gast)]

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