基于AT89C51,DS18B20和1602液晶屏的温度传感器_第1页
基于AT89C51,DS18B20和1602液晶屏的温度传感器_第2页
基于AT89C51,DS18B20和1602液晶屏的温度传感器_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、.基于AT89C51,DS18B20和1602液晶屏的温度传感器DS18B20与51单片机的连接非常简单,只须把DS18B20的数据线DQ与51单片机的一根并口线连接即可,51单片机通过这根并口就能实现对DS18B20的所有操作,这根并口线一般通过电阻接电源。DS18B20的电源可采用外部电源供电,也可采用内部寄生电源供电。当外部电源供电时,VDD接外部电源,GND接地地。当采用内部寄生电源供电时,VDD与GND一起接地。另外,也可用多片DS18B20连接组网形成多点测温系统,在多片连接时,DS18B20必须采用外部电源供电方式。C语言程序:/晶振为12MHz/测量的温度范围-55+99,温度

2、精确到小数点后一位 #include #define uchar unsigned char#define uint unsigned intsbit DQ =P10; /定义端口sbit RS=P17;sbit RW=P16;sbit EN=P15;union uchar c2; uint x;temp;uchar flag;/flag为温度值的正负号标志单元, 1表示为负值,0时表示为正值。 uint cc,cc2;/变量cc中保存读出的温度值 float cc1;uchar buff113=temperature:;uchar buff26=+00.0;/检查忙函数void fbusy(

3、)P2 = 0xff;RS = 0;RW = 1;EN = 1;EN = 0;while(P2 & 0x80)EN = 0;EN = 1;/写命令函数void wc51r(uchar j) fbusy();EN = 0;RS = 0;RW = 0;EN = 1;P2 = j;EN = 0;/写数据函数void wc51ddr(uchar j) fbusy();/读状态;EN = 0;RS = 1;RW = 0;EN = 1;P2 = j;EN = 0;void init()wc51r(0x01); /清屏wc51r(0x38); /使用8位数据,显示两行,使用5*7的字型wc51r(0x0c)

4、; /显示器开,光标开,字符不闪烁wc51r(0x06); /字符不动,光标自动右移一格void delay(uint useconds) /延时程序 for(;useconds0;useconds-);uchar ow_reset(void) /复位 uchar presence; DQ = 0; / DQ 低电平 delay(50); / 480ms DQ = 1; / DQ 高电平 delay(3); / 等待 presence = DQ; / presence 信号 delay(25); return(presence); / 0允许, 1禁止 uchar read_byte(void

5、) /从单总线上读取一个字节 uchar i; uchar value = 0; for (i=8;i0;i-) value=1; DQ = 0; DQ = 1; delay(1); if(DQ)value|=0x80; delay(6); return(value);void write_byte(uchar val) /向单总线上写一个字节 uchar i; for (i=8; i0; i-) / 一次写一字节 DQ = 0; DQ = val&0x01; delay(5); DQ = 1; val=val/2; delay(5);void Read_Temperature(void) /

6、读取温度 ow_reset(); write_byte(0xCC); / 跳过 ROM write_byte(0xBE); / 读 temp.c1=read_byte(); temp.c0=read_byte(); ow_reset(); write_byte(0xCC); write_byte(0x44); / 开始 return;void main() /主程序uchar k;delay(10); EA=0; flag=0; init();wc51r(0x80); /写入显示缓冲区起始地址为第1行第1列for (k=0;k0xf8) flag=1;cc=cc+1;else flag=0; cc1=cc*0.0625; /计算出温度值 cc2=cc1*100;/放大100倍,放在整型变量中便于取数字 buff21=cc2/1000+0x30;if ( buff21=0x30) buff21=0x20;/取出十位,转换成字符,如果十位是0不显示。 buff22=cc2/100-(cc2/1000)*10+0x30;/取出个位,转换成字符 buff24=cc2/10-(cc2/100)*10+0x30;/取出小数点后一位,转换成字符 if (f

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论