谁可以帮我用at89c51编一段温度检测报警器的C语言程序,真的需要你的帮忙

谁可以帮我用at89c51编一段温度检测报警器的C语言程序,真的需要你的帮忙,第1张

#include<reg52h>

#include<intrinsh>

#define _Nop() _nop_() /定义空指令/

sbit D18B20=P3^7;

sbit k1=P1^5;

unsigned char flag;

unsigned char u,d[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};

void TempDelay (unsigned char us)

{

while(us--);

}

void Init18b20 (void)

{

D18B20=1;

_nop_();

D18B20=0;

TempDelay(80); //delay 530 uS//80

_nop_();

D18B20=1;

TempDelay(14); //delay 100 uS//14

_nop_();

_nop_();

_nop_();

if(D18B20==0)

flag = 1; //detect 1820 success!

else

flag = 0; //detect 1820 fail!

TempDelay(20); //20

_nop_();

_nop_();

D18B20 = 1;

}

/

Function:向18B20写入一个字节

parameter:

Return:

Modify:

/

void WriteByte (unsigned char wr) //单字节写入

{

unsigned char idata i;

for (i=0;i<8;i++)

{

D18B20 = 0;

_nop_();

D18B20=wr&0x01;

TempDelay(3); //delay 45 uS //5

_nop_();

_nop_();

D18B20=1;

wr >>= 1;

}

}

/

Function:读18B20的一个字节

parameter:

Return:

Modify:

/

unsigned char ReadByte (void) //读取单字节

{

unsigned char idata i;

for(i=0;i<8;i++)

{

D18B20 = 0;

u >>= 1;

D18B20 = 1;

if(D18B20==1)

u |= 0x80;

TempDelay (2);

_nop_();

}

return(u);

}

main()

{unsigned char a,b,c,j;

while(1)

{

Init18b20();

WriteByte(0xcc); //skip rom

WriteByte(0x44); //保存设定值

Init18b20();

WriteByte(0xcc); //skip rom

WriteByte(0xbe); //read Temperature//回调设定值

a=ReadByte();

b=ReadByte();

a=a>>4;

b=b<<4;

c=a+b;

if(c>30)

k1=0;

else

k1=1;

for(j=0;j<250;j++)

{

P0=d[c/10];

P2=0xe3;

TempDelay(100);

P0=d[c%10];

P2=0xe7;

TempDelay(100);

}

}

}

17行:JMP应该为LJMP,检查一下程序中是否漏掉了标号INT00

35行:程序中缺少标号GET_TEMPER

36行:程序中缺少标号DISP

182行:把上一行的DB移到这行开头,后面有一个空格。

273—275行:这几行指令没写完全。缺少 *** 作码

285:程序中少标号RE01

288:程序中少标号RE00

基于单片机的无线温湿度报警器的设计的C语言程序网上有很多,你百度一下,应该可以找到资源的,百度文库里面有不少,不过需要购买或者下载卷才能下载供你使用,现在,没有不劳而获的东西存在,所以你最好的去处是那些代理设计的网店,很多的,现在这方面需求旺盛,提供服务的电商也很多,只要谈好价钱,就可以得到服务了。多逛逛吧,网上搜一搜,或者找周边同学打听一下,找一家信誉和售后服务好的店铺。

发个电路的吧 我想好多人会帮你的忙。

#include <at89x51h>//用AT89C51时就用这个头文件

//#include <reg52h>//用华邦W78E58B时必须用这个头文件

#include <absacch>

#include <ctypeh>

#include <mathh>

#include <stdioh>

#include <stringh>

#include <DS18B20h>

#include "LCD1602h" ////液晶显示头文件

//sbit DQ = P3^4; //定义DQ引脚为P34

unsigned char t[2],pt; //用来存放温度值,测温程序就是通过这个数组与主函数通信的

unsigned char  TempBuffer1[9]={0x2b,0x31,0x32,0x32,0x2e,0x30,0x30,0x43,'\0'};

//显示实时温度,上电时显示+12500C

unsigned char  TempBuffer0[17]={0x54,0x48,0x3a,0x2b,0x31,0x32,0x35,0x20,

0x54,0x4c,0x3a,0x2b,0x31,0x32,0x34,0x43,'\0'};

//显示温度上下限,上电时显示TH:+125 TL:+124C

unsigned char code dotcode[4]={0,25,50,75};

/因显示分辨率为025,但小数运算比较麻烦,故采用查表的方法

