Mit meinen sehr beschränkten Assembler-Kenntnissen würd ich sagen:
Delphi-Quellcode:
asm
push dx ; Inhalt des Registers DX auf Stack sichern
mov dx, 888 ; Dezimalzahl 888
in Register DX schreiben
mov al, Datenwert ;
in das Low-Byte des Registers den Wert von Datenwert schreiben
Out dx, al ; den Datenwert an den Port 888 = LPT senden
pop dx ; den Inhalt, den DX vorher hatte, wieder
in DX schreiben
end;
Ist vielleicht als Anschauungsbeispiel, wie so eine Peripherieansteuerung funktioniert, ganz OK, aber in einem Programm, das wirklich für was gut ist und auch unter WinNTff laufen soll, wenig geeignet.