Jetter JVM-407 Betriebsanleitung Seite 264

11 Programmierung
264
End_Struct;
MODBUS_TCP:
Struct
Ipadress
Port
Timeout
Source
Destination
Values
End_Struct;
End_Type;
Const
RscanRegs
RscanStatRegs
Elements
InitRscan
StartRscan
ProtModbusTCP
ModbusTCPort
Rscan
End_Const;
Var
RemoteScan
RscanElements
RscanStatus
ModbusTCP
Result
Send
End_Var;
Task tRscan Autorun
RemoteScan.Protocol := ProtModbusTCP;
RemoteScan.Units
// first communication unit
RscanElements[0].Ipadress
: Int;
: Int;
: Int;
: Int;
: Int;
: Int;
= 1000100;
= 1001000;
= 2;
= 80;
= 81;
= 5;
= 502;
= 0;
: RSCAN_HEADER At
: Array[Elements]
%VL RscanRegs + Regsizeof(RSCAN_HEADER);
: Array[Elements]
%VL RscanStatRegs;
: MODBUS_TCP At %VL 1000500;
: Int At %VL 1000099;
: Bool At %MX 1;
:= Elements;
:= IP#192.168.10.211;
%VL RscanRegs;
Of RSCAN_ELEMENT At
Of RSCAN_STATUS At
Jetter AG