Perangkat MODBUS akses data R / W dengan perpustakaan [MBusDrv.dll].
Fungsi yang diekspor (deklarasi pascal):
{* Standar membaca data dari perangkat MODBUS *}
fungsi GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Data: array [0..254] byte): integer; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Holding Registers)
Data: array [0..254] byte (data perangkat)
Bilangan bulat kembali (0 = OK)
{* Diperpanjang membaca data dari perangkat MODBUS *}
fungsi GetMBDataEx (const SlaveAddr: kata; const ReadType: word): pointer; stdcall;
SlaveAddr: kata (1..254)
ReadType: word (0 = Coils / 1 = Holding Registers)
Pengirim kembali 255 byte (data perangkat atau 0 = Kesalahan)
{* VBA (Microsoft Visual Basic) membaca data dari perangkat MODBUS *}
fungsi GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): pointer; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holding Registers)
Pengirim kembali 255 byte (data perangkat atau 0 = Kesalahan)
{* Standard menulis data ke perangkat MODBUS *}
fungsi PutMBData (const SlaveAddr: byte; const WriteType: boolean; const DataAddr: byte; const Data: word): integer; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (false = Coil / true = Holding Register)
DataAddr: byte (1..255)
Data: kata
Return integer (kode status> = 0 = OK)
{* VBA (Microsoft Visual Basic) menulis data ke perangkat MODBUS *}
fungsi PutMBDataVBA (const SlaveAddr: longint; const WriteType: 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
Kembalikan longint (kode status> = 0 = OK)
Komentar tidak ditemukan