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