ну так если вейнтек, тогда вобще проблем не должно быть
Код:
IF mbus THEN
	IF diRecvSocket = SOCKET_INVALID THEN
		diRecvSocket := UdpOpenReceiveSocket(502);
	ELSE
		Reply := UdpReceiveData(diRecvSocket, ADR(byRecv),12);
		byRecv[5]:=67;
		byRecv[8]:=64;
		ptr:=ADR(byRecv[9]);
		ptr^:=visu;
		IF byRecv[6]=1 AND byRecv[7]=3 THEN
			result:=UdpSendData(diRecvSocket,ADR(byRecv), SIZEOF(byRecv),Reply.sa);
			byRecv[6]:=0;
		END_IF;
	END_IF;
ELSE
	IF diRecvSocket <> SOCKET_INVALID THEN
		SysSockClose(diSocket:=diRecvSocket);
		diRecvSocket := SOCKET_INVALID;
	END_IF;
END_IF;
панель перевожу в режим UDP, в контроллере вышеизложенный код