Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

И так тему урока сделатл светеофор в коде сис летс го не нажимацте сюда не учинеки

Дмитрий Гудимов Ученик (162), открыт 4 недели назад
(* Обработка нажатия кнопки *)
IF SB1 AND Switch THEN
Switch := FALSE; (* Блокировка повторных нажатий *)
IF State = 0 THEN
State := 1; (* Включение светофора *)
ELSE
State := 0; (* Выключение светофора *)
END_IF
CycleTimer.IN := FALSE; // Сброс таймера задержки
ELSIF NOT SB1 THEN
Switch := TRUE; (* Разблокировка кнопки *)
END_IF;

(* Управление светофором в зависимости от состояния *)
CASE State OF
1: (* Лампа 1 *)
HL1 := TRUE;
HL2 := FALSE;
HL3 := FALSE;
IF Timer.Q THEN
State := 2;
Timer.IN := FALSE; // Сброс таймера
END_IF;
Timer.IN := TRUE;
2: (* Лампа 2 *)
HL1 := FALSE;
HL2 := TRUE;
HL3 := FALSE;
IF Timer.Q THEN
State := 3;
Timer.IN := FALSE; // Сброс таймера
END_IF;
Timer.IN := TRUE;
3: (* Лампа 3 *)
HL1 := FALSE;
HL2 := FALSE;
HL3 := TRUE;
IF Timer.Q THEN
State := 1;
Timer.IN := FALSE; // Сброс таймера
END_IF;
Timer.IN := TRUE;
0: (* Выключено *)
HL1 := FALSE;
HL2 := FALSE;
HL3 := FALSE;
Timer.IN := FALSE;
END_CASE;

CycleTimer.IN := TRUE; // Запуск таймера задержки
IF CycleTimer.Q THEN
CycleTimer.IN := FALSE; // Сброс таймера задержки
END_IF;

END_WHILE;
1 ответ
Сонная хрень Искусственный Интеллект (314565) 4 недели назад
Ага. Теперь то же самое, но не через жопу и по-русски, пожалуйста.
Похожие вопросы