找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 8828|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

基于C51單片機(jī)和LCD1602顯示的超聲波測(cè)距儀C語(yǔ)言程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:51090 發(fā)表于 2014-10-12 21:32 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
#include"reg52.h"
#include"intrins.h"


#define uchar unsigned char    //無(wú)符號(hào)8位
#define uint unsigned int    //無(wú)符號(hào)16位
#define ulong unsigned long    //無(wú)符號(hào)32位


sbit K1=P1^0;   //按下K1后,開(kāi)始測(cè)距
sbit LEDRed=P1^1; //測(cè)距指示燈,亮表示正在測(cè)距,滅表示測(cè)距完成
//sbit BEEP=P1^2;  //報(bào)警測(cè)量超出范圍

sbit Trig=P2^5;  //HC-SR04觸發(fā)信號(hào)輸入
sbit Echo=P2^6;  //HC-SR04回響信號(hào)輸出

float xdata DistanceValue=0.0; //測(cè)量的距離值
float xdata SPEEDSOUND;    //聲速
float xdata XTALTIME;    //單片機(jī)計(jì)數(shù)周期
uchar xdata stringBuf[6];   //數(shù)值轉(zhuǎn)字符串緩沖

//LCD1602提示信息
uchar code Prompts[][16]=
{
{"Measure Distance"}, //測(cè)量距離
{"- Out of Range -"}, //超出測(cè)量范圍
{"MAX range 400cm "}, //測(cè)距最大值400cm
{"MIN range 2cm   "}, //測(cè)距最小值2cm
{"                "}, //清屏
{" Press K1 Start "} //按鍵開(kāi)始測(cè)量
};
uchar xdata DistanceText[]="Range:          ";   //測(cè)量結(jié)果字符串
uchar xdata TemperatureText[]="Temperature:    ";//測(cè)量溫度值


extern void LCD_Initialize();                       //LCD初始化
extern void LCD_Display_String(uchar *, uchar);     //字符串顯示
extern void ReadTemperatureFromDS18B20();           //從DS18B20讀取溫度值
extern int xdata CurTempInteger;


//毫秒延時(shí)函數(shù)
void DelayMS(uint ms);
//20微秒延時(shí)函數(shù)
void Delay20us();
//HCSR04初始化
void HCSR04_Initialize();
//測(cè)量距離
float MeasuringDistance();
//測(cè)距的數(shù)值排序求平均
float DistanceStatistics();
//輸出距離值到LCD1602上
void DisplayDistanceValue(float dat);
//將無(wú)符號(hào)的整數(shù)轉(zhuǎn)成字符串,返回字符串長(zhǎng)度,不包括'\0'結(jié)束符
uchar UnsigedIntToString(uint value);
//蜂鳴器
//void Beep(uchar time);
//顯示溫度值
void DisplayTemperatureValue();


void main()
{
LCD_Initialize();//LCD1602初始化
LCD_Display_String(Prompts[0],0x00);
LCD_Display_String(Prompts[5],0x40);
ReadTemperatureFromDS18B20();    //測(cè)溫度
HCSR04_Initialize();             //HC-SR04初始化
while(1)
{
  if(K1==0)
  {
   DelayMS(5);
   if(K1==0)
   {
    //Beep(1);
    while(K1==0);
    LEDRed=0;
    ReadTemperatureFromDS18B20();//測(cè)溫度
    DisplayTemperatureValue();
    if(CurTempInteger<14)
     CurTempInteger=14;
    else if(CurTempInteger>26)
     CurTempInteger=26;
    SPEEDSOUND=334.1+CurTempInteger*0.61;//計(jì)算聲速
    DistanceValue=DistanceStatistics();  //測(cè)距并返回距離值
    DisplayDistanceValue(DistanceValue); //顯示距離值
    LEDRed=1;
   }
  }
}
}

//測(cè)距的數(shù)值排序求平均
float DistanceStatistics()
{
uchar i,j;
float disData[7],t;
//連續(xù)測(cè)距
for(i=0;i<7;i++)
{
  disData=MeasuringDistance();
  DelayMS(80);
}
//排序
for(j=0;j<=6;j++)
{
  for(i=0;i<7-j;i++)
  {
   if(disData>disData[i+1])
   {
    t=disData;
    disData=disData[i+1];
    disData[i+1]=t;
   }
   }
}
return (disData[2]+disData[3]+disData[4])/3;
}

//測(cè)量距離
float MeasuringDistance()
{
//最大定時(shí)時(shí)間約65ms
TH0=0;
TL0=0;

//生成20us的脈沖寬度的觸發(fā)信號(hào)
Trig=1;   
Delay20us();
Trig=0;

//等待回響信號(hào)變高電平
while(!Echo);
TR0=1;  //啟動(dòng)定時(shí)器0

//等待回響信號(hào)變低電平
while(Echo);  
TR0=0;  //關(guān)閉定時(shí)器0

//返回距離值(mm)
return (SPEEDSOUND*XTALTIME*((float)TH0*256+(float)TL0))/2000;
}

