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

Συσκευές MODBUS Πρόσβαση σε δεδομένα R / W με βιβλιοθήκη [MBusDrv.dll].

Εξαγόμενες λειτουργίες (δηλώσεις pascal):

{* Τυπικά δεδομένα ανάγνωσης από τη συσκευή MODBUS *}
Λειτουργία GetMBData (const SlaveAddr: byte, const ReadType: boolean; var Δεδομένα: array [0..254] byte): ακέραιο; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Καταχωρητές)
Δεδομένα: πίνακας [0..254] byte (δεδομένα συσκευών)
Επιστροφή ακέραιος (0 = ΟΚ)

{* Εκτεταμένα δεδομένα ανάγνωσης από τη συσκευή MODBUS *}
συνάρτηση GetMBDataEx (const SlaveAddr: λέξη, const ReadType: λέξη): δείκτης; stdcall;
SlaveAddr: λέξη (1..254)
ReadType: λέξη (0 = πηνία / 1 = καταχωρητές κατοχής)
Δείκτης επιστροφής 255 byte (δεδομένα συσκευής ή 0 = Σφάλμα)

{* VBA (Microsoft Visual Basic) διαβάζει δεδομένα από τη συσκευή MODBUS *}
συνάρτηση GetMBDataVBA (const SlaveAddr: LongInt · const Τύπος ReadType: LongInt): δείκτης; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = πηνία / 1 = καταχωρητές συγκράτησης)
Δείκτης επιστροφής 255 byte (δεδομένα συσκευής ή 0 = Σφάλμα)

{* Τυπικά δεδομένα εγγραφής στη συσκευή MODBUS *}
συνάρτηση PutMBData (const SlaveAddr: byte, const Τύπος WriteType: boolean, const DataAddr: byte, const Δεδομένα: λέξη): ακέραιο; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (ψευδές = Coil / true = Μητρώο Holding)
ΔεδομέναAddr: byte (1..255)
Δεδομένα: λέξη
Επιστροφή ακέραιος (κωδικός κατάστασης> = 0 = ΟΚ)

{* VBA (Microsoft Visual Basic) γράφει δεδομένα στη συσκευή MODBUS *}
συνάρτηση PutMBDataVBA (const SlaveAddr: longint; const ΣύνταξηType: longint; const DataAddr: longint; const Στοιχεία: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Coil / 1 = Μητρώο Holding)
DataAddr: longint (1..255)
Δεδομένα: longint
Επιστροφή longint (κωδικός κατάστασης> = 0 = OK)