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

QQ登錄

只需一步，快速開始

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

單片機(jī)超聲波測(cè)距（帶PCB工程和Proteus仿真程序）

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
使用HC-SR04超聲波模塊做了個(gè)超聲波測(cè)距器帶程序、原理圖、PCB和仿真
全部文件見附件
Altium Designer畫的原理圖和PCB圖如下：(51hei附件中可下載工程文件)


單片機(jī)超聲波測(cè)距仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


主程序如下（程序來自互聯(lián)網(wǎng)，本人僅做了部分修改，如有侵權(quán)，請(qǐng)聯(lián)系刪除）

//宏定義
#define uchar unsigned char
#define uint unsigned int
#define ULint unsigned long int
//溫度零上與零下的標(biāo)志位
char flag=0;
//超聲波
char flags=0;
//超聲波距離
char flag1s=0;
//計(jì)算定時(shí)間
uint time=0;
//計(jì)算距離
ULint L_=0;
//溫度
uint t_=0;
//顯示模式  0正常  1最小值調(diào)整  
uchar mode=0;

//uint Max=490;
uint Min=30;
//按鍵標(biāo)志
uchar k=0;
//數(shù)值有誤
uchar FW=0;
//頭函數(shù)
#include <reg52.h>
#include <intrins.h>
#include "BJ_Key.h"                    //報(bào)警按鍵
#include "display.h"                         //顯示頭函數(shù)
#include "ultrasonic_wave.h"//超聲波頭函數(shù)
#include "DS18B20.h"                    //溫度傳感器頭函數(shù)


//函數(shù)聲明
void delayms(uint ms);
//主函數(shù)
void main()
{
        Init_ultrasonic_wave();
        //屏幕初始化
        Init1602();
        //溫度初始化
        tmpchange();
        t_=tmp();
        tmpchange();
        t_=tmp();
        tmpchange();
        t_=tmp();

        //循環(huán)顯示
        while(1)
        {
                Key();
                //正常顯示
                if(mode==0)
                {
                        StartModule();//啟動(dòng)超聲波
                        while(!RX);          //當(dāng)RX為零時(shí)等待
                        TR0=1;                  //開啟計(jì)數(shù)
                        while(RX);          //當(dāng)RX為1計(jì)數(shù)并等待
                        TR0=0;                  //關(guān)閉計(jì)數(shù)
        
                        delayms(20);  //20MS
                        tmpchange();  //溫度轉(zhuǎn)換
                        t_=tmp();     //度溫度
                        Conut(t_/10); //計(jì)算距離
                        if(L_<Min)
                        {
                                Feng_Start();
                        }
                        
                        
                        
                        /*        if(FW=0)
                                Feng_Stop();
                        */
                        Display_1602(t_/10,L_);
                }
                //調(diào)整顯示
                else if(mode!=0)
                {
                        //最大最小值
                        Init_MaxMin();
                        while(mode!=0)
                        {
                                
                                Key();
                                /*if(k==1&&mode==1)
                                {
                                        Init_MaxMin();        
                                   write_com(0x8d);//設(shè)置位置                                       
                                }
                                */
                                 if(k==1&&mode==1)
                                {
                                        Init_MaxMin();        
                                   write_com(0x89);//設(shè)置光標(biāo)位置        
                                }
                                k=0;
                        }
                        //界面初始化
                        Init1602();
                }
        }
}

void delayms(uint ms)
{
        uchar i=100,j;
        for(;ms;ms--)
        {
                while(--i)
                {
                        j=10;
                        while(--j);
                }
        }
}


//T0中斷用來計(jì)數(shù)器溢出,超過測(cè)距范圍
/*void CJ_T0() interrupt 1
{
    flags=1;                                                         //中斷溢出標(biāo)志
}*/



全部資料51hei下載地址：
超聲波測(cè)距.zip (2.85 MB, 下載次數(shù): 431)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏13 分享淘帖 頂頂3 踩踩

相關(guān)帖子
回復(fù)

使用道具 舉報(bào)

