下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、#include#define uchar unsigned char#define uint unsigned intsbit DQ=P14;/ds18b20与单片机连接口unsigned char code str=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x39;/共阴数码管字码表unsigned char code str1=0x0bf,0x86,0x0db,0x0cf,0x0e6,0x0ed,0x0fd,0x87,0x0ff,0x0ef,0x39;/个位带小数点字码表unsigned char code wei=0x0fe,
2、0x0fd,0x0fb,0x0f7;uchar data disdata5;uint tvalue;/温度值uchar tflag;/温度正负标志/*ds1820程序*/void delay_18B20(unsigned int i)/延时1微秒 while(i-);void ds1820rst()/*ds1820复位*/ unsigned char x=0;DQ = 1; /DQ复位delay_18B20(4); /延时DQ = 0; /DQ拉低delay_18B20(100); /精确延时大于480usDQ = 1; /拉高delay_18B20(40); uchar ds1820rd()
3、/*读数据*/ unsigned char i=0;unsigned char dat = 0;for (i=8;i0;i-) DQ = 0; /给脉冲信号 dat=1; DQ = 1; /给脉冲信号 if(DQ) dat|=0x80; delay_18B20(10); return(dat);void ds1820wr(uchar wdata)/*写数据*/unsigned char i=0; for (i=8; i0; i-) DQ = 0; DQ = wdata&0x01; delay_18B20(10); DQ = 1; wdata=1; read_temp()/*读取温度值并转换*/
4、uchar a,b;ds1820rst();ds1820wr(0xcc);/*跳过读序列号*/ds1820wr(0x44);/*启动温度转换*/ds1820rst();ds1820wr(0xcc);/*跳过读序列号*/ds1820wr(0xbe);/*读取温度*/a=ds1820rd();b=ds1820rd();tvalue=b;tvalue=8;tvalue=tvalue|a; if(tvalue0x0fff) tflag=0; else tvalue=tvalue+1;tflag=1; tvalue=tvalue*(0.625);/温度值扩大10倍,精确到1位小数return(tvalu
5、e);/*/ void ds1820disp()/温度值显示 uchar flagdat; uchar i; disdata0=tvalue/1000;/百位数 disdata1=tvalue%1000/100;/十位数 disdata2=tvalue%100/10;/个位数 disdata3=tvalue%10;/小数位 if(tflag=0) flagdat=0x20;/正温度不显示符号 else flagdat=0x2d;/负温度显示负号:- if(disdata0=0x30) disdata0=0x20;/如果百位为0,不显示 if(disdata1=0x30) disdata1=0x20;/如果百位为0,十位为0也不显示 for(i=0;i150;i+) P2=wei0; P0=strdisdata3; delay_18B20(20); P2=wei1; P0=str1disdata2; delay_18B20(20); P2=wei2; P0=strdisdata1; delay_18B20(20); P2=wei3; P0=strdisdata0; delay_
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二零二五年度山林林木采伐承包合同4篇
- 二零二五年度船舶光租及船员派遣服务合同4篇
- 2025年度水库鱼塘渔业养殖与旅游融合承包合同4篇
- 二零二五版酒店客房家具更换及装饰设计合同2篇
- 2025年度木材供应链金融解决方案合同4篇
- 2025年度特色小镇门面房买卖及经营管理合同4篇
- 2025年度大米加工企业供应链金融采购合同4篇
- 2025年度文化产业项目承包合同及文化产品购销印花税缴纳指引4篇
- 二零二五年度皮革加工厂与原材料供应商合作合同3篇
- 2025年度旅游度假区承包合同股东内部合作协议4篇
- 广东佛山生育保险待遇申请表
- 广西水功能区划报告-广西水利信息网
- 机关单位档案业务培训课件20170714
- 福克斯维修保养使用手册
- 人力资源部各岗位绩效考核表
- 原材料试验工作程序与质量管理制度
- 人教版八年级下册英语单词默写(可直接打印)
- 糖厂热力衡算(6000吨每天)
- 燃气有限公司危险作业安全管理规定
- 北京市刑事诉讼律师事务所函(担任诉讼代理人适用)格式文书(2020版)
- XX镇“我为群众办实事”满意度调查问卷
评论
0/150
提交评论