Средства разработки для PICMICRO - Средства разработки для PICMICRO

rrf i

cal Dlay4

call Dlay4 decfsz j goto GetDSLoop

; Добавить бит к содержимому счетчика

; Теперь ввести задержку в 8 циклов ; перед следующим запросом

return SendDS:

j = 8 SendDS_Loop:

; Послать команду DS1820

; Цикл посылки каждого бита

bcf PORTA, DSBit ; Переслать бит
btfsc i, 0 ; Переслать 1?

bsf PORTA, DSBit ; Да ..

rrf i

call Dlay4

Go to Top