基于AT89S52及DS18B20的數(shù)碼管顯示數(shù)字溫度計(jì)C語言程序_第1頁
基于AT89S52及DS18B20的數(shù)碼管顯示數(shù)字溫度計(jì)C語言程序_第2頁
基于AT89S52及DS18B20的數(shù)碼管顯示數(shù)字溫度計(jì)C語言程序_第3頁
基于AT89S52及DS18B20的數(shù)碼管顯示數(shù)字溫度計(jì)C語言程序_第4頁
基于AT89S52及DS18B20的數(shù)碼管顯示數(shù)字溫度計(jì)C語言程序_第5頁
免費(fèi)預(yù)覽已結(jié)束,剩余2頁可下載查看

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

1、#include "reg52.h" #include /_nop_(); 延時函數(shù)用 #define 輸出口 #define 口 #define #define sbitDisdata P0discan P2uchar unsigned char uint unsigned intDQ=卩3八3;/"intrins.h"段碼掃描溫度輸入口sbitDIN=PO八7;數(shù)點(diǎn)控制 uint h; uchar flag;/* 溫度小數(shù)部分用查表法 */ uchar code ditab16= OxOO,OxO1,OxO1,OxO2,OxO3,OxO3,OxO4,

2、OxO4,OxO5,OxO6,OxO6 ,OxO7,OxO8,OxO8,OxO9,OxO9;/ uchar dis_712=OxcO,Oxf9,Oxa4,OxbO,Ox99,Ox92,Ox82,Oxf8,Ox8O ,Ox9O,Oxff,Oxbf;/ 共陽 LED 段碼表 "O" "1" "2" "3" "4" "5" "6" "7" "8" "9" "不亮" "-&q

3、uot;uchar code scan_con4=Oxbf,Ox7f,Oxef,Oxfe; / 描控制字 uchar data temp_data2=OxOO,OxOO; 溫度暫放/LEDcode列掃/讀出uchar data display5=OxOO,OxOO,OxOO,OxOO,OxOO; 顯示單元數(shù)據(jù),共 4 個數(shù)據(jù)和一個運(yùn)算暫用/*11 微秒延時函數(shù) */void delay(uint t) for(;t>0;t-);/* 顯示掃描函數(shù) * scan()char k;四位LED掃描控制for(k=0;k<4;k+) /Disdata=0xff;Disdata=dis_7d

4、isplayk;if(k=1)DIN=0;discan=scan_conk;delay(90);discan=0xff;/*18B20 復(fù)位函數(shù) */ow_reset(void)char presence=1;while(presence) while(presence)DQ=1;_nop_();_nop_();DQ=0; /delay(50); / 550usDQ=1; /delay(6); / 66uspresence=DQ; / presence=0 繼續(xù)下 delay(45); / 延時 500us presence = DQ;DQ=1;/*18B20 寫命令函數(shù) * / 向 1-WI

5、RE 總線上寫一個字節(jié) void write_byte(uchar val) uchar i; for (i=8; i>0; i-) / DQ=1;_nop_();_nop_();/ /66us /最低位移出右移一位DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();/5us DQ = val&0x01; delay(6); val=val/2; DQ = 1; delay(1); / /*18B20 讀 1 個字節(jié)函數(shù) * / 從總線上讀取一個字節(jié) uchar read_byte(void) uchar i; uchar value =

6、 0; for (i=8;i>0;i-)DQ=1;_nop_();_nop_();value>>=1;DQ = 0;/_nop_();_nop_();_nop_();_nop_(); /4usDQ = 1;_nop_();_nop_();_nop_();_nop_(); /4us if(DQ)value|=0x80;delay(6);DQ=1;return(value);/ /*/ read_temp() ow_reset();/66us讀出溫度函數(shù) */write_byte(0xCC); / write_byte(0xBE); /總線復(fù)位發(fā) Skip ROM 命令 發(fā)讀命令

7、temp_data0=read_byte(); /溫度低 8 位temp_data1=read_byte(); /溫度高 8 位ow_reset();write_byte(0xCC); / Skip ROM write_byte(0x44); / 發(fā)轉(zhuǎn)換命令 / /* 溫度數(shù)據(jù)處理函數(shù) * void work_temp()uchar n=0; uchar doth,dotl;數(shù)字顯示修正標(biāo)記uchar flag3=1,flag2=1; / if(temp_data1&0xf8)!=0x00) temp_data1=(temp_data1); temp_data0=(temp_data0

8、)+1; n=1;flag=1;/ 負(fù)溫度求補(bǔ)碼 if(temp_data0>255) temp_data1+; display4=temp_data0&0x0f; display0=ditabdisplay4;doth=display0/10;dotl=display0%10;display4=(temp_data0&0xf0)>>4)|(temp_data1&0x07 )<<4);display3=display4/100; display2=display4/10%10;display1=display4%10; if(!display3) display3=0x0a; flag3=0;if(!display2) display2=0x0a; flag2=0;/ 最高位為 0 時都不顯示 if(n) display3=0x0b;/ flag3=0;負(fù)溫度時最高位顯示 "-"/*主函數(shù) *main()Disdata=0xff; /discan=0xff;for(h=0;h<4;h+)displayh=8;/ 開機(jī)顯示 8888 ow_reset(); / 開機(jī)先轉(zhuǎn)換一次 write_byte(0xCC); / Skip ROM write_byte(0x44); /

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論