再将表值分离出十位和个位后送到十分位和百分位/

void covert0( unsigned char TH, unsigned char TL) //将温度上下限转换为LCD显示的数据

{

if(TH>0x7F)                    //判断正负,如果为负温,将其转化为其绝对值

{

TempBuffer0[3]=0x2d;      //0x2d为"-"的ASCII码

TH=~TH;

TH++;

}

else TempBuffer0[3]=0x2b; //0x2B为"+"的ASCII码

if(TL>0x7f)

{

TempBuffer0[11]=0x2d;      //0x2d为"-"的ASCII码

TL=~TL+1;

}

else TempBuffer0[11]=0x2b; //0x2B为"+"的ASCII码

TempBuffer0[4]=TH/100+0x30;              //分离出TH的百十个位

if( TempBuffer0[4]==0x30) TempBuffer0[4]=0xfe; //百位数消隐

TempBuffer0[5]=(TH%100)/10+0x30; //分离出十位

TempBuffer0[6]=(TH%100)%10+0x30;   //分离出个位

TempBuffer0[12]=TL/100+0x30;              //分离出TL的百十个位

if( TempBuffer0[12]==0x30) TempBuffer0[12]=0xfe; //百位数消隐

TempBuffer0[13]=(TL%100)/10+0x30; //分离出十位

TempBuffer0[14]=(TL%100)%10+0x30;   //分离出个位

}

void covert1(void) //将温度转换为LCD显示的数据

{

unsigned char x=0x00,y=0x00;

t[0]=pt;

pt++;

t[1]=pt;

if(t[1]>0x07)                    //判断正负温度

{

TempBuffer1[0]=0x2d;      //0x2d为"-"的ASCII码

t[1]=~t[1];  /下面几句把负数的补码/

t[0]=~t[0];   / 换算成绝对值/

x=t[0]+1;  //

t[0]=x;  //

if(x>255)                //

t[1]++;  //

}

else TempBuffer1[0]=0x2b; //0xfe为变"+"的ASCII码

t[1]<<=4; //将高字节左移4位

t[1]=t[1]&0x70; //取出高字节的3个有效数字位

x=t[0]; //将t[0]暂存到X,因为取小数部分还要用到它

x>>=4; //右移4位

x=x&0x0f; //和前面两句就是取出t[0]的高四位

t[1]=t[1]|x; //将高低字节的有效值的整数部分拼成一个字节

TempBuffer1[1]=t[1]/100+0x30;              //+0x30 为变 0~9 ASCII码

if( TempBuffer1[1]==0x30) TempBuffer1[1]=0xfe; //百位数消隐

TempBuffer1[2]=(t[1]%100)/10+0x30; //分离出十位

TempBuffer1[3]=(t[1]%100)%10+0x30;   //分离出个位

t[0]=t[0]&0x0c; //取有效的两位小数

t[0]>>=2; //左移两位,以便查表

x=t[0];

y=dotcode[x]; //查表换算成实际的小数

TempBuffer1[5]=y/10+0x30; //分离出十分位

TempBuffer1[6]=y%10+0x30; //分离出百分位

}

void delay(unsigned char i)

{

while(i--);

}

main()

{

unsigned char TH=110,TL=-20;     //下一步扩展时可能通过这两个变量,调节上下限

 //测温函数返回这个数组的头地址

while(1)

{

pt=ReadTemperature(TH,TL,0x3f);  //上限温度-22,下限-24,分辨率10位,也就是025C

 //读取温度,温度值存放在一个两个字节的数组中,

delay(100);

covert1();

covert0(TH,TL);

LCD_Initial(); //第一个参数列号,第二个为行号,为0表示第一行

//为1表示第二行,第三个参数为显示数据的首地址

LCD_Print(0,0,TempBuffer0);

LCD_Print(0,1,TempBuffer1); 

}

}

//一下是液晶代码模块

////////////////////////////////////////////////////////////////////////

#include <at89x51h>//用AT89C51时就用这个头文件

//#include <reg52h>//用华邦W78E58B时必须用这个头文件

#include <intrinsh>

//注意那个LCD_Wait()函数,它是判"忙"标志的,在实际硬件要把注掉的那种打开

//Port Definitions

sbit LcdRs = P2^0;

sbit LcdRw = P2^1;

sbit LcdEn   = P2^2;

sfr  DBPort  = 0x80; //P0=0x80,P1=0x90,P2=0xA0,P3=0xB0数据端口

//内部等待函数

