9 lines
129 B
Plaintext
9 lines
129 B
Plaintext
|
Interface;
|
||
|
|
|
||
|
|
Unit Port(InP,OutP);
|
||
|
|
|
||
|
|
Function InP(PortNo:Word):Byte;
|
||
|
|
Procedure OutP(PortNo:Word; Data:Byte);
|
||
|
|
|
||
|
|
End;
|