欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 51單片機溫度計 帶負溫度檢測 含仿真和源程序 [打印本頁]
作者: 章政    時間: 2016-12-12 22:27
標題: 51單片機溫度計 帶負溫度檢測 含仿真和源程序
這幾天做課程設計已經瘋了


  1. #include<reg51.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char

  5. uchar code lednum[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};//數碼管字0~9
  6. uint  temp;
  7. uchar g,s,b,q;          //個十百千位
  8. //uchar data disdata[5];
  9. uint  Tvalue;     //溫度值
  10. uchar Tflag;      //溫度正負標志



  14. sbit P34=P3^4;
  15. sbit P35=P3^5;
  16. sbit P36=P3^6;
  17. sbit  DQ=P3^7;//ds18b20與單片機連接口
  18. sbit P17=P1^7;
  19. sbit P24=P2^4;

  21. /*****************延時函數********************/
  22. void delay(uint x)
  23. {  uchar k;
  24.    while(x--)
  25.    for(k=0;k<250;k++) ;
  26. }
  27. /*****************數碼管掃描********************/                                          
  28. void ledscan(void)
  29. {   uchar k;
  30.     for(k=0;k<150;k++)
  31.         {                 //顯示DS18B20  小數點一位，含負溫度顯示
  32.                   P1=lednum[g];P2=0x0e;delay(1);P1=0x00;
  33.         P1=lednum[s];P17=1;P2=0x0d;delay(1);P1=0x00;
  34.             P1=lednum[b];P2=0x0b;delay(1);P1=0x00;
  35.             P1=lednum[q];P2=0x07;delay(1);P1=0x00;
  36.          }
  37. }

  39. /******************************DS18B20程序（定義開始）***************************************/
  40. void delay_18B20(unsigned int i)//延時2微秒
  41. {
  42.         while(i--);
  43. }
  44. /*****************ds1820復位****************/
  45. void DS18B20_RST()         
  46. {  unsigned char x=0;
  47.          DQ = 1;           //DQ復位
  48.          delay_18B20(8);   //延時
  49.          DQ = 0;           //DQ拉低
  50.          delay_18B20(80); //精確延時大于480us
  51.          DQ = 1;           //拉高
  52.          delay_18B20(14);
  53.          x=DQ;
  54.          delay_18B20(20);         
  55.    }  
  56. /*****************讀數據*******************/  
  57. uchar DS18B20_RD()        
  58.   {  unsigned char i=0;
  59.          unsigned char R_data= 0;
  60.          for (i=8;i>0;i--)
  61.          {    DQ = 0;      //給脈沖信號
  62.                   R_data>>=1;  //
  63.                   DQ = 1;      //給脈沖信號
  64.                   if(DQ)
  65.                   R_data|=0x80;
  66.                   delay_18B20(4);
  67.          }
  68.         return(R_data);
  69.   }
  70. /*******************寫數據*******************/
  71.   void DS18B20_WR(uchar W_data)
  72.   {  
  73.      unsigned char i=0;
  74.      for (i=8; i>0; i--)
  75.     {  DQ = 0;
  76.        DQ = W_data&0x01;
  77.        delay_18B20(5);
  78.        DQ = 1;
  79.        W_data>>=1;                //
  80.     }
  81.          delay_18B20(4);
  82. }
  83. /****************讀取溫度值并轉換***************/
  84. read_temp()
  85. {  uchar a,b;
  86.     DS18B20_RST();   
  87.     DS18B20_WR(0xcc);  //*跳過讀序列號*/
  88.     DS18B20_WR(0x44);  //*啟動溫度轉換*/
  89.     DS18B20_RST();   
  90.     DS18B20_WR(0xcc);  //*跳過讀序列號*/
  91.     DS18B20_WR(0xbe);  //*讀取溫度*/
  92.     a=DS18B20_RD();
  93.     b=DS18B20_RD();
  94.     Tvalue=b;
  95.     Tvalue<<=8;                  //
  96.     Tvalue=Tvalue|a;
  97.     if(Tvalue<0x0fff)
  98.     Tflag=0;
  99.     else
  100.    {
  101.       Tvalue=~Tvalue+1;
  102.       Tflag=1;
  103.     }
  104.       Tvalue=Tvalue*(0.625);//溫度值擴大10倍，精確到1位小數
  105.         return(Tvalue);
  106.   }
  107.   /****************溫度值顯示***************/
  108. void DS1820disp()
  109. {
  110.           b=Tvalue/100%10;//十位數
  111.           s=Tvalue/10%10;  //個位數
  112.           g=Tvalue%10;      //小數位
  113.    
  114.      if(Tflag==0)
  115.              q=Tvalue/1000;    //正溫度不顯示符號，顯示百位數
  116.      else
  117.          q=10;//負溫度顯示負號:-



  121.    }
  122. /******************************DS18B20程序(定義結束)***************************************/

  124. /*****************主函數********************/
  125. void main()
  126. {   
  127.                            
  128.         while(1)
  129.          {
  130.                   read_temp();
  131.                   DS1820disp();
  132.           ledscan();
  133.         
  134.           }
  135. }
復制代碼



所有資料下載：
數字溫度計.rar (62.89 KB, 下載次數: 82)
作者: admin    時間: 2017-1-7 01:46
好資料，51黑有你更精彩！！！
作者: 咯咯哈    時間: 2017-6-26 18:00
求溫度計的PCB
作者: 李偉豪    時間: 2017-11-28 09:39
精度是0.1 還是0.5
作者: zhi155    時間: 2018-6-10 18:42
做出來的是數碼管一閃一閃的，而不是顯示溫度的



歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1