Parallele Schnittstelle

[matashen]

Mach das
 b := b or 1 // Bit0 setzen lieber so

Delphi-Quellcode:

B:=b or $1 //Bit 1 setzen
b:=b or $3 //Bit 2 setzen
b:=b or $7 //Bit 3 setzen
b:=b or $f //Bit 4 setzen
b:=b or $1f //Bit 5 setzen
b:=b or $3f //Bit 6 setzen
b:=b or $7f //Bit 7 setzen
b:=b or $ff //Bit 8 setzen

und wegnehmen mit

b:=b- $3


etc...