LCALL    RDWIRE            ;
        MOV    DPL,A            ;
        LCALL    RDWIRE            ;
        MOV    DPH,A            ; DPTR IS SAVED DATA OF TEMPERATURE

        MOV    B,#10H            ; 
        MOV    A,DPH            ;
        MUL    AB            ;
        MOV    R0,A            ;
        MOV    B,#10H            ;
        MOV    A,DPL            ;
        DIV    AB            ;
        ADD    A,R0            ; EASY TO READ TEMPERATURE FROM ACC
        
        LCALL    INIT
        NOP                ; INTERRUPTE HERE CHECK TEMPERATURE
        AJMP    SCANTMP

;*****SUBSUBSUBSUBSUBSUBSUBSUBSUB**********************************************
;RESET DS18B20.

INIT:
        PUSH    0000H

        CLR    STLPW
        CLR    DQ

        MOV    R0,#0FFH    ; DELAY 512uS
        DJNZ    R0,$

        SETB    DQ
        SETB    STLPW
        MOV    R0,#18H        ; DELAY 50uS
        DJNZ    R0,$
        CLR    STLPW

        JB    DQ,$        ; WAIT FOR DQ LOW
        JNB    DQ,$        ; WAIT FOR DQ HIGHT
        SETB    STLPW

        MOV    R0,#0FFH    ; DELAY 512uS

上一页 1 2 34 5 下一页