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

1、#includereg51#include#define uchar unsigned char#define uint unsigned int#define ulong unsigned long/ sbit speaker二F2八4 ;sbit Pl_0二F0;data uchar testok;uchar codeLEDData = 0 xC0, 0 xF9, 0 xA4, OxBO, 0 x99, 0 x92, 0 x82, 0 xF8, 0 x80, 0 x90;a, b, c, d, i ;data ulong time;void delay(uchar k)while(k-)L

2、nop_();void delaylm(int x)ucharP2 &= 0 x3比int p, q;for(p=0;p=x;p+) for(q=l;q=120;q+);display ()/ a=l;b=2;c=3;d=4;PO = OxFF;P2 = OxEO;P2&二OxlF;PO = LEDDatad;P2 = OxEO;P2 &= OxlF;PO = OxlO;P2二OxCO;P2二OxEO;delaylm(4);PO = LEDDatac;P2二OxEO;P2&二OxlF;PO二0 x20;P2 |= OxCO;P2&二0 x3F; delaylm(4);PO = LEDDataE

3、b;P2二OxEO;P2&二OxlF;PO二0 x40;P2 |= OxCO;P2&二0 x3F; delaylm(4);PO = LEDDataa;P2&二OxlF;PO = 0 x80;P2二OxCO;TRI二1;P2&二0 x3F;delaylm(4);void main(void)PO二Oxff;P2=0 xff;TMOD二0 x21;/ IE二0 x80;testok二0;EA二1; / TH1二0 xf2;TLl=0 xf2;ET1二1;time /=10;ETO二1;/ THO二OxOO;/ TLO二0 x00;/ ETO二1;/ TRO二1;/ EXO二1;while(1)if

4、(testok=l)time二time*1. 72; time二time/100;/ time二1234;a=time%10;/* time /=10;b=time%10;c=time%10;time/二10;/ a二b二c二d二0;d=time%10;*/b= (time%100-a)/10;c=(time%1000-b*10-a)/100;d=(time%10000-c*100-b*10-a)/1000;display ();THl=0 xf2;TL1二0 xf2;ET1二1;TRI二1;EXO二1;testok=0;/ if (testok=2)THl=Oxf2;/ TL1二0 xf2;/ ET1二1;/ TRI二1;/ EXO二1;/ testok二0;/ void cs_r(void) interrupt 0 TRO二0;/ ETO二0;EXO二0;TRI二0;ET1二0;THl=Oxf2;/ EA二0;/speaker二0;testok=l;time二THO256+TL0;void overtime(void)TRO二0;/ ETO二0;EXO二0;TRI二0;ET1二0;/ EA二0;/speaker二0;THl=0 xf2;TLl=0 xf2;ET1二1;interrupt 1EXO二1;TRI二1;testok二0;void cs_s2(void)