unsigned char LCD_Wait(void)

{

LcdRs=0;

LcdRw=1; _nop_();

LcdEn=1; _nop_();

//while(DBPort&0x80);//在用Proteus仿真时,注意用屏蔽此语句,在调用GotoXY()时,会进入死循环,

 //可能在写该控制字时,该模块没有返回写入完备命令,即DBPort&0x80==0x80

 //实际硬件时打开此语句

LcdEn=0;

return DBPort;

}

//向LCD写入命令或数据

#define LCD_COMMAND 0      // Command

#define LCD_DATA 1      // Data

#define LCD_CLEAR_SCREEN 0x01      // 清屏

#define LCD_HOMING   0x02      // 光标返回原点

void LCD_Write(bit style, unsigned char input)

{

LcdEn=0;

LcdRs=style;

LcdRw=0; _nop_();

DBPort=input; _nop_();//注意顺序

LcdEn=1; _nop_();//注意顺序

LcdEn=0; _nop_();

LCD_Wait();

}

//设置显示模式

#define LCD_SHOW 0x04    //显示开

#define LCD_HIDE 0x00    //显示关

#define LCD_CURSOR 0x02  //显示光标

#define LCD_NO_CURSOR 0x00    //无光标

#define LCD_FLASH 0x01    //光标闪动

#define LCD_NO_FLASH 0x00    //光标不闪动

void LCD_SetDisplay(unsigned char DisplayMode)

{

LCD_Write(LCD_COMMAND, 0x08|DisplayMode);

}

//设置输入模式

#define LCD_AC_UP 0x02

#define LCD_AC_DOWN 0x00      // default

#define LCD_MOVE 0x01      // 画面可平移

#define LCD_NO_MOVE 0x00      //default

void LCD_SetInput(unsigned char InputMode)

{

LCD_Write(LCD_COMMAND, 0x04|InputMode);

}

//初始化LCD

void LCD_Initial()

{

LcdEn=0;

LCD_Write(LCD_COMMAND,0x38);           //8位数据端口,2行显示,57点阵

LCD_Write(LCD_COMMAND,0x38);

LCD_SetDisplay(LCD_SHOW|LCD_NO_CURSOR);    //开启显示, 无光标

LCD_Write(LCD_COMMAND,LCD_CLEAR_SCREEN);   //清屏

LCD_SetInput(LCD_AC_UP|LCD_NO_MOVE);       //AC递增, 画面不动

}

//

void GotoXY(unsigned char x, unsigned char y)

{

if(y==0)

LCD_Write(LCD_COMMAND,0x80|x);

if(y==1)

LCD_Write(LCD_COMMAND,0x80|(x-0x40));

}

void Print(unsigned char str)

{

while(str!='\0')

{

LCD_Write(LCD_DATA,str);

str++;

}

}

void LCD_Print(unsigned char x, unsigned char y, unsigned char str)

{

GotoXY(x,y);

Print(str);

}

本设计的温度测量及加热控制系统以 AT89S52 单片机为核心部件,外加温度采集电

路、键盘及显示电路、加热控制电路和越限报警等电路。采用单总线型数字式的温度传

感器 DS18B20,及行列式键盘和动态显示的方式,以容易控制的固态继电器作加热控制

的开关器件。本作品既可以对当前温度进行实时显示又可以对温度进行控制,以使达到

用户需要的温度,并使其恒定在这一温度。人性化的行列式键盘设计使设置温度简单快

速,两位整数一位小数的显示方式具有更高的显示精度。建立在模糊控制理论上的控制

算法,使控制精度完全能满足一般社会生产的要求。通过对系统软件和硬件设计的合理

规划,发挥单片机自身集成众多系统级功能单元的优势,在不减少功能的前提下有效降

低了硬件成本,系统 *** 控简便。

实验证明该温控系统能达到 02℃的静态误差,045℃的控制精度,以及只有 083%

的超调量,因而本设计具有很高的可靠性和稳定性。

关键 词: 单片机 恒温控制 模糊控制

1

引 言

温度是工业生产中主要的被控参数之一,与之相关的各种温度控制系统广泛应用于

冶金、化工、机械、食品等领域。温度控制是工业生产过程中经常遇到的过程控制,有

些工艺过程对其温度的控制效果直接影响着产品的质量,因而设计一种较为理想的温度

控制系统是非常有价值的。

硬件 系统的设计

1、电路总体原理框图

温度测量及加热系统控制的总体结构如图 1 所示。系统主要包括现场温度采集、实

