![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Тут такая задача. Решил сделать систему охраны для дома. Спаял хитрое устройство из деталей старого ПК от которого идут линии (выводы порта). Эти линии подключаются к герконам(магнитный датчик-подключается к двери). Вот пишу программу которая будет анализировать состояние этих линий. Вот и сам вопрос: как программно определить замкнута линия или разомкнута линия(контак, вывод порта)?
![]() |
#2
|
|||
|
|||
![]() примерно вот таким кодом
Код:
If (fsmport.Port [STATUS_PORT_ADR] And 64) = 0 Then MainForm.LogError ('Предупреждение: Int активен перед записью'); If (fsmport.Port [STATUS_PORT_ADR] And 128) = 0 Then MainForm.LogError ('Предупреждение: Wait в состоянии высокого уровня перед записью'); fsmport.Port [STATUS_PORT_ADR]:=fsmport.Port [STATUS_PORT_ADR] And $0FE; // Сбросить флаг тайм-аута fsmport.Port[EPP_DATA_PORT_ADR] := b; вот тут как раз можеш устроить проверку переменной b // Write data if (fsmport.Port [STATUS_PORT_ADR] And 1) = 1 Then Begin |
#3
|
|||
|
|||
![]() Советую делать систему на базе программируемого контроллера или Умного дома.
|
#4
|
|||
|
|||
![]() Что такое "умный дом"?
|