//HCSR04初始化
void HCSR04_Initialize()
{
//計(jì)算單片機(jī)計(jì)數(shù)周期  晶振=11.953M 單位us
XTALTIME=12/11.953;
//溫度25度時(shí)聲速的值
SPEEDSOUND=334.1+25*0.61;   
Trig=0;
Echo=0;
TMOD=0x01;
}

//輸出距離值到LCD1602上
void DisplayDistanceValue(float dat)
{
uchar i=0,j=0,len;
uint value;
value=(uint)dat;
//范圍檢查大于4000mm和小于20mm都為超出測(cè)量范圍
if(value>4000)
{
  LCD_Display_String(Prompts[1],0x00);
  LCD_Display_String(Prompts[2],0x40);
  //Beep(2);
}
else if(value<20)
{
  LCD_Display_String(Prompts[1],0x00);
  LCD_Display_String(Prompts[3],0x40);
  //Beep(2);
}
else
{
  //將數(shù)值轉(zhuǎn)換成字符串
  len=UnsigedIntToString(value);
  //保留1位小數(shù)
  while(stringBuf!='\0')
  {
   if(len-j==1)
   {
    DistanceText[6+j]='.';
    j++;
   }else
   {
    DistanceText[6+j]=stringBuf;
    i++;
    j++;
   }
  }
  DistanceText[6+j]='c';
  j++;
  DistanceText[6+j]='m';
  i=7+j;
  //剩余位置補(bǔ)空格
  while(i<16)
  {
   DistanceText=' ';
   i++;
  }
  //LCD_Display_String(Prompts[0],0x00);
  LCD_Display_String(DistanceText,0x40);
}
}

//顯示溫度值
void DisplayTemperatureValue()
{
TemperatureText[13]=CurTempInteger/10+'0';
TemperatureText[14]=CurTempInteger+'0';
TemperatureText[15]='C';
LCD_Display_String(TemperatureText,0x00);  
}

//將無(wú)符號(hào)的整數(shù)轉(zhuǎn)成字符串,返回字符串長(zhǎng)度
uchar UnsigedIntToString(uint value)
{
uchar i=0,t,length;
//從個(gè)位開(kāi)始轉(zhuǎn)換
do
{
  stringBuf='0'+value;
  value=value/10;
  i++;
}while(value!=0);
length=i;
//將字符串顛倒順序
for(i=0;i<(length/2);i++)
{
  t=stringBuf;
  stringBuf=stringBuf[length-i-1];
  stringBuf[length-i-1]=t;
}
stringBuf[length]='\0';
return length;
}

//蜂鳴器

//延時(shí)函數(shù) 毫秒 @12.000MHz
void DelayMS(uint ms)
{
uchar i, j;
while(ms--)
{
  _nop_();
  i = 2;
  j = 239;
  do
  {
   while (--j);
  }while (--i);
}
}

//延時(shí)函數(shù) 20微秒 @12.000MHz
void Delay20us()
{
uchar i;
_nop_();
i = 7;
while (--i);
}

//定時(shí)器0中斷
void Timer0() interrupt 1
{

}

//DS18B20代碼:


#include
#include


#define uchar unsigned char  //無(wú)符號(hào)8位
#define uint unsigned int   //無(wú)符號(hào)16位

//定義DS18B20端口DS18B20_DQ
sbit DS18B20_DQ = P2^7;

//當(dāng)前采集的溫度值整數(shù)部分
int xdata CurTempInteger;
//當(dāng)前采集的溫度值小數(shù)部分
int xdata CurTempDecimal;


void Delayus(uint count)  
{
while (--count);
}


uchar Reset_DS18B20()
{
uchar status;
DS18B20_DQ=1;
Delayus(1);
//開(kāi)始復(fù)位過(guò)程
DS18B20_DQ=0;  //數(shù)據(jù)線拉低
Delayus(100);  //延時(shí)480us-960us
DS18B20_DQ=1;  //數(shù)據(jù)線拉高
Delayus(10);  //延時(shí)15us-60us
status=DS18B20_DQ; //讀取數(shù)據(jù)線上的狀態(tài)
Delayus(120);
return status;
}


void  WriteByteToDS18B20(uchar dat)
{
uchar i;
for(i=0;i<8;i++)
{
  DS18B20_DQ=0;
  DS18B20_DQ=dat&0x01;   //發(fā)送1位數(shù)據(jù)
  Delayus(15);      //延時(shí)60us以上
  DS18B20_DQ=1;      //釋放總線,等待總線恢復(fù)
  dat>>=1;       //準(zhǔn)備下一位數(shù)據(jù)
}
}


uchar ReadByteFromDS18B20()
{
uchar i,dat=0;
for(i=0;i<8;i++)
{

  DS18B20_DQ=0;      //拉低總線,產(chǎn)生讀信號(hào)
  dat>>=1;
  DS18B20_DQ=1;     //釋放總線,準(zhǔn)備讀1位數(shù)據(jù)   
Delayus(2);     //延時(shí)4us
  if(DS18B20_DQ) dat|=0x80; //合并每位數(shù)據(jù)
  Delayus(15);     //延時(shí)60us
  DS18B20_DQ=1;     //拉高總線,準(zhǔn)備讀下1位數(shù)據(jù)
}
return dat;
}