时温度显示、加热控制参数设置、加热电路控制输出、与报警装置和系统核心 AT89S52

单片机作为微处理器。

图 1:系统总体原理框图

温度采集电路以数字量形式将现场温度传至单片机。单片机结合现场温度与用户设

定的目标温度,按照已经编程固化的模糊控制算法计算出实时控制量。以此控制量控制

固态继电器开通和关断,决定加热电路的工作状态,使水温逐步稳定于用户设定的目标

值。在水温到达设定的目标温度后,由于自然冷却而使其温度下降时,单片机通过采样

回的温度与设置的目标温度比较,作出相应的控制,开启加热器。当用户需要比实时温

度低的温度时,此电路可以利用风扇降温。系统运行过程中的各种状态参量均可由数码

管实时显示。

2、温度采集电路的设计

温度采集电路模块如图 2 示。DS18B20 内部结构主要由四部分组成:64 位光刻 ROM、

温度传感器、非挥发的温度报警触发器 TH 和 TL、配置寄存器。其中 DQ 为数字信号输

入/输出端;GND 为电源地;VDD 为外接供电电源输入端。

2

图 2:温度采集电路

DS18B20 中的温度传感器可完成对温度的测量,以 12 位转化为例:用 16 位符号扩展

的二进制补码读数形式提供,以 00625℃/LSB 形式表达,其中 S 为符号位。

这是 12 位转化后得到的 12 位数据,存储在 18B20 的两个 8 比特的 RAM 中,二进

制中的前面 5 位是符号位,如果测得的温度大于 0,这 5 位为 0,只要将测到的数值乘

于 00625 即可得到实际温度;如果温度小于 0,这 5 位为 1,测到的数值需要取反加 1

再乘于 00625 即可得到实际温度。

3、键盘和显示的设计

键盘采用行列式和外部中断相结合的方法,图 3 中各按键的功能定义如下表 1。其

中设置键与单片机的 INT 0 脚相连,S 0 −−S 9 、YES、NO 用四行三列接单片机 P0 口,REST

键为硬件复位键,与 R、C 构成复位电路。模块电路如下图 3:

表 1:按键功能

按键 键名 功能

REST 复位键 使系统复位

RET 设置键 使系统产生中断,进入设置状态

S 0 −−S 9 数字键 设置用户需要的温度

YES 确认键 用户设定目标温度后进行确认

NO 清除键 用户设定温度错误或误按了 YES 键后使用

3

图 3 键盘接口电路

显示采用 3 位共阳 LED 动态显示方式,显示内容有温度值的十位、个位及小数点后

一位。用 P2 口作为段控码输出,并用 74HC244 作驱动。P10—P12 作为位控码输出,

用 PNP 型三极管做驱动。模块电路如下图 4:

4、加热控制电路的设计

图 4 显示接口电路

用于在闭环控制系统中对被控对象实施控制,被控对象为电热杯,采用对加在电热

杯两端的电压进行通断的方法进行控制,以实现对水加热功率的调整,从而达到对水温

控制的目的。对电炉丝通断的控制采用 SSR-40DA 固态继电器。它的使用非常简单,只

要在控制端 TTL 电平,即可实现对继电器的开关,使用时完全可以用 NPN 型三极管接

成电压跟随器的形式驱动。当单片机的 P13 为高点平时,三极管驱动固态继电器工作

接通加热器工作,当单片机的 P13 为低电平时固态继电器关断,加热器不工作。控制

电路图如下图 5:

4

图 5 加热控制电路

5、报警及指示灯电路的设计

当用户设定的目标温度达到时需用声音的形式提醒用户,此时蜂鸣器为三声断续的

滴答滴答的叫声。在本系统中我们为用户设计了越限报警,当温度低于用户设置的目标

温度 10 度或高于 10 度时蜂鸣器为连续不断的滴答滴答叫声。当单片机 P17 输出高电

平时,三极管导通,蜂鸣器工作发出报警声。P17 为低电平时三极管关断,蜂鸣器不

工作。

D1 为电热杯加热指示灯,P15 低电平有效;D0 为检测到 DS18B20 的指示,高电平

有效;D10 为降温指示灯,低电平有效。报警及指示灯电路如下图 6 示:

图 6 报警及指示灯电路

5

软 件系统的设计

系统的软件由三大模块组成:主程序模块、功能实现模块和运算控制模块。

1、主程序模块