來自 2#
ID:328014 發(fā)表于 2021-1-11 02:13 | 只看該作者
134125 發(fā)表于 2021-1-11 00:51
請(qǐng)問各位大佬 這種錯(cuò)誤是怎么回事？應(yīng)該怎么解決？

第一個(gè)錯(cuò)誤解決方法:http://www.torrancerestoration.com/bbs/dpj-201373-1.html
第2個(gè)錯(cuò)誤,需要升級(jí)Proteus到8.8版本才能解決,因?yàn)槟愕陌姹靖揪蜎]有超聲波這個(gè)元件

下圖是我修改后的效果圖:

51hei.png (31.5 KB, 下載次數(shù): 59)

51hei.png

51hei.png (24.86 KB, 下載次數(shù): 72)

51hei.png
回復(fù)

使用道具 舉報(bào)

板凳
ID:698602 發(fā)表于 2020-2-26 16:15 | 只看該作者
請(qǐng)問一下這一段是什么意思呢？
void delayms(uint ms)
{
        uchar i=100,j;
        for(;ms;ms--)
        {
                while(--i)
                {
                        j=10;
                        while(--j);
                }
        }
}
回復(fù)

使用道具 舉報(bào)

地板
ID:562074 發(fā)表于 2020-3-22 18:00 | 只看該作者
感謝大佬
回復(fù)

使用道具 舉報(bào)

5#
ID:715632 發(fā)表于 2020-3-29 15:46 | 只看該作者
大佬們下載下來之后仿真文件protues打不開怎么解決啊
回復(fù)

使用道具 舉報(bào)

6#
ID:737796 發(fā)表于 2020-4-25 16:09 | 只看該作者
感謝大佬,好資料，51黑有你更精彩!!!
回復(fù)

使用道具 舉報(bào)

7#
ID:756694 發(fā)表于 2020-6-14 11:45 | 只看該作者
下載后仿真有溫度顯示，調(diào)整距離沒反應(yīng)是什么情況
回復(fù)

使用道具 舉報(bào)

8#
ID:769694 發(fā)表于 2020-6-25 17:38 | 只看該作者
非常棒，很有參考價(jià)值
回復(fù)

使用道具 舉報(bào)

9#
ID:495287 發(fā)表于 2020-6-26 15:17 | 只看該作者
非常好的參考資料，謝謝分享。
回復(fù)

使用道具 舉報(bào)

10#
ID:876191 發(fā)表于 2021-1-11 00:51 | 只看該作者
請(qǐng)問各位大佬 這種錯(cuò)誤是怎么回事？應(yīng)該怎么解決？

Y70}8318JC66P6$2YRBUAZ6.png (47.91 KB, 下載次數(shù): 51)

Y70}8318JC66P6$2YRBUAZ6.png
回復(fù)

使用道具 舉報(bào)

11#
ID:825679 發(fā)表于 2021-2-4 20:50 | 只看該作者
感謝大佬分享，收獲頗深
回復(fù)

使用道具 舉報(bào)

12#
ID:830316 發(fā)表于 2021-2-6 09:11 | 只看該作者
2girder 發(fā)表于 2020-2-26 16:15
請(qǐng)問一下這一段是什么意思呢？
void delayms(uint ms)
{

延時(shí)函數(shù)
回復(fù)

使用道具 舉報(bào)

13#
ID:750686 發(fā)表于 2021-2-24 13:17 | 只看該作者
程序不正確運(yùn)行不了怎么解決大佬
回復(fù)

使用道具 舉報(bào)

14#
ID:894056 發(fā)表于 2021-3-20 09:06 | 只看該作者
大佬，修改了端口燒進(jìn)了普中89系列的板子和超聲波模塊進(jìn)行實(shí)物仿真，但是不能實(shí)現(xiàn)效果，想請(qǐng)問一下，有沒有可能是因?yàn)槌暡K上的TX，RX沒有分別接在單片機(jī)的RX ，TX端？
回復(fù)

使用道具 舉報(bào)

15#
ID:92810 發(fā)表于 2021-5-26 11:38 | 只看該作者
謝謝大佬分享了，下載學(xué)習(xí)了
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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