[r57]: / Monitor1 / CODESYS_Control_Win_V3 / Plc Logic / Application / Сontrol / Freq_Control / svnobj  Maximize  Restore  History

Download this file

116 lines (81 with data), 27.9 kB 

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
VisuElems.g_ClientManager.BeginIteration();
	IF pClient^.GlobalData.ClientType = VisuElems.Visu_ClientType.WebVisualization THEN
		_VisuFbClientTagDataHelper(pClientData := pClient);
		i := STRING_TO_UINT(_VisuFbClientTagDataHelper.stName);
		IF i > 0 AND i <= FR_NUM THEN
			u := i;
			VisuElems.CURRENTVISU := DEF_VIZU;
		END_IF
	END_IF
END_WHILE
	FOR i := 1 TO Freq_Control.FR_NUM DO // check connection to server
			cTCP_RTU[i].xEnable := FALSE;  // reconnect need in next cycle
			bMBFault[i] := TRUE;
tonClientTCP(IN := TON_recon, PT := T_CL_RST);
FOR i := 1 TO Freq_Control.FR_NUM DO
	cTCP_RTU[i]();
	_VisuFbClientTagDataHelper	: VisuElems.VisuFbClientTagDataHelper;
	
 
 
 WebVisu 
 
 
 VisuFbClientTagDataHelper,
	i:				UINT;
	wUserID:		WORD := 0;
	Ifdrv: 			ARRAY [1...Freq_Control.FR_NUM] OF IFreqDriver :=[
	sHostAddr: 		ARRAY [1...Freq_Control.FR_NUM] OF STRING := [
		'192.168.10.204', '192.168.10.206', '192.168.10.203', '192.168.10.209', '192.168.10.205',
		'192.168.10.202', '192.168.10.201', '192.168.10.207', '192.168.10.208', '192.168.10.200'];
	eReqState:		ARRAY [1...Freq_Control.FR_NUM] OF REQUEST_STATE := [Freq_Control.FR_NUM(FIRST_REQ)];
	wErrCount:		ARRAY [1...Freq_Control.FR_NUM] OF WORD := [Freq_Control.FR_NUM(0)];
	wFreqNew: 		ARRAY [1...Freq_Control.FR_NUM] OF WORD := [Freq_Control.FR_NUM(0)];
	wFreqAct: 		ARRAY [1...Freq_Control.FR_NUM] OF WORD := [Freq_Control.FR_NUM(0)];
	wFreqRef: 		ARRAY [1...Freq_Control.FR_NUM] OF WORD := [Freq_Control.FR_NUM(0)];
	bStartKey: 		ARRAY [1...Freq_Control.FR_NUM] OF BOOL;
	bMBFault:		ARRAY [1...Freq_Control.FR_NUM] OF BOOL := [Freq_Control.FR_NUM(FALSE)];
	bFreqFault:		ARRAY [1...Freq_Control.FR_NUM] OF BOOL := [Freq_Control.FR_NUM(FALSE)];
	pI:				POINTER TO IFreqDriver;
		//TRUE,TRUE,TRUE,FALSE,TRUE,TRUE,TRUE,FALSE,FALSE,FALSE];
END_VAR
	FR_NUM:			UINT := 10;
	TCP_PORT:		UINT := 502;
	T_CL_CNC:		TIME := T#1000MS; // client connect time
	DEF_VIZU:		STRING := 'Control';
 Modbus TCP
192.168.10.70 - 
 
 
 
 
 
 
 
!
 
 
, 
 
 
 
 
 
 
 
 
. 
 
 
 
 
 
 
!
 -----------------------------------------------------------------------------------------------
| 
		| 
.| 
	| 	
					| 
 
		| 
 
		| 
			|
| 10	| 21	| 21\2	|
 M3-D1C			| 192.168.10.79	|	-			|	-			|
01d: --||-- 
 2
03d: --||-- 
 4
05d: --||-- 
 6
07d: --||-- 
 8
09d: --||-- 
 10
11d: --||-- 
 2
13d: --||-- 
 4
15d: --||-- 
 6
17d: --||-- 
 8
19d: --||-- 
 10
20d: 
 
 
 
 
 (0 - 
, 1 - 
)