Программируемое таймерное устройство для подачи звонков

Для подачи звонков в учебных заведениях можно использовать компьютеры с операционными системами на основе DOS (не выще Windows 98). К выходному порту 378h подключается схема, показанная на Рис.21. При подаче в порт битa D0=1, открывается транзистор и срабатывает реле, замыкаются контакты и включается звонок. Через время 2 сек. Бит D0=0 и реле выключается, размыкая цепь звонка.

Рис.20

5 cls

10 a11$=”08:00:00”: a12$=”09:30:00” 1- пара расписание звонков

20 a21$=”09:40:00”: a22$=”11:10:00” 2- пара

30 a31$=”11:40:00”: a32$=”13:10:00” 3- пара

40 a41$=”13:20:00”: a42$=”14:50:00” 4- пара

50 a51$=”15:00:00”: a52$=”16:30:00” 5- пара

60 a$=time$

70 if a$=a11$ or a$=a12$ or a$=a21$ or a$=a22$ or a$=a31$ or a$=a32$ or a$=a41$ or a$=a42$ or a$=a51$ or a$=a52$ then out &h378, 1 and print a$

80 sleep 2 длительность звучания звонка

90 out &h378, 0

100 goto 10