標(biāo)題: 無AD功能89c52單片機(jī)用1個(gè)電容1個(gè)熱敏電阻測溫度 原理圖程序 [打印本頁]
作者: a4732710    時(shí)間: 2021-4-18 23:42
標(biāo)題: 無AD功能89c52單片機(jī)用1個(gè)電容1個(gè)熱敏電阻測溫度 原理圖程序
根據(jù)RC充電原理知道：未知Rx=(未知充電時(shí)間us/已知充電時(shí)間us)*已知電阻k
先自己用10K(或100k或其它精密電阻）根據(jù)下圖測出所用時(shí)間us(我粗測出289us,公式用到)


顯示的數(shù)碼管線路可能不同，我自己焊在P1口上。
制作出來的實(shí)物圖如下：


其實(shí)還可以改精度更高些，主要關(guān)鍵穩(wěn)定電壓，穩(wěn)定質(zhì)量電阻電容，還有公式取的精度。
粗陋對比18B20溫度



單片機(jī)源程序如下:
#include<reg52.h>
#define u8  unsigned char
#define u16 unsigned int
sbit Rc=P0^0;u16 s=0,r=0;
sbit a=P3^4;sbit b=P3^5;sbit c=P3^6;sbit d=P3^7; //4個(gè)數(shù)碼管
u8 code tab[12]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0,0x63};
u8 us,t,dw[4];//數(shù)碼管顯示0--9,0是關(guān)顯示,0x63是溫度符號
u16 code ntc100[]={31076,29541,28090,26720,25424,24199,23039,21942,20904,
19920,18988,18106,17269,16475,15723,15009,14331,13688,13077,12497,11946,
11422,10924,10451,10000,9571,9163,8775,8405,8052,7717,7397,7092,6801,6524,
6259,6007,5766,5536,5316,5106,4906,4714,4531,4356,4189,4029,3875,3729,3588};
//1--50的溫度//自己設(shè)置需要的溫度
void Delay(u16 n){while(--n);}//12M公式n=(延時(shí)-6)*0.12493899(us)
void disp()
{  s++;if(s==3000)s=0; //s=3000是延時(shí)一會(huì)兒再讀取溫度
   dw[0]=10;dw[1]=t%100/10;dw[2]=t%10;dw[3]=11;
   P1=tab[dw[0]];a=1;Delay(70);a=0;P1=tab[dw[1]];b=1;Delay(70);b=0;
   P1=tab[dw[2]];c=1;Delay(70);c=0;P1=tab[dw[3]];d=1;Delay(70);d=0;P1=0;}
void T0init()
{TMOD=0x02;TH0=0x00;TL0=0x00;ET0=1;EA=1;}
void main(void)
{ long u16 Rxt;u16 temp;u8 j;
  T0init();
while(1)
{
   if(s==0){Rc=0;Delay(600);//約5ms
         Rc=1;TR0=1;while(!Rc);TR0=0;
         Rxt=us*256+TL0;TL0=0;us=0;Rc=0;
         r=((float)(Rxt*1.0/289*1.0)+0.00005)*10*100;}
         //289us是已知電阻(10K)測到的時(shí)間*10是10k單位是k,
         //*100是取溫度有效值,如26度ntc100k是(95.7132k)ntc10k(9.631K)
     if((r>3455)&&(r<32500))//阻值在1~50度之間，顯示對應(yīng)的溫度
         {for(j=0;j<50;j++){temp=ntc100[j];if(r>=temp) break;}
          t=j;}
         disp();
}}
void t0() interrupt 1
{us++;if(us==255)us=0;}
測試已知電阻充電時(shí)間也用上面小改一下，讓數(shù)碼管顯示Rxt就是被測時(shí)間。
下面下載跟上面一樣。上面直接復(fù)制到keil改數(shù)碼管改接口就行。
C52粗測NTC溫度.rar (1.07 KB, 下載次數(shù): 74)

作者: a4732710    時(shí)間: 2021-4-20 21:17
本帖最后由 a4732710 于 2021-4-20 21:27 編輯

修改了精度，測試范圍-5到200度，可以用在電飯鍋電磁爐等測溫上，相差應(yīng)該小于1度。

測量負(fù)溫度

烙鐵加溫到190多度
下面與18b20同時(shí)加溫顯示的溫度
下面是修改的程序

C52測NTC溫度-5到200度.rar (1.72 KB, 下載次數(shù): 27)


作者: a4732710    時(shí)間: 2021-4-20 21:32
本帖最后由 a4732710 于 2021-4-20 21:46 編輯

不接熱敏電阻顯示四個(gè)“-”



下面是修改了的程序。

C52測NTC溫度-5到200度.rar (1.72 KB, 下載次數(shù): 61)

作者: 51hei團(tuán)團(tuán)    時(shí)間: 2021-4-20 21:47
這個(gè)方法很好,畢竟一個(gè)數(shù)字溫度傳感器的成本還是比較高的
作者: a4732710    時(shí)間: 2021-4-20 22:07
上面兩個(gè)附件一樣的，上傳重復(fù)了
作者: xjx51    時(shí)間: 2021-7-19 12:18
牛逼啊樓主能講下原理嗎？
作者: mctccy    時(shí)間: 2021-7-22 14:29
IO直接置低給電容放電不會(huì)燒壞IO口嗎？
作者: DizzyOk    時(shí)間: 2024-1-3 15:46
可以問問加上數(shù)碼管的原理圖嗎
作者: yhf3721    時(shí)間: 2024-1-4 20:18
樓主289us是怎么測出來的
作者: dyx811    時(shí)間: 2024-1-6 14:41
可以說樓主對IO引腳的探究達(dá)到了出神入化的境界了。我能想到的原理就是不斷判斷引腳電平翻轉(zhuǎn)所用的累計(jì)時(shí)間！秒��！
作者: changchieh    時(shí)間: 2024-1-7 21:12
我有那個(gè)板子，正好學(xué)一下，謝謝
作者: T0m    時(shí)間: 2024-1-12 09:28
這樣也可以拓展到檢測下面電容來完成輸液寶的基本功能了。
作者: nanfuB    時(shí)間: 2024-1-28 21:32
xjx51 發(fā)表于 2021-7-19 12:18
牛逼啊樓主能講下原理嗎？

應(yīng)該用RC的充放電，通過查表計(jì)時(shí)得到對應(yīng)的溫度值，以前好多4位機(jī)和8位機(jī)沒AD功能用這種方法測量。
作者: mcu5i51    時(shí)間: 2024-1-31 14:03
nanfuB 發(fā)表于 2024-1-28 21:32
應(yīng)該用RC的充放電，通過查表計(jì)時(shí)得到對應(yīng)的溫度值，以前好多4位機(jī)和8位機(jī)沒AD功能用這種方法測量。

商用的要和基準(zhǔn)電阻計(jì)算的,不能直接用時(shí)間查表
作者: tianheart    時(shí)間: 2024-2-18 13:55
厲害。。就服樓主的探索精神
作者: 兀自清涼    時(shí)間: 2024-2-21 10:27
過來給樓主點(diǎn)贊，妙
作者: llm8525    時(shí)間: 2024-2-26 17:54
對于某一個(gè)溫度或某一小段溫度是可以的。
作者: 山川科技    時(shí)間: 2024-12-1 21:42
顯示4個(gè)0，是咋回事？



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