主程序主要完成加热控制系统各部件的初始化和实现各功能子程序的调用,以及实

际测量中各个功能模块的协调在无外部中断申请时,单片机通过循环对外部温度进行实

时显示。把设置键作为外部中断 0,以便能对数字按键进行相应处理。主程序流程图如

下图 7:

6

图 7 主程序流程图

7

2、功能实现模块

以用来执行对固态继电器及电热杯的控制。功能实现模块主要由中断处理子程序、

温度比较处理子程序、键盘处理子程序、显示子程序、报警子程序等部分组成。键盘显

示及中断程序流程图如下图 8:

3、运算控制模块

图 8 键盘、显示、中断 子程序流程图

该模块由标度转换、模糊控制算法,及其中用到的乘法子程序。

31 标度转换

16

式中 A 为二进制的温度值, A0 为 DS18B20 的数字信号线送回来的温度数据。

8

单片机在处理标度转换时是通过把 DS18B20 的信号线送回的 16 位数据右移 4 位得

到二进制的温度值。其小数部分通过查小数表的形式获取。程序流程图如下图 9:

开始

将28H低4位与29H高4位组合成

一个字节

将合成的字节(整数部分)送29H

单元

将29H单元低4位送A

给DPTR赋常数表格2首地址

将查到的数值(即小数部分)送

30H单元

结束

32 模糊控制算法子程序

图 9 标度转换子程序流程图

该系统为一温度控制系统,由于无法确切确定电炉的物理模型,因而无法建立其数

学模型和传递函数。加热器为一惯性系统,我们采用模糊控制的方法,通过多次温度测

量模糊计算当用户设定目标温度时需提前关断加热器的温度,利用加热器自身的热惯性

使温度上升到其设定温度。每隔 5 摄氏度我们进行一次温度测量,并当达到其温度时关

断加热器记录下因加热器的热惯性而上升的温度值。从而可以建立热惯性的温度差值

表,在程序中利用查表法,查出相应设定温度对应的关断温度。通过实验数据我们可以

看出,当水温从 0℃加热到 50℃这段温度区域,其温度惯性曲线可近似成线性的直线,

水温从 50℃加热到 100℃这段温度惯性曲线可近似成另一条线性的直线段。通过对设置

的目标温度与温控系统监测温度进行差值处理就可近似的求出单片机的提前关断温度。

程序流程图如图 10:

9

4.源程序见附录[2]

图 10 模糊控制算法子程序流程图

设计 总结

我们的温度控制系统是基于 AT89S52 单片机的设计方案,她能实时显示当前温度,

并能根据用户的要求作出相应的控制。此系统为闭环系统,工作稳定稳定性高,控制精

度高,利用模糊控制算法使超调量大大降低。软件采用模块化结构,提高了通用性。本设

计的目的不仅仅是温度控制本身,主要提供了单片机外围电路及软件包括控制算法设计

的思想,应该说,这种思想比控制系统本身更为重要。

1、设计所达到的性能指标

11 温控系统的标度误差

我们将标准温度计和温控系统探头放人同一容器中,选定若干不同的温度点,记

录下标准温度计显示的温度和温控系统显示的温度进行比较。测量数据如下表 2 所示:

表 2 标准温度计测量的温度和温控系统显示的温度

标准温度计和温控系统显示的温度(℃)

标准温度计 169 477 578 630 728 851 909

温控系统 165 480 583 629 730 855 905

差值比较 -04 03 05 01 02 04 -04

标度误差 15%

10

12 温控系统的静态误差

通过测量在不同的温度点同标准温度的温度差来确定温控系统的静态误差。其测量

数据如下表 3:

表 3 标准温度和温控系统显示的温度

标准温度和温控系统显示的温度(℃)

标准温度 260 370 460 600 700 830

系统显示值 257 364 461 596 700 833

差值 -03 -06 -01 -04 0 03

静态误差 018℃

13 温控系统的控制精度

通过设定不同的温度值,使加热器加热,待温度稳定时记录各温度点的温度计数据

和温控系统的显示值。其记录数据如下表 4:

温度计读数和温控系统显示的温度(℃)

设定温度

值 200 280 350 450 550 750 870 910

系统显示

值 205 277 344 451 541 749 861 912

差值 05 -03 -06 01 -09 -01 -09 02

控制精度 045℃

超调量 083%

2、结果分析论述

我们的系统完全满足设计要求,静态误差方面可以达到 018℃的误差,在读数正确

