带温度补偿的单片机超声波测距程序（Proteus仿真超声波+DHT11） -

标题: 带温度补偿的单片机超声波测距程序（Proteus仿真超声波+DHT11） [打印本页]

作者: 之一知足 时间: 2020-4-20 22:54
标题: 带温度补偿的单片机超声波测距程序（Proteus仿真超声波+DHT11）
温度补偿的超声波测距（仿真超声波+DHT11）Proteus8.6版本
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

单片机源程序如下:
#include <reg51.h>
#include "lcd.h"
#include <intrins.h>
/*对数据类型进行声明定义*/
typedef unsigned int u16;
typedef unsigned char u8;
/*外设IO定义*/
sbit Data = P3^7; //定义DHT11数据线
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()    //接收一个字节
{
u8 i,dat=0;
for(i=0;i<8;i++) //从高到低依次接收8位数据
{
   while(!Data); ////等待50us低电平过去
   DHT11_delay_us(8);    //延时60us，如果还为高则数据为1，否则为0
   dat<<=1;          //移位使正确接收8位数据，数据为0时直接移位
   if(Data==1) //数据为1时，使dat加1来接收数据1
      dat+=1;
   while(Data);  //等待数据线拉低
}
return dat;
}

void DHT11_receive()    //接收40位的数据
{
      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;
            }
            /*数据处理，方便显示*/
            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;                         //开启计数
      while(Echo);             //当RX为1计数并等待
      TR0=0;                               //关闭计数

      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中断用来计数器溢出,超过测距范围
{
      flag=1;       //中断溢出标志
}