51單片機(jī)超聲波測(cè)距程序

1、/超聲波測(cè)距，測(cè)距范圍2cm-400cm;#include#include#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)代碼表*/uchar code list=0x3f , 0x06 , 0x5b , 0x4f , 0

2、x66 , 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;x0;x-)for(y=100;y0;y-);/*短延時(shí)函數(shù)*/void delay20us()uchar a;for(a=0;a100;a+);/*報(bào)警函數(shù)*/void be

3、er()/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;shi=distance%1000/100;ge=distance%100;xiaoshu=distance%10;d

4、ula=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=0xfe;wela=0;delay(1);/*被調(diào)用子函數(shù)*/void diaoyong()uint i;EA=0;ec

5、ho=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;i100;i+)/等待測(cè)量的結(jié)果display(distance);/用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è)定距離，并顯示distance=time*0.1720; display(distance);if(flag=0)/如果沒(méi)有進(jìn)入中斷，距離為0，同時(shí)燈閃爍distance=0;test=!test;