方面与标准温度计的读数误差为 15%,对一般的工业生产完全可以采用我们的设计。

该系统具有较小的超调值,超调值大约为 083%左右。虽然超调为不利结果,但另

一方面却减小了系统的调节时间。从其数据表可以看出该系统为稳定系统。

3、设计方案评价

31 优点

在硬件方面:本设计方案采用了单总线型数字式的温度传感器,提高了温度的采集

精度,节约了单片机的口线资源。方案还使用仅一跟口线就可控制的美国生产的固态继

电器 SSR—40DA 作加热控制器件,使设计简单化,且可靠性强。在控制精度方面,本设

计在不能确定执行机构的数学模型的情况下,大胆的假设小心的求证,利用模糊控制的

算法来提高控制精度。

在软件方面:我们采用模块化编程,思路清晰,使程序简洁、可移植性强。

32 缺点

本设计方案虽然采用了当前市场最先进的电子器件,使电路设计简单,但设计方案

造价高。本系统虽然具有较小的超调量,但加大了调节时间。如果需要更高的控制精度,

则我们的模糊控制将不适应,需修改程序。

11

33 方案的改进

在不改变加热器容量的情况下,为减小调节时间,可以实行在加热快达到设定温度

时开启风扇来减小热惯性对温度的影响的措施。在控制精度上可采用先进的数字 PID

控制算法,对加热时间进行控制,提高控制精度。

可以改进控制系统使能同 PC 联机通信,以利用 PC 的图形处理功能打印显示温度曲

线。AT89S52 串行口为 TTL 电平,PC 串行口为 RS232 电平,使用一片 MAX232 作为电

平转换驱动。

参考 文献

[1] 李广弟 单片机基础 北京:北京航空航天大学出版社,2001

[2] 王福瑞 单片微机测控系统设计大全 北京:北京航空航天大学出版社,1997

[3] 赵茂泰 智能仪器原理及应用(第 2 版) 北京:电子工业出版社,2004

[4] 赖寿涛 微型计算机控制技术 北京:机械工业出版社,2000

[5] 沙占友 模拟与数字万用表检测及应用技术 北京:电子工业出版社 1999

12

附 录

附录[1]使用说明书

按 键功能说明

数字键:按 SET 键后,按相应的数字键(0~9)可对温度进行设置,所设置的温

度将实时显示在 LED 显示器上;

SET 键:按 SET 键可对温度的十位、个位以及小数部分进行设置;

YES 键:设置好温度后按 YES 键,系统将据你所设置的温度(须大于当前实际

温度)对水进行加热;

NO 键:若误按了 SET 键,或对输入有误,可按 NO 键进行取消;

RST 键:对系统进行复位。

指示 灯及报警器说明

红 灯:加热状态标志;

绿 灯:温度传感器正常工作标志;

蓝 灯:保温状态标志;

报警器:功能①当水温达到预设值时报警提醒;

功能②当水温达到或超越上、下限时报警提示。

13

附录[2]设计总电路

14

附录[3]程序清单

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

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

FLAG EQU 38H ;是否 检测到 DS 18B20 标志位

DAYU EQU 44H ;设温 >实温

XIYU EQU 45H ;设温 <实温

DEYU EQU 46H ;设温 =实温

GAOLE EQU 47H ;水温 高于最高温度

DILE EQU 48H ;水温 低于最低温度

A_bit EQU 79h ;数码 管个位数存放内存位置

B_bit EQU 7Ah ;数码 管十位数存放内存位置

C_BIT EQU 78H ;数码 管小数存放内存位置

ORG 0000H

AJMP START

ORG 0003H

AJMP PITO

ORG 0030H

START: CLR P17

CLR P13

CLR P15

SETB P16

MOV R4, #00H

MOV SP, #60H ;确立堆栈区

MOV PSW, #00H ;

MOV R0, #20H ;RAM 区首地址

MOV R7, #60H ;RAM 区单元个数

ML: MOV @R0, #00H

INC R0

DJNZ R7, ML

CLR IT0

MAIN:LCALL GET_TEMPER ;调用读温度子程序 进行温度显示,这里我们考

;虑用网站提供的两位数码管来显示温度

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

;因为 12 位转化时每一位的精度为 00625 度,

;我们不要求显示小数所以可以抛弃 29H 的低 4

;位将 28H 中的低 4 位移入 29H 中的高 4 位,这

;样获得一个新字节,这个字节就是实际测量获

;得的温度

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

JNB 00H, MAIN

CLR 00H

15

