帶溫度補償?shù)膯纹瑱C超聲波測距程序（Proteus仿真超聲波+DHT11）

ID:342451 · 發(fā)表于 2020-4-20 22:54

溫度補償?shù)某暡y距（仿真超聲波+DHT11）Proteus8.6版本
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機源程序如下:
#include <reg51.h>
#include "lcd.h"
#include <intrins.h>
/*對數(shù)據(jù)類型進行聲明定義*/
typedef unsigned int u16;
typedef unsigned char u8;
/*外設IO定義*/
sbit Data = P3^7; //定義DHT11數(shù)據(jù)線
sbit Trig = P2^6;
sbit Echo = P2^7;
/*變量定義*/
u16 Distance=0;
bit flag =0;
u8 TEMP,HR;//采集值

void DHT11_delay_ms(u16 z)
{
u16 i,j;
for(i=z;i>0;i--)
   for(j=110;j>0;j--);
}
void DHT11_delay_us(u8 n)
{
while(--n);
}

void DHT11_start()
{
Data=1;
DHT11_delay_us(2);
Data=0;
DHT11_delay_ms(30); //延時18ms以上
Data=1;
DHT11_delay_us(30);
}

u8 DHT11_rec_byte()    //接收一個字節(jié)
{
u8 i,dat=0;
for(i=0;i<8;i++) //從高到低依次接收8位數(shù)據(jù)
{
   while(!Data); ////等待50us低電平過去
   DHT11_delay_us(8);    //延時60us，如果還為高則數(shù)據(jù)為1，否則為0
   dat<<=1;          //移位使正確接收8位數(shù)據(jù)，數(shù)據(jù)為0時直接移位
   if(Data==1) //數(shù)據(jù)為1時，使dat加1來接收數(shù)據(jù)1
      dat+=1;
   while(Data);  //等待數(shù)據(jù)線拉低
}
return dat;
}

void DHT11_receive()    //接收40位的數(shù)據(jù)
{
      u8 R_H,R_L,T_H,T_L,RH,RL,TH,TL,revise;
  DHT11_start();
  if(Data==0)
      {
            while(Data==0); //等待拉高
            DHT11_delay_us(40);  //拉高后延時80us
            R_H=DHT11_rec_byte(); //接收濕度高八位
            R_L=DHT11_rec_byte(); //接收濕度低八位
            T_H=DHT11_rec_byte(); //接收溫度高八位
            T_L=DHT11_rec_byte(); //接收溫度低八位
            revise=DHT11_rec_byte(); //接收校正位
            DHT11_delay_us(25); //結束
            if((R_H+R_L+T_H+T_L)==revise)    //校正
            {
                              RH=R_H;
                              RL=R_L;
                              TH=T_H;
                              TL=T_L;
            }
            /*數(shù)據(jù)處理，方便顯示*/
            TEMP=TH;
            HR=RH;
      }
      DisplayOneChar(5,0,'0'+(TEMP/10));
      DisplayOneChar(6,0,'0'+(TEMP%10));
      DisplayOneChar(12,0,'0'+(HR/10));
      DisplayOneChar(13,0,'0'+(HR%10));
}
void GetDistance() //超聲波測距
{
      static u16 time=0;
      TH0=0;
  TL0=0;

      Trig=1; //啟動一次模塊
  //時間要求很嚴格，否則會影響精度
      _nop_(); _nop_();_nop_(); _nop_(); _nop_(); _nop_();_nop_();
      _nop_(); _nop_();_nop_(); _nop_(); _nop_(); _nop_();_nop_();
      _nop_(); _nop_();_nop_(); _nop_(); _nop_(); _nop_();_nop_();
      Trig=0;

      while(!Echo);             //當RX為零時等待
      TR0=1;                         //開啟計數(shù)
      while(Echo);             //當RX為1計數(shù)并等待
      TR0=0;                               //關閉計數(shù)

      time=TH0*256+TL0;//計算時間
      TH0=0;
      TL0=0;
      Distance=(time*(331.4+0.607*TEMP))/20000;//算出來是CM,帶溫度補償

      if((Distance>=700)||flag==1) //超出測量范圍顯示“-”
      {
            flag=0;
            DisplayOneChar(5, 1, '-');
            DisplayOneChar(6, 1, '-');
            DisplayOneChar(7, 1, '-');
      }
      else
      {
            DisplayOneChar(5, 1, Distance/100+'0');
            DisplayOneChar(6, 1, Distance%100/10+'0');
            DisplayOneChar(7, 1, Distance%10+'0');
      }
}
void Timer0Init()//定時器0初始化
{
      TMOD|=0x01;                //設T0為方式1，GATE=1；
      TH0=0;
      TL0=0;
      ET0=1;       //允許T0中斷
      EA=1;                         //開啟總中斷
}
void main(void)
{
      Timer0Init();
      LcdInit();
      Trig=0;//初始化必不可少！！！
      DisplayListChar(0,0,"TEMP:");DisplayOneChar(7,0,'C');DisplayListChar(9,0,"HR:");DisplayOneChar(14,0,'%');
  DisplayListChar(0,1,"DIS:");DisplayListChar(9,1,"CM");
      while(1)
      {
            DHT11_receive();//溫濕度顯示
            GetDistance(); //超聲波測距
            DHT11_delay_ms(20);
      }
}
void Timer0() interrupt 1                //T0中斷用來計數(shù)器溢出,超過測距范圍
{
      flag=1;       //中斷溢出標志
}

全部資料51hei下載地址：

溫度補償?shù)某暡y距.zip (142.65 KB, 下載次數(shù): 332)