SN5        EQU    00H        ;
        SN6        EQU    00H        ;
        CRC        EQU    1EH        ;
;******************************************************************
        ORG    0000H
        LJMP    MAIN


MAIN:

;        LCALL    INIT
;
;        MOV    A,#READROM
;        LCALL    WRWIRE
;        MOV    R0,#20H
;        MOV    R1,#08H
;SCANROM:    LCALL    RDWIRE
;        MOV    @R0,A
;        INC    R0
;        DJNZ    R1,SCANROM
;        NOP            ; INTERRUPTE HERE CHECK SAMPLE DS18B20 64 BITS    ROM.
;
; RAM 27H -> CRC.
; RAM 21H-26H -> 6 BYTES SARIAL NUMBER.
; RAM 20H -> FAMILY NUMBER.(DS18B20 = 28H)



; THE FOLLOWING PROGRAMME IS ONLY USED FOR ANY ONE DS18B20, BUT ONLY ONE.
; YOU CAN MODIFY IT FOR MANY DS18B20, REFER TO DATASHEET OF DS18B20.

SCANTMP:    LCALL    INIT            ; START CONVERT, 0.625‘C/STEP
        MOV    A,#SKIPROM        ;
        LCALL    WRWIRE            ;
        MOV    A,#CONVERT        ;
        LCALL    WRWIRE            ;
        LCALL    T1S            ; WAIT FOR CONVERT COMPLET.

        LCALL    INIT            ; READ TEMPERATURE
        MOV    A,#SKIPROM        ;
        LCALL    WRWIRE            ;
        MOV    A,#READSCRATCHPAD
        LCALL    WRWIRE            ;

上一页 1 23 4 5 下一页