pascalScada
Модератор: Модераторы
pascalScada
Кто нибудь пользовался этими компонентами:
http://wiki.freepascal.org/PascalSCADA ?
Решил организовать связь с Овеновским прибором по Modbus, и пока никак не могу к нему подступиться.
Если кому не жалка киньте в меня простым примером пожалуйста. Входящие в поставку глаза пока не открыли мне.
http://wiki.freepascal.org/PascalSCADA ?
Решил организовать связь с Овеновским прибором по Modbus, и пока никак не могу к нему подступиться.
Если кому не жалка киньте в меня простым примером пожалуйста. Входящие в поставку глаза пока не открыли мне.
Похоже только я пишу автоматизацию на паскале, но если кому будет интересно с прибором связался, могу из него читать и в него писать данные. Оказалось очень легко и просто. Если будет кому то интересно могу оформить в виде небольшой статьи.
serg_iv писал(а):Оказалось очень легко и просто.
Не обольщайтесь
Если будет кому то интересно могу оформить в виде небольшой статьи
всем интересно
ev писал(а):всем интересно
Намек понял, сделаю.
serg_iv писал(а):сделаю
было бы интересно почитать (с практическими примерами и устройствами), а то я лично не вкурил (хотя особо и не упирался).
Отправил на ev@
Тема интересная. На паскале (на Дельфи) я занимаюсь автоматизацией около 10 лет, но проекты специализированные и под это есть набор библиотек собственной разработки.
Ваш опыт был бы мне очень интересен.
Ваш опыт был бы мне очень интересен.
отослал еще раз, в личных сообщениях не пойму нифига, в отправленых ничего не показывает. EV отпиши в личку дошло или нет
serg_iv
спасибо за статью
спасибо за статью
Если автор еще сюда заглядывает, хотелось бы попросить помощи.
У меня имеется аналогичный девайс, который висит на 485-й шине. Разница только в том, что он работает только с типом протокола Modbus ASCII. Общение с компом происходит через переходник USB-RS485. В системе он виден как виртуальный последовательный порт (Com3).
Стоит задача считать из девайса некоторые переменные и оформить в красивом виде, как программу.
Используя софт ModScan32, мне удается успешно прочитать переменные:
Однако, с PascalScada ничего не выходит.
Опишу по порядку.
Я поставил на Win7 x64 последний Lazarus 0.9.30.4.
Скачал PascalScada 0.7.2. При установке его в Лазарус он выдал error при компиляции. Гугление по строке выдало решение.
После соответствующей правки Zeos.inc все собралось нормально и PascalScada интегрировался в IDE.
Создаю новый проект. Кидаю на форму TSerialPortDriver, настраиваю:
Далее кидаю на форму TWestASCIIDriver (более ничего похожего на ASCII там не нашел). Прописываю CommunicationPort:SerialPortDriver1.
Добавлено спустя 10 минут 27 секунд:
Добавляю на форму TPLCTagNumber, пытаюсь настроить:
На вкладке "События" выбран ProtocolDriver:WestASCIIDriver1
На форму выведена кнопка и TLabel, при нажатии на которую происходит следующее:
При нажатии на кнопку выводится значение 0. В логе порта (comport.txt) вообще ничего нет. Светодиоды TX RX на конвертере молчат.
Что я делаю не так?
У меня имеется аналогичный девайс, который висит на 485-й шине. Разница только в том, что он работает только с типом протокола Modbus ASCII. Общение с компом происходит через переходник USB-RS485. В системе он виден как виртуальный последовательный порт (Com3).
Стоит задача считать из девайса некоторые переменные и оформить в красивом виде, как программу.
Используя софт ModScan32, мне удается успешно прочитать переменные:
Однако, с PascalScada ничего не выходит.
Опишу по порядку.
Я поставил на Win7 x64 последний Lazarus 0.9.30.4.
Скачал PascalScada 0.7.2. При установке его в Лазарус он выдал error при компиляции. Гугление по строке выдало решение.
После соответствующей правки Zeos.inc все собралось нормально и PascalScada интегрировался в IDE.
Создаю новый проект. Кидаю на форму TSerialPortDriver, настраиваю:
Далее кидаю на форму TWestASCIIDriver (более ничего похожего на ASCII там не нашел). Прописываю CommunicationPort:SerialPortDriver1.
Добавлено спустя 10 минут 27 секунд:
Добавляю на форму TPLCTagNumber, пытаюсь настроить:
На вкладке "События" выбран ProtocolDriver:WestASCIIDriver1
На форму выведена кнопка и TLabel, при нажатии на которую происходит следующее:
Код: Выделить всё
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := FloatToStr(PLCTagNumber1.Value);
end;
При нажатии на кнопку выводится значение 0. В логе порта (comport.txt) вообще ничего нет. Светодиоды TX RX на конвертере молчат.
Что я делаю не так?
У вас нет необходимых прав для просмотра вложений в этом сообщении.
Если автор еще сюда заглядывает, хотелось бы попросить помощи.
Конечно заглядываю, но ответ на заданный вопрос не знаю, к сожалению.
Но возможно то что лог файл пуст, говорит о том что у программы нет каких то прав.
Последний раз редактировалось serg_iv 28.06.2012 12:06:59, всего редактировалось 1 раз.
В статье Вы писали что реле поддерживает кроме RTU также ASCII. Есть возможность на нем испытать?
хорошо, испытаю, о результате отпишусь.
Добавлено спустя 7 минут 10 секунд:
отписываюсь - не работает, лог файл пуст. В режиме RTU - OK.
Добавлено спустя 7 минут 10 секунд:
отписываюсь - не работает, лог файл пуст. В режиме RTU - OK.
