標題: 超聲波測距并顯示在LCD1602模塊上 [打印本頁]
作者: 51heidianzi97    時間: 2018-3-18 22:57
標題: 超聲波測距并顯示在LCD1602模塊上
這是51單片機和超聲測距模塊US-100。顯示模塊是LCD1602。想學習超聲測距的同學，歡迎學習，共同進步。




以下是部分程序：

#include<reg51.h>
#include<intrins.h>
#include"lcd.h"
sbit Trig = P2^1;
sbit Echo = P2^0;

unsigned char PuZh[]=" Pechin Science ";
unsigned char code ASCII[15] =    {'0','1','2','3','4','5','6','7','8','9','.','-','M'};
static unsigned char DisNum = 0; //顯示用指針      
       unsigned int  time=0;
    unsigned long S=0;
    bit      flag =0;
    unsigned char disbuff[4]    ={ 0,0,0,0,};
/*******************************************************************************
* 函 數 名         : main
* 函數功能     : 主函數
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/
void Conut(void)
{
  time=TH0*256+TL0;
  TH0=0;
  TL0=0;

  S=(time*1.7)/100;     //算出來是CM
  if((S>=700)||flag==1) //超出測量范圍顯示“-”
  {  
   flag=0;
  
   DisplayOneChar(0, 1, ASCII[11]);
   DisplayOneChar(1, 1, ASCII[10]); //顯示點
   DisplayOneChar(2, 1, ASCII[11]);
   DisplayOneChar(3, 1, ASCII[11]);
   DisplayOneChar(4, 1, ASCII[12]); //顯示M
  }
  else
  {
   disbuff[0]=S%1000/100;
   disbuff[1]=S%1000%100/10;
   disbuff[2]=S%1000%10 %10;
   DisplayOneChar(0, 1, ASCII[disbuff[0]]);
   DisplayOneChar(1, 1, ASCII[10]); //顯示點
   DisplayOneChar(2, 1, ASCII[disbuff[1]]);
   DisplayOneChar(3, 1, ASCII[disbuff[2]]);
   DisplayOneChar(4, 1, ASCII[12]); //顯示M
  }
}
void zd0() interrupt 1    //T0中斷用來計數器溢出,超過測距范圍
  {
    flag=1;        //中斷溢出標志
  }
void  StartModule()            //啟動模塊
  {
   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;
  }

void delayms(unsigned int ms)
{
unsigned char i=100,j;
for(;ms;ms--)
{
  while(--i)
  {
   j=10;
   while(--j);
  }
}
}
void main(void)
{
  TMOD=0x01;     //設T0為方式1，GATE=1；
  TH0=0;
  TL0=0;         
  ET0=1;             //允許T0中斷
  EA=1;      //開啟總中斷
InitLcd1602();
LcdShowStr(0,0,PuZh);
while(1)

程序 - 副本.zip

25.98 KB, 下載次數: 7, 下載積分: 黑幣 -5

作者: 陳Cc    時間: 2018-3-19 10:46
這么好的帖子，必須頂起！剛好在做著實驗



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