Status von 4 Eingängen als Variable

Ich möchte die beiden Nibbles eines Port`s in zwei verschiedene Variablen schreiben, wie mach` ich das ?

...den ganzen Port als Byte einlesen geht doch einfach so, oder :

Code:

---

dim a as byte
config portd = input
Ddrd = &HFF
a = Portd

---

bei input gehts nicht über PORTx sondern über PINx, also:

a = pind

die beiden nibbles lassen sich ohne probleme trennen, z.b. die unteren vier bits in variable b as byte

b = a and &B00001111

und die oberen vier in variable c as byte

c = a and &B11110000
shift c, right, 4

voila :)

...ahh, supi...Danke !!!