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

MODBUS 장치는 [MBusDrv.dll] 라이브러리가있는 R / W 데이터 액세스입니다.

내 보낸 함수 (파스칼 선언) :

{* MODBUS 장치에서 표준 읽기 데이터 *}
함수 GetMBData (const SlaveAddr : byte; const ReadType : boolean; var 데이터 : 배열의 [0..254]) : 정수; stdcall;
슬레이브 주소 : 바이트 (1..254)
ReadType : 부울 (false = 코일 / 참 = 보유 레지스터)
데이터 : 바이트 (장치 데이터)의 배열 [0..254]
정수 반환 (0 = 확인)

{* MODBUS 장치에서 확장 된 읽기 데이터 *}
함수 GetMBDataEx (const SlaveAddr : word; const ReadType : word) : 포인터; stdcall;
슬레이브 주소 : word (1..254)
ReadType : 워드 (0 = 코일 / 1 = 홀딩 레지스터)
255 바이트 (장치 데이터 또는 0 = 오류)의 포인터 반환

{* VBA (Microsoft Visual Basic) MODBUS 장치에서 데이터 읽기 *}
함수 GetMBDataVBA (const SlaveAddr : LongInt; const ReadType : LongInt) : 포인터; stdcall;
SlaveAddr : longint (1..254)
ReadType : longint (0 = 코일 / 1 = 홀딩 레지스터)
255 바이트 (장치 데이터 또는 0 = 오류)의 포인터 반환

{* MODBUS 장치에 표준 쓰기 데이터 *}
함수 PutMBData (const SlaveAddr : byte; const WriteType : 부울; const DataAddr : 바이트; const 데이터 : 워드) : 정수; stdcall;
SlaveAddr : 바이트 (1 ..254)
WriteType : 부울 (false = 코일 / 참 = 보유 등록)
DataAddr : 바이트 (1..255)
데이터 : 단어
정수 반환 (상태 코드> = 0 = 확인)

{* 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 = 확인)