Com port

@livtaras · Регистрация: 20.01.2014

Author24 — интернет-сервис помощи студентам

Здравствуйте!!! У меня такая проблема, есть некое устройство которое работает по протоколу MODBUS RTU(к компъютеру подключено через comport), на него подается команда на считывание информации, оно в ответ передает даныные(ток, напряжение, состояние входов). Команду на считывание я подал, устройство ответило, но в ответе вместо 11 байт приходит 22.
Ответ который я получаю:
01 00 03 00 06 00 03 00 20 04 03 00 22 20 00 00 00 00 40 04 4C 04
Нужный ответ:
01 03 06 03 D0 03 97 00 00 51 3C

Код:

Visual Basic

' Кнопка "Запрос"
Private Sub Command3_Click()
Dim Buffer() As Byte
Dim voltage As Integer
Dim Current As Integer
TextI = ""
If MSComm1.PortOpen = False Then
    Text1.Text = "ERROR SEND"
End If
If MSComm1.PortOpen = True Then
    MSComm1.Output = Chr(&H1) & Chr(&H3) & Chr(&H0) & Chr(&H5) & Chr(&H0) & Chr(&H3) & Chr(&H15) & Chr(&HCA)
    Buffer = MSComm1.Input
    Debug.Print "=== BOF ==="
For i = LBound(Buffer) To UBound(Buffer)
Debug.Print Right("0" & Hex(Buffer(i)), 2) & " ";
voltage = 256 * Buffer(6) + Buffer(8)
Text2.Text = voltage & "B"
Current = 256 * Buffer(10) + Buffer(12)
Text3.Text = Current & "A"
Text1.Text = Buffer(10) & " " & Buffer(11) & " " & Buffer(12) & " " & Buffer(13)
 
Next i
Debug.Print
Debug.Print "=== EOF ==="
 
End If
End Sub

@vodav · 20.01.2014, 16:35

Свойство MSComm.Input имеет тип String, попробуйте работать с ним как со строкой.
Еще:
1. Очищайте порт перед каждым обращением к нему.
2. После запроса в порт установите паузу на несколько ms (решите другую задачу или организуйте пустой цикл)
3. Лучше применить MODBUS ASCII, он не критичен к временным параметрам передачи.

@livtaras · 20.01.2014, 17:39 **[ТС]**

vodav, нужен именно MODBUS RTU.

@vodav · 20.01.2014, 18:59

Сообщение от livtaras

нужен именно MODBUS RTU

А я что? Я -пожалуйста, я, вообще, за любой кипишь, кроме голодовки. Только вот часть описания алгоритма RTU: "Если интервал тишины продолжительностью 1.5 [символа] возник во время передачи фрейма, принимающее устройство заканчивает прием сообщения и следующий байт будет воспринят как начало следующего сообщения."
Заставить винды работать с соблюдением этого условия -для Вас это будет хорошей школой.

Новые блоги и статьи
Преобразование полей (элементов управления содержимым) в обычный текст РоΜа 23.01.2025 Возникла необходимость преобразовать поля в текст (те, что на вкладке разработчик добавляются) . Помучившись родил следующее: Sub ПоляВТекст() Преобразует все поля в текст (даты, текст,. . .	Как проверить существование директории в скрипте Bash bt_guru 23.01.2025 При разработке скриптов Bash одной из ключевых задач является корректная работа с файловой системой, где особое место занимает проверка существования директорий. Эта операция становится критически. . .	Как работают срезы (slice) в Python bytestream 23.01.2025 Python предоставляет разработчикам мощный и гибкий инструмент для работы с последовательностями данных - срезы (slices). Эта функциональность позволяет извлекать, модифицировать и управлять. . .	Как удалить подмодуль (submodule) в Git bytestream 23.01.2025 При работе с крупными проектами в системе контроля версий Git разработчики часто сталкиваются с необходимостью управления зависимостями и внешними компонентами. Подмодули (submodules) представляют. . .	В чем разница между @staticmethod и @classmethod в Python. Декораторы методов bytestream 23.01.2025 В Python декораторы методов представляют собой мощный инструмент, позволяющий модифицировать поведение функций и методов без изменения их исходного кода. Эта возможность является одной из. . .	Как преобразовать InputStream в String в Java bytestream 23.01.2025 В мире Java-разработки работа с потоками данных является одной из ключевых операций при создании современных приложений. InputStream, как фундаментальный класс для обработки входных потоков данных,. . .
Как обновить форк (ответвление) репозитория в Git bytestream 23.01.2025 Одним из наиболее мощных инструментов Git для организации совместной работы является механизм форкинга репозиториев, который позволяет создавать независимые копии проектов для дальнейшей разработки. . . .	Как работает async/await в C#. Асинхронное программирование в .NET bytestream 23.01.2025 Введение в асинхронное программирование Асинхронное программирование представляет собой важнейшую концепцию современной разработки программного обеспечения, особенно в контексте создания. . .	КуМир: полное руководство bytestream 23.01.2025 Введение в КуМир: история создания и назначение КуМир (Комплект Учебных МИров) представляет собой образовательную среду программирования, которая была создана для обучения основам алгоритмизации и. . .	Что такое OLAP. Где и как использовать многомерный анализ данных bytestream 23.01.2025 Введение в OLAP-технологии В современном мире бизнес-аналитика и обработка больших массивов данных играют ключевую роль в принятии стратегических решений. Организации накапливают огромные объемы. . .	MongoDB: что это, для чего нужна и как использовать bytestream 23.01.2025 Введение в MongoDB: современная документоориентированная СУБД В современном мире разработки программного обеспечения выбор правильной системы управления базами данных является критически важным. . .	Как использовать закрытый ключ шифрования в Git. Шифрование в Git bytestream 23.01.2025 Установка и настройка закрытых ключей в Git предоставляет дополнительный уровень безопасности для работы с репозиториями. Для начала необходимо создать пару ключей, обычно это осуществляется с. . .

@vodav 572 / 141 / 37 Регистрация: 12.03.2012 Сообщений: 403
	20.01.2014, 16:35	2
	Свойство MSComm.Input имеет тип String, попробуйте работать с ним как со строкой. Еще: 1. Очищайте порт перед каждым обращением к нему. 2. После запроса в порт установите паузу на несколько ms (решите другую задачу или организуйте пустой цикл) 3. Лучше применить MODBUS ASCII, он не критичен к временным параметрам передачи. 0

@livtaras 0 / 0 / 0 Регистрация: 20.01.2014 Сообщений: 2
	20.01.2014, 17:39 [ТС]	3
	vodav, нужен именно MODBUS RTU. 0

@vodav 572 / 141 / 37 Регистрация: 12.03.2012 Сообщений: 403
	20.01.2014, 18:59	4
	Сообщение от livtaras нужен именно MODBUS RTU А я что? Я -пожалуйста, я, вообще, за любой кипишь, кроме голодовки. Только вот часть описания алгоритма RTU: "Если интервал тишины продолжительностью 1.5 [символа] возник во время передачи фрейма, принимающее устройство заканчивает прием сообщения и следующий байт будет воспринят как начало следующего сообщения." Заставить винды работать с соблюдением этого условия -для Вас это будет хорошей школой. 0

Опции темы