"Молот" (конструктор "ТЕХНОЛИДЕР-1")

Электромеханическая модель, собранная из деталей конструктора "ТЕХНОЛИДЕР-1".

Программа управления на языке ФОРТ:
\\ HAMMER1.AF
1 QUIET-MODE
DECIMAL
: INIT \\ Инициализация устройств
MOT-INIT
;
: GO-UP \\ Движение молота вверх (50% скорости)
50 MOT-SPEED
MOT-REV
;
: GO-DOWN \\ Движение молота вниз (100% скорости)
100 MOT-SPEED
MOT-FWD
;
: STOP \\ Остановка молота
MOT-STOP
;
: WAIT-SENS2-1 \\ Ожинание сигнала закрытия сенсора SW2
BEGIN
SW2 NEGATE NOT
UNTIL
;
: WAIT-SENS2-0 \\ Ожинание сигнала закрытия сенсора SW2
BEGIN
SW2
UNTIL
;
: WAIT-BUTTON4-1 \\ Ожидание нажатия кнопки SW4
BEGIN
SW4
UNTIL
;
: HAMMER \\ Программа 'Молот'
\\ -----------------------------------------------
\\ Команды:
\\ Кнопка SW4 - Запуск молота
\\ Кнопка SW5 - Остановка молота
\\ -----------------------------------------------
INIT \\ Инициализируем движок мотора
BEGIN \\ Бесконечный цикл:
WAIT-BUTTON4-1 \\ Ждём команду запуска (SW4)
BEGIN \\ Цикл:
GO-UP \\ Движение молота вверх, пока сенсор SW2:
WAIT-SENS2-1 \\ - не достигнут
WAIT-SENS2-0 \\ - и не пройден
GO-DOWN \\ Движение молота вниз 1/5 сек
200 MS
SW5
UNTIL \\ Продолжаем, пока нет команды остановки (SW5)
STOP \\ Останавливаем молот
AGAIN
;
0 QUIET-MODE

Видео "Молот" (конструктор "ТЕХНОЛИДЕР-1") канала Ingars