16-Bit Folge über LPT ausgeben

[BoondockDuckling]

sohooooo ....
das Problem wäre gefunden. Beim Übertragung der Bits muss ein Timing eingehalten werden.

Code:

/Load  -\__________________________________/-

Data   __/---\_________/---\_________/---\___

Clock  ___/-\____/-\____/-\____/-\____/-\____

Relativ stümperhaft habe ich das in meinem Code mal so eingebaut:

Delphi-Quellcode:

 PortOut($378,0);  delay(d);
 PortOut($378,4);  delay(d);
 PortOut($378,5);  delay(d);
 PortOut($378,4);  delay(d);
 PortOut($378,0);  delay(d);

klappt sogar bis zu einem Delay von 5ms.


Wie könnte man das denn noch in deinen Code einbauen?