用本坛找到的程序做的带温度补偿超声波测距试验

        在本坛找到一个带温度补偿超声波测距程序，于是用手上的开发板进行了试验，试验时，修改了程序的相关端口，以便能在单片机开发板上使用，试验结果，程序工作正常，功能设计较全。修改后的程序包： 超声波测距程序.zip (1.39 MB, 下载次数: 56)

2017-7-7 08:02 上传

点击文件名下载附件
超声声测距程序
       这里贴出了试验时的实物照片，供爱好者参考：

带温度补偿功能的超声波测距板

修改过的部分程序：

#include <REGX51.H>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define LcdData P2                   //1602数据端口

sbit LCD_RS=P0^7;      //1602 RS端口
sbit LCD_RW=P0^6;      //1602 RW端口
sbit LCD_EN=P0^5;      //1602 EN端口
sbit Echo=P1^2;        //HC-SR04 接收端口
sbit Trig=P1^1;        //HC-SR04 发射端口
sbit Resets_Key=P3^2;  //复位清零按键
sbit Single_Key=P3^3;  //单次测量按键    误差较大
sbit Contin_Key=P3^4;  //连续测量按键    误差小
sbit Averag_Key=P3^5;  //连续（平均测量）按键   误差较小
sbit Setting_Key=P3^6; //温度修正按键
sbit Add_Key=P1^5;     //温度加1按键
sbit Sub_Key=P1^6;     //温度减1按键
sbit DQ=P3^7;          //DS18B20单总线接口

bit Temp_Flag;         //正负温度标志：温度为正Temp_Flag=0，否则为1
uint temp=25;          //温度值
bit flag_flow=0,flag_one=0,flag_clear=0,flag_con1=0,flag_con2=0,flag_temp=0;
uchar i=0,m,j,k;
uint time=0,S=0,S1=0,totle=0;
float V=346.0;
uint Sav[11];                                                          //连续测量时10次平均值数组
uchar Line1[16]={"T:   C  V:346m/s"};          //1602第一行初始字符显示数组
uchar Line2[16]={"S=     m        "};          //1602第二行初始字符显示数组

void Delayms(uchar xms);                        //延时xms函数
void WriteLcd(uchar Dat,bit x);        //1602写函数
void InitLcd(void);                                //1602初始化函数
void DisplayLcd();                                //1602显示函数
void init();                                        //初始化函数
void keyscan();                                        //键扫描函数
void StartModule();                            //启动模块函数
void Conut(void);                                 //测量计算函数
void Delayus(uchar xus);        //us级延时函数
bit Init_DS18B20(void);         //初始化DS18B20函数
uchar Read_DS18B20(void);       //读DS18B20函数
void Write_DS18B20(uchar Dat);  //写DS18B20函数
void GetTemp();                 //取温度函数
void CalcTestTemp();            //温度处理函数

void main(void)    //主函数
{
        init();
        InitLcd();
        while(1)
        {
                keyscan();                         //键扫描函数
            DisplayLcd();
            if(flag_temp==0)
            {
                    GetTemp();
                    CalcTestTemp();
            }
            if(flag_one==1||flag_con1==1||flag_con2==1)
            {
                    StartModule();         //开始发射超声波
                while(!Echo);                 //当RX为零时等待
            TR0=1;                         //开启计数
            while(Echo);             //当RX为1计数并等待
                TR0=0;                         //关闭计数
            Conut();                 //计算
            Delayus(200);
                flag_one=0;
            }
        }
}

void Delayms(uchar xms)   //延时ms函数
{
    uchar i,j;
    for(i=xms;i>0;i--)
            for(j=110;j>0;j--);
}

void WriteLcd(uchar Dat,bit x)  //1602写函数（写指令时x=0，写数据时x=1）
{
        LCD_EN=0;
        LcdData=Dat;
        LCD_RS=x;
        LCD_RW=0;
        LCD_EN=1;
        Delayms(1);
        LCD_EN=0;
}

void InitLcd(void)           //1602初始化函数
{
        WriteLcd(0x38,0);  //功能设定（38H）,8位数据，2行显示，5*7点阵
        WriteLcd(0x0C,0);  //显示开、关设定（0CH），开显示，不显示光标，光标不闪烁
        WriteLcd(0x06,0);  //输入模式设定（06H），读写一个字符后，地址指针加1，且光标加1
        WriteLcd(0x01,0);  //清除显示（01H），清除数据RAM中的数据
}

void DisplayLcd()                                  //液晶屏显示函数
{
    uchar y;
    V=(331.4+temp*0.607);
    Line1[2]=temp/10+0x30;
    Line1[3]=temp%10+0x30;
    Line1[4]=0xDF;                  //显示℃中C前面的小圆
    Line1[10]=(uint)V/100+0x30;
    Line1[11]=(uint)V%100/10+0x30;
    Line1[12]=(uint)V%10+0x30;
    if(flag_clear==1)
    S1=0;
    if((S1>=7000)||flag_flow==1)    //超出测量范围显示“-”
        {         
            flag_flow=0;
            Line2[2]='-';
            Line2[3]='.';
............................................................................
由于程序较长，需要的到上面的的下载地址自己下载

原贴：http://www.51hei.com/bbs/dpj-89642-1.html

51黑有你更精彩！！！

正需要