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

下載本文檔

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

文檔簡(jiǎn)介

1、/超聲波測(cè)距,測(cè)距范圍2cm-400cm;#in clude<reg52.h>#i ncludevi ntri ns.h>#defi ne uint un sig ned int#defi ne uchar un sig ned charsbit trig=P1A0;sbit echo二卩3八2;sbit test二PM1;/ 測(cè)試燈sbit dula=P2A6;sbit wela=P2A7;sbit BEEP二卩2八3;uint timeh,timel,dista nee;uint ge,shi,bai,xiaoshu,flag,time;/*共陰極數(shù)碼管不帶小數(shù)點(diǎn)代碼表*

2、/uchar code list=0x3f , 0x06,0x5 b , 0x4f ,0x66,0x6d ,0x7d , 0x07 ,0x7f , 0x6f , 0x77,0x7 c ,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ù)*/void delay

3、20us()uchar a;for(a=0;a<100;a+);/*報(bào)警函數(shù)*/void beer()/ BEEP=0;delay(10);/*定時(shí)器初始化*/ void in itimeO()TMOD=0x01;THO=O;TLO=O;EA=O;ET0=0;EXO=O;/*外部中斷函數(shù)*/void estern() in terrupt 0timeh=TH0;timel=TL0;beer();II進(jìn)入中斷,標(biāo)志位就置1/同時(shí)關(guān)斷外部中斷和定時(shí)器flag=1;EX0=0;TR0=0;/*顯示函數(shù)*/void display(dista nee)bai=dista nce/1000;shi

4、二dista nce%1000/100;ge二dista nce%100; xiaoshu二dista nce%10; dula=1;PO=listxiaoshu;dula=0;PO=Oxff;wela=1;P0=0xf7;wela=0;delay(2);dula=1;PO=listtwoge;dula=0;P0=0xff;wela=1;P0=0xfb;wela=0;delay(2);dula=1;P0=listshi;dula=0;PO=Oxff; wela=1; PO=Oxfd; wela=0; delay(1); dula=1; PO=listbai; dula=0;P0=0xff; w

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

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(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)論