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

MODBUS пристроїв доступ до даних з бібліотекою [MBusDrv.dll].

Експортовані функції (декларації паскала):

{* Стандартні дані читання з пристрою MODBUS *}
функція GetMBData (const SlaveAddr: байт; const ReadType: boolean; var Дані: масив [0..254] байтів): ціле число; stdcall;
SlaveAddr: байт (1..254)
ReadType: логічний (false = Котушки / true = Holding Registers)
Дані: масив [0..254] байта (дата пристрою)
Повернути ціле число (0 = OK)

{* Розширені дані читання з пристрою MODBUS *}
функція GetMBDataEx (const SlaveAddr: word; const ReadType: word): покажчик; stdcall;
SlaveAddr: слово (1..254)
ReadType: word (0 = Coils / 1 = Holding Registers)
Покажчик показу 255 байт (пристрій datas або 0 = помилка)

{* VBA (Microsoft Visual Basic) читає дані з пристрою MODBUS *}
функція GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): покажчик; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holding Registers)
Покажчик показу 255 байт (пристрій datas або 0 = помилка)

{* Стандартний запис даних на пристрій MODBUS *}
функція PutMBData (const SlaveAddr: байт; const WriteType: boolean; const DataAddr: байт; const Дані: слово): ціле; stdcall;
SlaveAddr: байт (1 ..254)
WriteType: boolean (false = Coil / true = Реєстр холдингу)
DataAddr: байт (1..255)
Дані: слово
Повернути ціле (код стану> = 0 = OK)

{* VBA (Microsoft Visual Basic) записує дані на пристрій MODBUS *}
функція PutMBDataVBA (const SlaveAddr: longint; const WriteType: longint; const DataAddr: longint; const Дані: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Котушка / 1 = Реєстр Холдингу)
DataAddr: longint (1..255)
Дані: longint
Повернути longint (код статусу> = 0 = OK)