MOV A, 38H

CJNE A, #00H, SS

AJMP MAIN

SS: LCALL GET_TEMPER

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

LCALL BIJIAO

LCALL XIAOYU

LCALL JIXIAN

JNB DEYU ,LOOP

CLR P13 ;关加热器

SETB P16 ;关 蓝灯

SETB P07 ;关风扇

CLR DEYU

LCALL GET_TEMPER

LCALL DISPLAY

AJMP TT2

LOOP:JNB DAYU ,TT

CLR DAYU

SETB P13

SETB P16

SETB P07

CLR P17

LCALL GET_TEMPER

LCALL DISPLAY

AJMP TT2

TT:JNB XIYU, TT2

CLR XIYU

CLR P07

CLR P16

CLR P13

CLR P17

LCALL GET_TEMPER

LCALL DISPLAY

TT2:MOV A, 29H

CLR C

CJNE A, 50H, JX

MOV A , 30H

CLR C

CJNE A, 51H, JIA1

AJMP YS2

JIA1:JC JX

MOV A, 51H

MOV 52H, A

ADD A, #2

16

MOV 52H, A

CLR C

MOV A, 30H

CJNE A, 52H, JIA2

JIA2:JNC JX

YS2:SETB P17

CLR P16

MOV R5, #20H

YS:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS

CLR P17

SETB P16

MOV R5, #20H

YS1:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS1

YS3:SETB P17

CLR P16

MOV R5, #20H

YS0:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS0

CLR P17

SETB P16

MOV R5, #20H

YS01:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS01

YS4:SETB P17

CLR P16

MOV R5, #20H

YS02:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS02

CLR P17

SETB P16

MOV R5, #20H

YS03:LCALL GET_TEMPER

LCALL DISPLAY

DJNZ R5, YS03

JX: MOV A, 29H

CJNE A, 31H, JX00

JX01:SETB P17

17

CLR C

AJMP LAST

JX00:JC JX01

CLR P17

CJNE A,

JX02:SETB P17

CLR C

AJMP LAST

JX03:JNC JX02

32H,

JX03

CLR P17

LAST:LCALL GET_TEMPER

LCALL DISPLAY

AJMP SS

;常数表格区

TAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8 H,80H ;0-8

DB 90H,88H,83H,0C6H,0A1H,86H,8EH,0FFH ,0CH ;9,A,B,C,D,E,F,灭,p

TAB1:DB40H,79H,24H,30H,19H,12H,02H,78H,00H ,10H, ;0--9

TAB2:DB 0, 0, 1, 2, 3, 3, 4, 4, 5, 5, 6, 7, 8, 8, 9, 9, ;小数点

;1ms 延时程序

; 中断服务程序

; 完成按键识别,键值求取,按键实时显示 等功能;

;

PITO: PUSH ACC

PUSH PSW

SETB RS0

CLR RS1

SET B 00H

MAIN1: MOV R7 , #03H ;显示位数为 2 位

MOV R0, #7AH

MOV 78H, #00H

MOV 79H, #00H

MOV 7AH, #00H

KK: LCALL DIR

LCALL KEY1

LOOP1:CJNE A, #11, LOOP2

AJMP LAST0

LOOP2:CJNE A, #12, LOOP3

LJMP LAST3

LOOP3: CJNE A, #10, L4

MOV A, #00H

L4: MOV @R0, A

LCALL DIR

DEC R0

DJNZ R7, KK

18

SETB 01H

LAST0:JNB 01H, KK

LOOP4:LCALL KEY1

CJNE A, #12, LOOP5

AJMP LAST3

LOOP5:CJNE A, #11, LOOP4

LAST1:LCALL DIR

LCALL MUN

LCALL JD

LCALL BIJIAO

LAST3:POP PSW

POP ACC

RETI

;精度控制 子程序

JD: PUSH ACC

PUSH PSW

CLR C

MOV A, 38H

MOV 50H, A

MOV A, 39H

MOV 51H, A

CJNE A, 29H, L001

L001:JC LAST02 ;设温<实温,则跳出

MOV A, 29H

MOV 41H, A

MOV A, 38H

CJNE A, #25, L002

L003:CLR C ;0 <T<25

SUBB A, 41H

CJNE A, #3, L004

L005:MOV A, 30H

ADD A, #5 ;0<T<25, 差值小于 3 度

DA A

JNB ACC4, L0051

ANL A, #0FH

SETB C

L0051:MOV 39H, A

