標(biāo)題: STC8A8K64S4A12單片機(jī)用10K的NTC溫度傳感電阻測(cè)溫串口發(fā)送的實(shí)驗(yàn)程序 [打印本頁(yè)]
作者: liuqing    時(shí)間: 2021-2-6 22:18
標(biāo)題: STC8A8K64S4A12單片機(jī)用10K的NTC溫度傳感電阻測(cè)溫串口發(fā)送的實(shí)驗(yàn)程序
STC8A8K64S4A12用10K的NTC溫度傳感電阻測(cè)溫串口發(fā)送的實(shí)驗(yàn)。
只為驗(yàn)證這種方法的可行性�？梢猿晒y(cè)量正確溫度。
用單片機(jī)5V作為基準(zhǔn)電壓，NTC上拉10K的電阻。
有興趣的朋友可以看看，幫完善一下。最好能測(cè)8路溫度，
業(yè)余新手的試驗(yàn)

單片機(jī)源程序如下:
  1. #include "stc8.h"
  2. #include "uart.h"
  3. #include "adc.h"
  4. #include <stdio.h>
  5. #include <math.h>


  8. const float Rp=10000.0;                 //10K，25度時(shí)的阻值         
  9. const float T2 = (273.15+25.0);   //T2，25度時(shí)的開(kāi)爾文溫度
  10. const float Bx = 3950.0;                //B值
  11. const float Ka = 273.15;        //開(kāi)爾文溫度

  13. float Get_Temp(float Rt)
  14. {

  16.         float temp;

  18.                                 //like this R=10000, T2=273.15+25,B=3470, RT=10000*EXP(3470*(1/temp-1/(273.15+25)),  
  19. //        temp = Rt/Rp;
  20. //        temp = log(temp);                //ln(Rt/Rp)
  21.         
  22. //        temp/=Bx;                          //ln(Rt/Rp)/B
  23.         //temp+=(1/T2);
  24. //        temp = 1/(temp);
  25. //        temp-=Ka;
  26.         temp=1/(log(Rt/Rp)/Bx+(1/T2))-Ka;
  27.         return temp;
  28. }

  30. void printstar(void)
  31. {
  32.         printf("*************************\n");
  33. }

  35. void print_message(void)
  36. {
  37.         printf("hello world\n");
  38.         printf("how do you do!\n");
  39.         printf("歡迎學(xué)習(xí)STC8A8K單片機(jī)\n");
  40. }


  43. void main(void)
  44. {
  45.         float t,r,vol;
  46.         P1M0=0X00;P1M1=0XFF;
  47.         Uart1_Init() ;
  48.         adc_init();
  49.         
  50.         while(1)
  51.         {
  52.         
  53.            if(P20==0)
  54.            {
  55.                   

  57.                         print_message();
  58.                         printstar();
  59.                         vol=((float)adc_read()/4096)*5;
  60.                         r=vol/((5-vol)/10000);
  61.                
  62.                          t=Get_Temp(r);
  63.                         printf("ADC %.2f", t) ;
  64.                 }
  65.         }

  67. }
復(fù)制代碼

全部程序51hei下載地址：
NTC傳感器測(cè)溫.rar (35.1 KB, 下載次數(shù): 134)





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