void ReadTemperatureFromDS18B20()
{
uchar flag=0;//正負(fù)符號(hào)標(biāo)志
//存儲(chǔ)當(dāng)前采集的溫度值
uchar TempValue[]={0,0};
if(Reset_DS18B20())
{
  CurTempInteger=255;
  CurTempDecimal=0;
}
else
{
  WriteByteToDS18B20(0xCC);//跳過(guò)ROM命令
  WriteByteToDS18B20(0x44);//溫度轉(zhuǎn)換命令
  Reset_DS18B20();//復(fù)位
  WriteByteToDS18B20(0xCC);//跳過(guò)ROM命令
  WriteByteToDS18B20(0xBE);//讀取溫度暫存器命令
  TempValue[0]=ReadByteFromDS18B20();//先讀低字節(jié)溫度值
  TempValue[1]=ReadByteFromDS18B20();//后讀高字節(jié)溫度值
  Reset_DS18B20();//復(fù)位

  //計(jì)算溫度值
  //先進(jìn)行正溫度與負(fù)溫度判斷,高5位全為1(0xF8)則為負(fù)數(shù)
  if((TempValue[1]&0xF8)==0xF8)
  {
   //負(fù)溫度計(jì)算:取反加1,低字節(jié)為0時(shí),高字節(jié)取反加1,否則不需要。
   TempValue[1]=~TempValue[1];
   TempValue[0]=~TempValue[0]+1;
   if(TempValue[0]==0x00) TempValue[1]++;
   flag=1;//負(fù)數(shù)標(biāo)志
  }
  //將溫度值分為整數(shù)和小數(shù)兩部分存儲(chǔ)(默認(rèn)為12位精度)
  CurTempInteger=((TempValue[1]&0x07)<<4)|((TempValue[0]&0xF0)>>4);   if(flag) CurTempInteger=-CurTempInteger;
  CurTempDecimal=(TempValue[0]&0x0F)*625;
}
}

//LCD1602程序代碼:

#include
#include


#define uchar unsigned char
#define uint  unsigned int
#define Delay4us(){_nop_();_nop_();_nop_();_nop_();}


sbit LCD_RS=P2^0;
sbit LCD_RW=P2^1;
sbit LCD_EN=P2^2;


void LCDDelay(uint ms)
{
uchar i, j;
while(ms--)
{
  _nop_();
  i = 2;
  j = 239;
  do
  {
   while (--j);
  }while (--i);
}  
}


bit LCD_Busy_Check()
{
bit result;
LCD_RS=0; LCD_RW=1; LCD_EN=1;
Delay4us();
result=(bit)(P0&0x80);
LCD_EN=0;
return result;
}


void Write_LCD_Command(uchar cmd)
{
while(LCD_Busy_Check());
LCD_RS=0; LCD_RW=0;  LCD_EN=0; _nop_(); _nop_();
P0=cmd; Delay4us();
LCD_EN=1; Delay4us(); LCD_EN=0;
}


void Write_LCD_Data(uchar dat)
{
while(LCD_Busy_Check());
LCD_RS=1;LCD_RW=0;LCD_EN=0;
P0=dat;Delay4us();
LCD_EN=1;Delay4us();LCD_EN=0;
}


void LCD_Set_POS(uchar pos)
{
Write_LCD_Command(pos|0x80);
}


void LCD_Initialize()
{
Write_LCD_Command(0x01); LCDDelay(5);
Write_LCD_Command(0x38); LCDDelay(5);
Write_LCD_Command(0x0C); LCDDelay(5);
Write_LCD_Command(0x06); LCDDelay(5);
}


void LCD_Display_String(uchar *str, uchar LineNo)
{
uchar k;
LCD_Set_POS(LineNo);
for(k=0;k<16;k++)
{
  Write_LCD_Data(str[k]);
}
}



void LCD_Display_OneChar(uchar Dat, uchar X, uchar Y)
{
Y &= 0x01; //限制Y不能大于1(2行,0-1)
X &= 0x0F;  //限制X不能大于15(16個(gè)字符,0-15)
if(Y) {X |= 0x40;} //當(dāng)要在第二行顯示時(shí)地址碼+0x40;
X |= 0x80; //算出指令碼
Write_LCD_Command(X);
Write_LCD_Data(Dat);
}

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:81768 發(fā)表于 2015-6-1 20:49 | 只看該作者
謝謝你,這對(duì)我?guī)椭艽?墒俏矣幸粋(gè)問(wèn)題:為什么把蜂鳴器報(bào)警的給刪了?有仿真圖嗎?
回復(fù)

使用道具 舉報(bào)

板凳
ID:98657 發(fā)表于 2016-3-3 17:31 | 只看該作者
你好,請(qǐng)問(wèn)你有用過(guò)霍爾傳感器測(cè)距的嗎,能否發(fā)份代碼給我看看,謝謝
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表