unit inpoutx64;

interface

Function DlPortReadPortUchar(Port:LongInt):byte;
Function DlPortReadPortUshort(Port:LongInt):SmallInt;
Function DlPortReadPortUlong(Port:LongInt):LongInt;

Procedure DlPortReadPortBufferUchar(Port:LongInt;
var Buffer:Pointer; Count:LongInt);
Procedure DlPortReadPortBufferUshort(Port:LongInt;
var Buffer:Pointer; Count:LongInt);
Procedure DlPortReadPortBufferUlong(Port:LongInt;
var Buffer:Pointer; Count:LongInt);

Procedure DlPortWritePortUchar(Port:LongInt; Value:byte);
Procedure DlPortWritePortUshort(Port:LongInt; Value:SmallInt);
Procedure DlPortWritePortUlong(Port:LongInt; Value:LongInt);

Procedure DlPortWritePortBufferUchar(Port:LongInt;
var Buffer:Pointer; Count:LongInt);
Procedure DlPortWritePortBufferUshort(Port:LongInt;
var Buffer:Pointer; Count:LongInt);
Procedure DlPortWritePortBufferUlong(Port:LongInt;
var Buffer:Pointer; Count:LongInt);

implementation

Function DlPortReadPortUchar; external 'inpoutx64.DLL';
Function DlPortReadPortUshort; external 'inpoutx64.DLL';
Function DlPortReadPortUlong; external 'inpoutx64.DLL';

Procedure DlPortReadPortBufferUchar; external 'inpoutx64.DLL';
Procedure DlPortReadPortBufferUshort; external 'inpoutx64.DLL';
Procedure DlPortReadPortBufferUlong; external 'inpoutx64.DLL';

Procedure DlPortWritePortUchar; external 'inpoutx64.DLL';
Procedure DlPortWritePortUshort; external 'inpoutx64.DLL';
Procedure DlPortWritePortUlong; external 'inpoutx64.DLL';

Procedure DlPortWritePortBufferUchar; external 'inpoutx64.DLL';
Procedure DlPortWritePortBufferUshort; external 'inpoutx64.DLL';
Procedure DlPortWritePortBufferUlong; external 'inpoutx64.DLL';

end.