18b20温度计报警C语言,制作DS18B20数字温度计我还想具有报警功能

DS18B20引脚定义：

(1)DQ为数字信号输入/输出端；(需要加个上拉电阻加到电源上)

(2)GND为电源地；

(3)VDD为外接供电电源输入端(在寄生电源接线方式时接地)。

本人做过它的课程设计。

以下是程序，你要是有DS18B20的资料最好，没有的话我可以传给你。

2个数码管显示。精确到1°C。程序没加报警功能，你可以在最后一段中，比较一下TEMPER_L和TEMPER_H中的数值  与你要报警的数值。自己试一下吧！！！！！！

ORG 0000H

;单片机内存分配申明!

TEMPER_L EQU 29H;用于保存读出温度的低8位

TEMPER_H EQU 28H;用于保存读出温度的高8位

FLAG1 EQU 38H;是否检测到DS18B20标志位

a_bit EQU 20H;数码管个位数存放内存位置

b_bit EQU 21H ;数码管十位数存放内存位置

DQ EQU P1.2

CHECK EQU P1.0

CHECK1 EQU P1.3

NEGTIVE EQU P1.4

MAIN:  LCALL GET_TEMPER;调用读温度子程序

;进行温度显示,用两位数码管来显示

;显示范围-55到99度,显示精度为1度

LCALL DISPLAY;调用数码管显示子程序

AJMP MAIN

; DS18B20复位初始化子程序

INIT_1820:

SETB DQ

NOP

CLR DQ

;主机发出延时637微秒的复位低脉冲

MOV R1,#3H

TSR1: MOV R0,#6BH

DJNZ R0, R1,TSR1

SETB DQ;然后拉高数据线

NOP

NOP

NOP

MOV R0,#25H

TSR2: JNB DQ,TSR3;等待DS18B20回应

DJNZ R0,TSR2

LJMP TSR4

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

CLR CHECK1;检查到DS18B20就点亮LED

LJMP TSR5

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

LJMP TSR7

TSR5: MOV R0,#117

TSR6: DJNZ R0,TSR6 ; 时序要求延时一段时间

TSR7: SETB DQ

RET

; 读出转换后的温度值

GET_TEMPER:

SETB DQ

BCD: LCALL INIT_1820;先复位DS18B20

JB FLAG1,TSS2

LJMP BCD ; 判断DS1820是否存在?若DS18B20不存在则返回

TSS2:; MOV R3,#23

; DJNZ R3,  CHECK ;DS18B20已经被检测到!!!!!!!!!!!!!!!!!!

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

LCALL WRITE_1820

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

LCALL WRITE_1820

LCALL DELAY;延时750微秒

LCALL INIT_1820;准备读温度前先复位

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

LCALL WRITE_1820

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

LCALL WRITE_1820

LCALL READ_1820; 将读出的温度数据保存

RET

;延时程序

DELAY: MOV R2,#4H

DELAYA: MOV R3,#0FFH

DELAYB: MOV R4,#0FFH

DELAYC: DJNZ R4,DELAYC

DJNZ R3,DELAYB

DJNZ R2,DELAYA

RET

;写DS18B20的子程序(有具体的时序要求)

WRITE_1820:

MOV R2,#8;一共8位数据

CLR C

SETB DQ

NOP

NOP

WR1: CLR DQ

MOV R3,#6

DJNZ R3, A

MOV DQ,C

MOV R3,#23

DJNZ R3, DQ

NOP

DJNZ R2,WR1

SETB DQ

RET

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

READ_1820:

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

MOV R1,#TEMPER_L ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)

RE00: MOV R2,#8;数据一共有8位

RE01: CLR C

SETB DQ

NOP

NOP

CLR DQ

NOP

NOP

NOP

SETB DQ

MOV R3,#8 ;16us

RE10:  DJNZ R3,RE10

MOV C,DQ

MOV R3,#23 ;70us

RE20:  DJNZ R3,RE20

RRC A

DJNZ R2,RE01

MOV ,A

DEC R1

DJNZ R4,RE00

RET

;显示子程序

;根据TEMPER_H高5位是1来判断温度是否为负，若为负，则取反再+1

DISPLAY:

MOV A,TEMPER_H

JNB ACC.1,POSI

CLR NEGTIVE

CPL A

MOV TEMPER_H,A

MOV A,TEMPER_L

CPL A

CLR C

INC A

MOV TEMPER_L,A

MOV A,TEMPER_H

ADDC A,#0H

MOV TEMPER_H,A

;TEMPER_H高4位为0，根据温度计算方法，TEMPER_H,TEMPER_L的数值除16就是实际温度

;右移4位即实际温度，把TEMPER_L高4位和TEMPER_H低4位合并再对换，后转换为10进制即得实际温度数据

POSI: MOV A,TEMPER_L

ANL A,#0F0H

MOV a_bit,A

MOV A,TEMPER_H

ADD A,a_bit

SWAP A

CLR C

DA A

MOV b_bit,A

ANL A,#0FH

MOV DPTR,#ZIXING

MOVC A,+DPTR

MOV P3,A

MOV A,b_bit

SWAP A

ANL A,#0FH

MOV DPTR,#ZIXING

MOVC A,+DPTR

MOV P2,A

RET

ZIXING:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H

END