找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

帖子
查看: 4138|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)+PCF8591熱敏電阻測(cè)試數(shù)碼管顯示源碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:333350 發(fā)表于 2018-5-18 23:04 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
熱敏電阻測(cè)試數(shù)碼管顯示單片機(jī)源程序如下:
  1. /*-----------------------------------------------
  2.   名稱：IIC協(xié)議 PCF8591 AD/DA轉(zhuǎn)換 測(cè)試熱敏電阻
  3.   修改：無
  4.   內(nèi)容：使用1路ad測(cè)試熱敏電阻阻值，并查表得到溫度值，溫度精度和多種參數(shù)有關(guān)。
  5. ------------------------------------------------*/  
  6. #include <reg52.h>               
  7. #include "i2c.h"
  8. #include "delay.h"
  9. #include "display.h"


  12. code unsigned int  vt_table[]=        // 電壓溫度對(duì)照表
  13.         {
  14.                 4132,4098,4063,4026,3988,3949,3908,3866,3823,3779,
  15.                 3733,3686,3639,3590,3540,3489,3437,3385,3331,3277,
  16.                 3222,3166,3110,3054,2997,2940,2882,2824,2767,2709,
  17.                 2651,2593,2536,2478,2421,2365,2309,2253,2198,2143,
  18.                 2089,2036,1984,1932,1881,1831,1782,1734,1686,1640,
  19.                 1594,1550,1506,1464,1422,1381,1341,1303,1265,1228,
  20.                 1192
  21.         
  22.         };

  24. #define AddWr 0x90   //寫數(shù)據(jù)地址 PCF8591
  25. #define AddRd 0x91   //讀數(shù)據(jù)地址 PCF8591

  27. extern bit ack;
  28. unsigned char ReadADC(unsigned char Chl);
  29. /*------------------------------------------------
  30.               主程序
  31. ------------------------------------------------*/
  32. main()
  33. {
  34. unsigned int num=0;
  35. unsigned char i,temp;
  36. Init_Timer0();

  38. while (1)         //主循環(huán)
  39.   {
  40.   
  41. num=ReadADC(0);
  42. //變成mv 最大值255 。255x19=4845mv，如果增加精度可以使用浮點(diǎn)計(jì)算
  43. num=num*19;   
  44. for(i=0;i<61;i++)
  45.    {
  46. //判斷采集電壓值大于或者等于表格電壓時(shí)，停下來并記錄當(dāng)前i值
  47.     if(num >= vt_table[i])
  48.        {
  49.         temp=i;
  50. //如果是前10個(gè)數(shù)據(jù)表明是負(fù)溫度，需要把溫度符號(hào)顯示出來，并且前10位溫度遞增
  51.         if(i<10)
  52.           {
  53.           temp=10-temp;    //如果i=0，表示-10
  54.           TempData[0]=0x40;//'-'號(hào)
  55.           }
  56.         else
  57.           {
  58.           temp-=10; //如果大于等于10表明正溫度，把前10個(gè)表格負(fù)溫度去掉
  59.           TempData[0]=0x00;//符號(hào)位顯示空
  60.           }
  61.                 break;             //檢測(cè)到即跳出循環(huán)，否則繼續(xù)循環(huán)
  62.         }
  63.          
  64.       }
  65. TempData[3]=dofly_DuanMa[temp/10];//顯示2位數(shù)溫度值
  66. TempData[4]=dofly_DuanMa[temp%10];
  67. DelayMs(200);                    //延時(shí)防止采集頻率過快
  68.   }
  69. }
  70. /*------------------------------------------------
  71.              讀AD轉(zhuǎn)值程序
  72. 輸入?yún)?shù) Chl 表示需要轉(zhuǎn)換的通道，范圍從0-3
  73. 返回值范圍0-255
  74. ------------------------------------------------*/
  75. unsigned char ReadADC(unsigned char Chl)
  76. {
  77.    unsigned char Val;
  78.    Start_I2c();               //啟動(dòng)總線
  79.    SendByte(AddWr);             //發(fā)送器件地址
  80.      if(ack==0)return(0);
  81.    SendByte(0x40|Chl);            //發(fā)送器件子地址
  82.      if(ack==0)return(0);
  83.    Start_I2c();
  84.    SendByte(AddWr+1);
  85.       if(ack==0)return(0);
  86.    Val=RcvByte();
  87.    NoAck_I2c();                 //發(fā)送非應(yīng)位
  88.    Stop_I2c();                  //結(jié)束總線
  89.   return(Val);
  90. }

復(fù)制代碼

所有資料51hei提供下載:
133-熱敏電阻測(cè)試數(shù)碼管顯示.zip (35.78 KB, 下載次數(shù): 95)


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:507090 發(fā)表于 2019-4-9 18:00 | 只看該作者
最近就在弄這個(gè)，幫助很大！
回復(fù)

使用道具 舉報(bào)

板凳
ID:585455 發(fā)表于 2020-9-14 08:37 | 只看該作者
只剩熱敏電阻尚未測(cè)試，幫助很大，我等等測(cè)試。
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表