




已阅读5页,还剩1页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
DS18B20 MSP430 4 位数码管显示温度 /实验材料:MSP430F149 开发板,DS18B20 一个,杜邦线 15条,3 元普通 4位共阴极数码管一个 /由于本人没有排阻,没有采用灌电流方式给 4位共阴极数码管供电,MSP430 的 I/O口直接接 4位共阴极数 码管的 12个脚 /接线说明:DS18B20 数据口接 P17,电源接 3.3V直流;P40P47 接数码管 a、b、c、d、e、f、g、dp / P50P53接位 1、位 2、位 3,位 4,数码管接线图请百度 /Made By Zhong Sir From Wuhan University #include /延时函数 #define CPU_F (double)8000000) /外部高频晶振 8MHZ /#define CPU_F (double)32768) /外部低频晶振 32.768KHZ #define delay_us(x) _delay_cycles(long)(CPU_F*(double)x/1000000.0) #define delay_ms(x) _delay_cycles(long)(CPU_F*(double)x/1000.0) /自定义数据结构 #define uchar unsigned char #define uint unsigned int #define ulong unsigned long /DS18B20控制脚,单脚控制 #define DQ_IN P1DIR int temp; /定义的变量,显示数据处理 int A1,A2,A3; /* / 系统时钟初始化,外部 8M晶振 /* void Clock_Init() uchar i; BCSCTL1 /打开 XT2振荡器 BCSCTL2|=SELM1+SELS; /MCLK为 8MHZ,SMCLK 为 8MHZ do IFG1 /清楚振荡器错误标志 for(i=0;i480uS) if (i) return 0x00; else return 0x01; /* / DS18B20读一个字节函数 /* unsigned char ds1820_read_byte(void) unsigned char i; unsigned char value = 0; for (i = 8; i != 0; i-) value = 1; DQ_OUT; DQ_CLR; delay_us(4); /*延时 4uS DQ_SET; DQ_IN; delay_us(10); /*延时 10uS if (DQ_R) value|=0x80; delay_us(60); /*延时 60uS return(value); /* / 向 18B20写一个字节函数 /* /*DS18B20字节写入函数*/ void ds1820_write_byte(unsigned char value) unsigned char i; for (i = 8; i != 0; i-) DQ_OUT; DQ_CLR; delay_us(4); /延时 4uS if (value delay_us(80); /延时 80uS DQ_SET; /位结束 value = 1; /* / 发送温度转换命令 /* /*启动 ds1820转换*/ void ds1820_start(void) DS18B20_Reset(); ds1820_write_byte(0xCC); /勿略地址 ds1820_write_byte(0x44); /启动转换 /* / DS8B20读取温度信息 /* unsigned int ds1820_read_temp(void) unsigned int i; unsigned char buf9; DS18B20_Reset(); ds1820_write_byte(0xCC); /勿略地址 ds1820_write_byte(0xBE); /读取温度 for (i = 0; i 9; i+) bufi = ds1820_read_byte(); i = buf1; i = 8; i |= buf0; temp_value=i; temp_value=(uint)(temp_value*0.625); /不是乘以 0.0625的原因是为了把小数点后一位数据也转化为可以显示的数据 return i; /* / 温度数据处理函数 /* void data_do(int temp_d) int A2t; A1=temp_d/100; /分出百,十,和个位 A2t=temp_d%100; A2=A2t/10; A3=A2t%10; /* / 主程序 /* void main(void) const unsigned char seg=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f; const unsigned char zww=0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09; uchar j; WDT_Init(); /看门狗初始化 Clock_Init(); /时钟初始化 Port_Init(); /端口初始化,用于控制 IO口输入或输出 DS18B20_Reset(); /复位 D18B20 while(1) ds1820_start(); /启动一次转换 ds1820_read_temp(); /读取温度数值 data_do(temp_value); /处理数据,得到要显示的值 if(A1=zww0) A1=seg0; / 以下将 DS18B20反馈的数值换成数码管的字符编码以显示 else if(A1=zww1) A1=seg1; else if(A1=zww2) A1=seg2; else if(A1=zww3) A1=seg3; else if(A1=zww4) A1=seg4; else if(A1=zww5) A1=seg5; else if(A1=zww6) A1=seg6; else if(A1=zww7) A1=seg7; else if(A1=zww8) A1=seg8; else if(A1=zww9) A1=seg9; else A1=A1; if(A2=zww0) A2=seg0; else if(A2=zww1) A2=seg1; else if(A2=zww2) A2=seg2; else if(A2=zww3) A2=seg3; else if(A2=zww4) A2=seg4; else if(A2=zww5) A2=seg5; else if(A2=zww6) A2=seg6; else if(A2=zww7) A2=seg7; else if(A2=zww8) A2=seg8; else if(A2=zww9) A2=seg9; else A2=A2; if(A3=zww0) A3=seg0; else if(A3=zww1) A3=seg1; else if(A3=zww2) A3=seg2; else if(A3=zww3) A3=seg3; else if(A3=zww4) A3=seg4; else if(A3=zww5) A3=seg5; else if(A3=zww6) A3=seg6; else if(A3=zww7) A3=seg7; else if(A3=zww8) A3=seg8; else if(A3=zww9) A3=seg9; else A3=A3; for(j=0;j8;j+) P4OUT=A1; P5OUT=0X0E;
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 跨领域项目合作协议
- 工业设计产品设计理念与案例分析
- 航空航天材料工程考试试题集
- 现代管理学基础理论学习题集
- 运动训练理论与实践题
- 2025年工程成本预测试题及答案
- 2024年天然植物纤维及人造纤维编织工艺品项目投资申请报告代可行性研究报告
- 犯罪分析测试题及答案
- 跨部门协作的成功要素计划
- 多元化工作方法的探索计划
- 中国特色社会主义期中测试题-2023-2024学年中职高教版
- 学习康复科常见物理治疗法课件
- 教科版五年级下册科学第三单元《环境与我们》单元测试卷(含答案)
- 无人机测试与评估标准
- MOOC 单片机原理与应用-北京交通大学 中国大学慕课答案
- 新粤教粤科版五年级下册科学全册教学课件
- 2024年快递员技能竞赛理论知识考试题库(500题)
- 2023年广东省东莞日报社招聘7人笔试参考题库(共500题)答案详解版
- 二手车鉴定评估报告书(范本)
- 林威老师形形色色的人习作课 点评
- 03K132 风管支吊架图集
评论
0/150
提交评论