MODBUS RTU Serial RS232/RS485 and TCP/IP for Windows

MODBUS設備使用[MBusDrv.dll]庫R / W數據訪問。

導出函數（pascal聲明）：

{*來自MODBUS設備的標準讀取數據*}
函數GetMBData（const SlaveAddr：byte; const ReadType：boolean; var Data：array [0..254] of byte）：integer; STDCALL;
SlaveAddr：byte（1..254）
ReadType：boolean（false = Coils / true =控制寄存器）
數據：字節的數組[0..254]（器件數據）
返回整數（0 = OK）

{*從MODBUS設備擴展讀取數據*}
函數GetMBDataEx（const SlaveAddr：word; const ReadType：word）：pointer; STDCALL;
SlaveAddr：word（1..254）
ReadType：字（0 =線圈/ 1 =保持寄存器）
255字節的返回指針（設備數據或0 =錯誤）

{* VBA（Microsoft Visual Basic）從MODBUS設備讀取數據*}
函數GetMBDataVBA（const SlaveAddr：LongInt; const ReadType：LongInt）：pointer; STDCALL;
SlaveAddr：longint（1..254）
ReadType：longint（0 =線圈/ 1 =保持寄存器）
255字節的返回指針（設備數據或0 =錯誤）

{*標準寫入數據到MODBUS設備*}
函數PutMBData（const SlaveAddr：byte; const WriteType：boolean; const DataAddr：byte; const Data：word）：integer; STDCALL;
SlaveAddr：byte（1 ..254）
WriteType：boolean（false = Coil / true =保持寄存器）
DataAddr：byte（1..255）
資料：字
返回整數（狀態碼= 0 = OK）

{* VBA（Microsoft Visual Basic）將數據寫入MODBUS設備*}
函數PutMBDataVBA（const SlaveAddr：longint; const WriteType：longint; const DataAddr：longint; const Data：longint）：longint; STDCALL;
SlaveAddr：longint（1..254）
WriteType：longint（0 =線圈/ 1 =保持寄存器）
DataAddr：longint（1..255）
數據：longint
返回longint（狀態碼> = 0 = OK）