goto Loop
; Завершить процедуру вывода времени на ; экран
; Подпрограммы для работы с DS1820
GetDS:
j = 8 GetDSLoop:
bcf PORTA, DSBit
bsf PORTA, DSBit пор
Чтение информации из DS1820
Для чтения значения выполнить цикл 8 раз
Переключить линию обмена с DS1820, чтобы посмотреть на его отклик
Команда введена для соответствия первоначальному коду чтения бита
bsf STATUS, С
btfss PORTA, DSBit ; Сигнал на линии еще в высоком состоянии?
bcf STATUS, С ; Нет, сохранить нулевое значение.