Программа на BASIC

Программа на BASIC

Программа на BASIC очень проста. После нахождения адреса порта прин тера, программа управляет работой воздушного клапана через вывод 2.

5 REM Контроллер соленоида воздушного клапана

10 REM Джон Иовин

15 REM Найти адрес порта принтера

20 DEF SEG = 0

25 a = (PEEK(1032) + 256 * PEEK(1033))

30 REM Следующая строка включает воздушную мышцу

35OUT a ,1

40 REM Следующая строка выключает воздушную мышцу

45 OUT a , 0

При высоком уровне сигнала на выводе 2 DB 25 воздушный клапан открывается и подается воздух в воздушную мышцу. При низком уровне сигнала на выводе 2 нагнетание воздуха в воздушную мышцу прекращается, и клапан выпускает воздух из мышцы.

Данный текст является ознакомительным фрагментом.