DS18B20温度计_51单片机

DS18B20温度计

点击数：7623 次录入时间：03-04 11:50:32 整理：http://www.55dianzi.com 51单片机

        LCALL DATA_
        INC CODE0
        DJNZ COUNT,W_
        DJNZ 39H,LP1_
        RET
LP1_:   INC X
         MOV COUNT,#08H
        AJMP LP_
;***************************16位字宽显示子程序**********************
DISP:    MOV 39H,#02H
         MOV CODE0,#00H
         MOV COUNT,#10H    ;根据字宽及象素的不同而改变 DISP中的COUNT根据字高及象素改变CODE0
LP:      MOV COM,X            ;设置页地址
        LCALL INST
         MOV COM,Y            ;设置列地址
        LCALL INST
W:       MOV A,CODE0
         MOV C A,@A+DPTR
         MOV DAT,A
        LCALL DATA_
        INC CODE0
        DJNZ COUNT,W
        DJNZ 39H,LP1
        RET
LP1:    INC X
         MOV COUNT,#10H
        AJMP LP
;***********************以下为字符显示子程序块*************************
SY:        SETB CS1          ;开机
        CLR  CS2
         MOV X,#0BAH
         MOV Y,#40H
         MOV      DPTR,#TAB2        ;
        CALL    DISP
         MOV X,#0BAH
         MOV Y,#50H
         MOV      DPTR,#TAB3        ;
        CALL    DISP
         MOV X,#0BAH
         MOV Y,#60H
         MOV      DPTR,#TAB4       ;
        CALL    DISP
         MOV X,#0BAH
         MOV Y,#70H
         MOV      DPTR,#TAB5        ;
        CALL    DISP
        CLR CS1
        SETB CS2
         MOV X,#0BAH
         MOV Y,#40H
         MOV      DPTR,#TAB6        ;
        CALL    DISP
         MOV X,#0BAH
         MOV Y,#70H
         MOV      DPTR,#TAB7        ;
        CALL    DISP
        RET
INST:   LCALL BUSY     ;写指令
        SETB E
        CLR D_I
        CLR R_W
         MOV DB0_DB7,COM
        CLR E
        RET
DATA_:  LCALL BUSY     ;写数据
        SETB E
        SETB D_I
        CLR R_W
         MOV DB0_DB7,DAT
        CLR E
        RET
BUSY:   CLR D_I        ;测忙
        SETB R_W
BUSY1:   MOV DB0_DB7,#0FFH
        SETB E
         MOV A,DB0_DB7

上一页 [1] [2] [3] [4] [5] [6] [7] [8] 下一页