51單片機(jī)超聲波測(cè)距程序_第1頁
51單片機(jī)超聲波測(cè)距程序_第2頁
51單片機(jī)超聲波測(cè)距程序_第3頁
51單片機(jī)超聲波測(cè)距程序_第4頁
51單片機(jī)超聲波測(cè)距程序_第5頁
已閱讀5頁,還剩4頁未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、精選優(yōu)質(zhì)文檔-傾情為你奉上/超聲波測(cè)距,測(cè)距范圍2cm-400cm;#include<reg52.h>#include<intrins.h>#define uint unsigned int#define uchar unsigned charsbit trig=P10;sbit echo=P32;sbit test=P11;/測(cè)試燈sbit dula=P26;sbit wela=P27;sbit BEEP=P23;uint timeh,timel,distance;uint ge,shi,bai,xiaoshu,flag,time;/*共陰極數(shù)碼管不帶小數(shù)點(diǎn)代碼表*/

2、uchar code list=0x3f , 0x06 , 0x5b , 0x4f , 0x66 , 0x6d ,0x7d , 0x07 , 0x7f , 0x6f , 0x77 , 0x7c ,0x39 , 0x5e , 0x79 , 0x71 ;/*共陰極數(shù)碼管帶小數(shù)點(diǎn)代碼表*/uchar code listtwo = 0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef;/*長(zhǎng)延時(shí)函數(shù)*/void delay(uint z)uint x,y;for(x=z;x>0;x-)for(y=100;y>0;y-);/*短延時(shí)函數(shù)*/voi

3、d delay20us()uchar a;for(a=0;a<100;a+);/*報(bào)警函數(shù)*/void beer()/BEEP=0;delay(10);/*定時(shí)器初始化*/void initime0()TMOD=0x01;TH0=0;TL0=0;EA=0;ET0=0;EX0=0;/*外部中斷函數(shù)*/void estern() interrupt 0timeh=TH0;timel=TL0;beer();flag=1;/進(jìn)入中斷,標(biāo)志位就置1EX0=0;/同時(shí)關(guān)斷外部中斷和定時(shí)器 TR0=0;/*顯示函數(shù)*/void display(distance)bai=distance/1000;sh

4、i=distance%1000/100;ge=distance%100;xiaoshu=distance%10;dula=1;P0=listxiaoshu;dula=0;P0=0xff;wela=1;P0=0xf7;wela=0;delay(2);dula=1;P0=listtwoge;dula=0;P0=0xff;wela=1;P0=0xfb;wela=0;delay(2);dula=1;P0=listshi;dula=0;P0=0xff;wela=1;P0=0xfd;wela=0;delay(1);dula=1;P0=listbai;dula=0;P0=0xff;wela=1;P0=0xf

5、e;wela=0;delay(1);/*被調(diào)用子函數(shù)*/void diaoyong()uint i;EA=0;echo=1;/為了檢測(cè)電平的高低,首先必須拉高trig=1;delay20us();trig=0;while(echo=0);/如果進(jìn)入中斷 即接收到超聲波就向下執(zhí)行flag=0;/接收到就清除標(biāo)志位EA=1;/同時(shí)打開總中斷EX0=1;/打開外部中斷TR0=1;/開定時(shí)器TH0=0;/定時(shí)器清零TL0=0;for(i=0;i<100;i+)/等待測(cè)量的結(jié)果display(distance);/用100次顯示循環(huán)來延時(shí),解決數(shù)碼管顯示不亮問題/delay(50);/用延時(shí)函數(shù)數(shù)碼管閃爍TR0=0;/延時(shí)一段時(shí)間后關(guān)斷定時(shí)器EX0=0;/延時(shí)一段時(shí)間后關(guān)斷外部中斷if(flag=1)/如果進(jìn)入中斷,說明測(cè)距已經(jīng)測(cè)好time=timeh*256+timel;/計(jì)算測(cè)定距離,并顯示distance=time*0.1720; display(distance);if(flag=0)/如果沒有進(jìn)入中斷,距離為0,同時(shí)燈閃爍distance=0;test=!test;/*主函

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論