DS18B20数字温度传感器的源代码

电子说

1.3w人已加入

描述

本文档的主要内容详细介绍的是DS18B20数字温度传感器的源代码。


       ; FLAG1: 标志位,为“1”时表示检测到DS18B20

; DQ: DS18B20的数据总线接脚

; TEMPER_NUM:保存读出的温度数据

; 本程序仅适合单个DS18B20和51单片机的连接,晶振为12MHZ左右

TEMPER_L EQU 36H

TEMPER_H EQU 35H

DQ BIT P1.7

; DS18B20初始化程序

;//*****************************************//

INIT_1820:

SETB DQ

NOP

CLR DQ

MOV R0,#06BH

TSR1:

DJNZ R0,TSR1 ; 延时

SETB DQ

MOV R0,#25H

TSR2:

JNB DQ,TSR3

DJNZ R0,TSR2

LJMP TSR4 ; 延时

TSR3:

SETB FLAG1 ; 置标志位,表示DS1820存在

LJMP TSR5

TSR4:

CLR FLAG1 ; 清标志位,表示DS1820不存在

LJMP TSR7

TSR5:

MOV R0,#06BH

TSR6:

DJNZ R0,TSR6 ; 延时

TSR7:

SETB DQ

RET

;//*****************************************//

; 重新写DS18B20暂存存储器设定值

;//*****************************************//

RE_CONFIG:

JB FLAG1,RE_CONFIG1 ; 若DS18B20存在,转RE_CONFIG1

RET

RE_CONFIG1:

MOV A,#0CCH ; 发SKIP ROM命令

LCALL WRITE_1820

MOV A,#4EH ; 发写暂存存储器命令

LCALL WRITE_1820

MOV A,#00H ; TH(报警上限)中写入00H

LCALL WRITE_1820

MOV A,#00H ; TL(报警下限)中写入00H

LCALL WRITE_1820

MOV A,#1FH ; 选择9位温度分辨率

LCALL WRITE_1820

RET

;//*****************************************//

; 读出转换后的温度值

;//*****************************************//

GET_TEMPER:

SETB DQ ; 定时入口

LCALL INIT_1820

JB FLAG1,TSS2

RET ; 若DS18B20不存在则返回

TSS2:

MOV A,#0CCH ; 跳过ROM匹配

LCALL WRITE_1820

MOV A,#44H ; 发出温度转换命令

LCALL WRITE_1820

LCALL INIT_1820

MOV A,#0CCH ; 跳过ROM匹配

LCALL WRITE_1820

MOV A,#0BEH ; 发出读温度命令

LCALL WRITE_1820

LCALL READ_1820

MOV TEMPER_NUM,A ; 将读出的温度数据保存

RET

;//*****************************************//

; 读DS18B20的程序,从DS18B20中读出一个字节的数据

;//*****************************************//

READ_1820:

MOV R2,#8

RE1:

CLR C

SETB DQ

NOP

NOP

CLR DQ

NOP

NOP

NOP

SETB DQ

MOV R3,#7

DJNZ R3,$

MOV C,DQ

MOV R3,#23

DJNZ R3,$

RRC A

DJNZ R2,RE1

RET

;//*****************************************//

; 写DS18B20的程序

;//*****************************************//

WRITE_1820:

MOV R2,#8

CLR C

WR1:

CLR DQ

MOV R3,#6

DJNZ R3,$

RRC A

MOV DQ,C

MOV R3,#23

DJNZ R3,$

SETB DQ

NOP

DJNZ R2,WR1

SETB DQ

RET

;//*****************************************//

; 读DS18B20的程序,从DS18B20中读出两个字节的温度数据

;//*****************************************//

READ_18200:

MOV R4,#2 ; 将温度高位和低位从DS18B20中读出

MOV R1,#36H ; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H)

RE00:

MOV R2,#8

RE01:

CLR C

SETB DQ

NOP

NOP

CLR DQ

NOP

NOP

NOP

SETB DQ

MOV R3,#7

DJNZ R3,$

MOV C,DQ

MOV R3,#23

DJNZ R3,$

RRC A

DJNZ R2,RE01

MOV @R1,A

DEC R1

DJNZ R4,RE00

RET

;//*****************************************//

; 将从DS18B20中读出的温度数据进行转换

;//*****************************************//

TEMPER_COV:

MOV A,#0F0H

ANL A,TEMPER_L ; 舍去温度低位中小数点后的四位温度数值

SWAP A

MOV TEMPER_NUM,A

MOV A,TEMPER_L

JNB ACC.3,TEMPER_COV1 ; 四舍五入去温度值

INC TEMPER_NUM

TEMPER_COV1:

MOV A,TEMPER_H

ANL A,#07H

SWAP A

ORL A,TEMPER_NUM

MOV TEMPER_NUM,A ; 保存变换后的温度数据

LCALL BIN_BCD

RET

;//*****************************************//

; 将16进制的温度数据转换成压缩BCD码

;//*****************************************//

BIN_BCD:

MOV DPTR,#TEMP_TAB

MOV A,TEMPER_NUM

MOVC A,@A+DPTR

MOV TEMPER_NUM,A

RET

TEMP_TAB:

DB 00H,01H,02H,03H,04H,05H,06H,07H

DB 08H,09H,10H,11H,12H,13H,14H,15H

DB 16H,17H,18H,19H,20H,21H,22H,23H

DB 24H,25H,26H,27H,28H,29H,30H,31H

DB 32H,33H,34H,35H,36H,37H,38H,39H

DB 40H,41H,42H,43H,44H,45H,46H,47H

DB 48H,49H,50H,51H,52H,53H,54H,55H

DB 56H,57H,58H,59H,60H,61H,62H,63H

DB 64H,65H,66H,67H,68H,69H,70H

;//*****************************************//

打开APP阅读更多精彩内容
声明:本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人,不代表电子发烧友网立场。文章及其配图仅供工程师学习之用,如有内容侵权或者其他违规问题,请联系本站处理。 举报投诉

全部0条评论

快来发表一下你的评论吧 !

×
20
完善资料,
赚取积分