|
|
閑來(lái)上傳一個(gè)以前做的程序注釋非常詳細(xì),一個(gè)溫度傳感器數(shù)碼管顯示,供參考!
單片機(jī)源程序如下:
- #include <reg52.h>
- #include <intrins.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit DQ = P2^2; //數(shù)據(jù)口define interface
- sbit dula = P2^6; //數(shù)碼管段選
- sbit wela = P2^7; //數(shù)碼管位選
- uint temp; //溫度值 variable of temperature
- //不帶小數(shù)點(diǎn)
- unsigned char code table[] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,
- 0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
- //帶小數(shù)點(diǎn)
- unsigned char code table1[] = {0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef};
- /*************精確延時(shí)函數(shù)*****************/
- void delay(unsigned char i)
- {
- while(--i);
- }
- /******************************************
- 此延時(shí)函數(shù)針對(duì)的是12Mhz的晶振
- delay(0):延時(shí)518us 誤差:518-2*256=6
- delay(1):延時(shí)7us (原帖寫(xiě)"5us"是錯(cuò)的)
- delay(10):延時(shí)25us 誤差:25-20=5
- delay(20):延時(shí)45us 誤差:45-40=5
- delay(100):延時(shí)205us 誤差:205-200=5
- delay(200):延時(shí)405us 誤差:405-400=5
- *******************************************/
- /*****************DS18B20******************/
- void Init_Ds18b20(void) //DS18B20初始化send reset and initialization command
- {
- DQ = 1; //DQ復(fù)位,不要也可行。
- delay(1); //稍做延時(shí)
- DQ = 0; //單片機(jī)拉低總線
- delay(250); //精確延時(shí),維持至少480us
- DQ = 1; //釋放總線,即拉高了總線
- delay(100); //此處延時(shí)有足夠,確保能讓DS18B20發(fā)出存在脈沖。
- }
- uchar Read_One_Byte() //讀取一個(gè)字節(jié)的數(shù)據(jù)read a byte date
- //讀數(shù)據(jù)時(shí),數(shù)據(jù)以字節(jié)的最低有效位先從總線移出
- {
- uchar i = 0;
- uchar dat = 0;
- for(i=8;i>0;i--)
- {
- DQ = 0; //將總線拉低,要在1us之后釋放總線
- //單片機(jī)要在此下降沿后的15us內(nèi)讀數(shù)據(jù)才會(huì)有效。
- _nop_(); //至少維持了1us,表示讀時(shí)序開(kāi)始
- dat >>= 1; //讓從總線上讀到的位數(shù)據(jù),依次從高位移動(dòng)到低位。
- DQ = 1; //釋放總線,此后DS18B20會(huì)控制總線,把數(shù)據(jù)傳輸?shù)娇偩上
- delay(1); //延時(shí)7us,此處參照推薦的讀時(shí)序圖,盡量把控制器采樣時(shí)間放到讀時(shí)序后的15us內(nèi)的最后部分
- if(DQ) //控制器進(jìn)行采樣
- {
- dat |= 0x80; //若總線為1,即DQ為1,那就把dat的最高位置1;若為0,則不進(jìn)行處理,保持為0
- }
- delay(10); //此延時(shí)不能少,確保讀時(shí)序的長(zhǎng)度60us。
- }
- return (dat);
- }
- void Write_One_Byte(uchar dat)
- {
- uchar i = 0;
- for(i=8;i>0;i--)
- {
- DQ = 0; //拉低總線
- _nop_(); //至少維持了1us,表示寫(xiě)時(shí)序(包括寫(xiě)0時(shí)序或?qū)?時(shí)序)開(kāi)始
- DQ = dat&0x01; //從字節(jié)的最低位開(kāi)始傳輸
- //指令dat的最低位賦予給總線,必須在拉低總線后的15us內(nèi),
- //因?yàn)?5us后DS18B20會(huì)對(duì)總線采樣。
- delay(10); //必須讓寫(xiě)時(shí)序持續(xù)至少60us
- DQ = 1; //寫(xiě)完后,必須釋放總線,
- dat >>= 1;
- delay(1);
- }
- }
- uint Get_Tmp() //獲取溫度get the temperature
- {
- float tt;
- uchar a,b;
- Init_Ds18b20(); //初始化
- Write_One_Byte(0xcc); //忽略ROM指令
- Write_One_Byte(0x44); //溫度轉(zhuǎn)換指令
- Init_Ds18b20(); //初始化
- Write_One_Byte(0xcc); //忽略ROM指令
- Write_One_Byte(0xbe); //讀暫存器指令
- a = Read_One_Byte(); //讀取到的第一個(gè)字節(jié)為溫度LSB
- b = Read_One_Byte(); //讀取到的第一個(gè)字節(jié)為溫度MSB
- temp = b; //先把高八位有效數(shù)據(jù)賦于temp
- temp <<= 8; //把以上8位數(shù)據(jù)從temp低八位移到高八位
- temp = temp|a; //兩字節(jié)合成一個(gè)整型變量
- tt = temp*0.0625; //得到真實(shí)十進(jìn)制溫度值
- //因?yàn)镈S18B20可以精確到0.0625度
- //所以讀回?cái)?shù)據(jù)的最低位代表的是0.0625度
- temp = tt*10+0.5; //放大十倍
- //這樣做的目的將小數(shù)點(diǎn)后第一位也轉(zhuǎn)換為可顯示數(shù)字
- //同時(shí)進(jìn)行一個(gè)四舍五入操作。
- return temp;
- }
- /****************數(shù)碼碼動(dòng)態(tài)顯示函數(shù)**************/
- void Display(uint temp) //顯示程序
- {
- uchar A1,A2,A3;
- A1 = temp/100; //百位
- A2 = temp%100/10; //十位
- A3 = temp%10; //個(gè)位
- dula = 0;
- P0 = table[A1]; //顯示百位
- dula = 1; //打開(kāi)段選,對(duì)應(yīng)74573的鎖存位,高電平不鎖存
- dula = 0;
- wela = 0;
- P0 = 0x7e;
- wela = 1; //打開(kāi)位選
- wela = 0;
- delay(0);
- dula = 0;
- P0 = table1[A2]; //顯示十位,使用的是有小數(shù)點(diǎn)的數(shù)組(因?yàn)閠emp值擴(kuò)大了10倍,雖然是十位,實(shí)際為個(gè)位)
- dula = 1;
- dula = 0;
- wela = 0;
- P0 = 0x7d;
- wela = 1;
- wela = 0;
- delay(0);
- ……………………
- …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼
所有資料51hei提供下載:
一個(gè)溫度傳感器數(shù)碼管顯示.rar
(2.08 KB, 下載次數(shù): 101)
2018-2-13 16:16 上傳
點(diǎn)擊文件名下載附件
一個(gè)溫度傳感器數(shù)碼管顯示
|
|