;從數據線上讀一個字節程序
RE0:    MOV R5,#8;設置一個字節為8 BIT(位)
RE1:    CLR C
        SETB DS1820_BIT
        NOP
        NOP
        CLR DS1820_BIT ;讀前總線保持為低
        NOP
        NOP
        NOP
        SETB DS1820_BIT ;開始讀總線釋放
        MOV R4,#4
RE2:    DJNZ R4,$ ;持續8us
        MOV C,DS1820_BIT ;從ds1820 總線讀得一個bit
        RRC A ;把讀得的位值環移給 A
        MOV R4,#23
RE3:    DJNZ R4,$ ;持續60us
        DJNZ R5,RE1 ;讀下一個bit
        SETB DS1820_BIT ;重新釋放ds1820 總線
        MOV @R0,A
        DEC R0
        DJNZ R7,RE0
        RET