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

MODBUS-enheter R / W-dataåtkomst med [MBusDrv.dll] -bibliotek.

Exporterade funktioner (pascaldeklarationer):

{* Standardläsadata från MODBUS-enheten *}
funktion GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Data: array [0..254] byte): heltal; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Holding Registers)
Data: array [0..254] av byte (enhetsdator)
Returnera heltal (0 = OK)

{* Utökad läsadata från MODBUS-enheten *}
funktion GetMBDataEx (const SlaveAddr: word; const ReadType: word): pekare; stdcall;
SlaveAddr: word (1..254)
ReadType: word (0 = Coils / 1 = Holding Registers)
Returpekare av 255 byte (enhetsdata eller 0 = Fel)

{* VBA (Microsoft Visual Basic) läs data från MODBUS-enheten *}
funktion GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): pekare; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holdingregister)
Returpekare av 255 byte (enhetsdata eller 0 = Fel)

{* Standardskrivdata till MODBUS-enhet *}
funktion PutMBData (const SlaveAddr: byte; const SkrivType: booleskt; const DataAddr: byte; const Data: ord): heltal; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (false = Coil / true = Holding Register)
DataAddr: byte (1..255)
Data: ord
Returnera heltal (statuskod> = 0 = OK)

{* VBA (Microsoft Visual Basic) skriv data till MODBUS-enhet *}
funktion PutMBDataVBA (const SlaveAddr: longint; const SkrivType: longint; const DataAddr: longint; const Data: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Coil / 1 = Holding Register)
DataAddr: longint (1..255)
Data: longint
Återgå longint (statuskod> = 0 = OK)