MOV A, 29H

ADDC A, #1

MOV 38H, A

AJMP LAST2

LAST02: AJMP LAST2

L004:JC L005

MOV A, 39H

19

SUBB A, #0

DA A

MOV 39H, A

JNC L0041

DEC 38H

L0041:MOV A, 38H

SUBB A, #2 ;0<T<25, 差值大 于 3 度

MOV 38H, A

AJMP LAST2

L002:JC L003

CJNE A, #50, L006

L007:CLR C ;25<T<5 0

SUBB A, 41H

CJNE A, #3, L008

L009:MOV A, 30H

ADD A, #1

DA A

JNB ACC4, L0091

ANL A, #0FH

SETB C

L0091:MOV 39H, A

MOV A, 29H

ADDC A, #1

MOV 38H, A

AJMP LAST2

L008:JC L009

MOV A, 39H

SUBB A, #0

MOV 39H, A

MOV A, 38H

SUBB A, #2

MOV 38H, A

AJMP LAST2

L006:JC L007

CJNE A, #65, L010

L011:CLR C

SUBB A, 41H

CJNE A, #3, L012

L013:MOV A, 30H

ADD A, #2

JNB ACC4, L00131

ANL A, #0FH

SETB C

L00131:MOV 39H, A

20

MOV A, 29H

ADDC A, #1

MOV 38H, A

AJMP LAST2

L012:JC L013

MOV A, 39H

SUBB A, #0

MOV 39H, A

MOV A, 38H

SUBB A, #2

MOV 38H, A

AJMP LAST2

L010:JC L011

CJNE A, #90, L016

L017:CLR C

SUBB A, 41H

CJNE A, #2, L014

L015:MOV A, 30H

ADD A, #0

JNB ACC4, L00151

ANL A, #0FH

SETB C

L00151:MOV 39H, A

MOV A, 29H

ADDC A, #1

MOV 38H, A

AJMP LAST2

L014:JC L015

CLR C

MOV A, 38H

SUBB A, #1

MOV 38H, A

AJMP LAST2

L016:JC L017

LAST2:POP PSW

POP ACC

RET

;键扫描

KEY1:LCALL KS1 ;键 扫描

JNZ LK1

LCALL DIR

AJMP KEY1

LK1:LCALL DIR

LCALL DIR

21

LCALL KS1

JNZ LK2

LCALL DIR

AJMP KEY1

LK2:MOV R2, #0FEH ;确定键值

MOV R4, #01H

MOV A, R2

LK4:MOV P0, A

NOP

MOV A, P0

JB ACC3, LONE

MOV A, #00H

AJMP LKP

LONE:JB ACC4 , LTWO

MOV A, #03H

AJMP LKP

LTWO:JB ACC5, LTHR

MOV A, #06H

AJMP LKP

LTHR:JB ACC6, NEXT5

MOV A, #09H

AJMP LKP

NEXT5:INC R4

MOV A, R2

JNB ACC2 ,KND

RL A

MOV R2, A

AJMP LK4

KND:AJMP KEY1

LKP: ADD A, R4

PUSH ACC

LK3:LCALL DIR

LCALL KS1

JNZ LK3

POP ACC

RET

KS1: PUSH PSW

MOV P0, #78H

NOP

MOV A, P0 ;判断有无键按下

CPL A

ANL A, #78H

POP PSW

22

RET

;求设置温度的二 进制代码,值保存在 38H 单元

MUN: PUSH PSW

MOV R0, #7AH ;求键值

MOV A, @R0

SWAP A

DEC R0

ADD A, @R0

MOV R1, A

ANL A, #0F0 H

SWAP A

MOV B, #10

MUL AB

MOV R2, A

MOV A, R1

ANL A, #0FH

ADD A, R2

MOV 38H, A

MOV R0, #78H

MOV 39H, @R0

POP PSW

RET

;比较实际温度和设置温度的大小 并设置相应的标志位

BIJIAO:MOV A, 29 H ;实际温度

摘自百度知道

以上就是关于谁可以帮我用at89c51编一段温度检测报警器的C语言程序,真的需要你的帮忙全部的内容,包括:谁可以帮我用at89c51编一段温度检测报警器的C语言程序,真的需要你的帮忙、求单片机编程大神帮忙修改下程序、基于单片机的无线温湿度报警器的设计的C语言程序该怎么写等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zz/9511011.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-04-29
下一篇2023-04-29

发表评论

登录后才能评论

评论列表(0条)

    保存