超聲波測(cè)距程序

1、我的超聲波測(cè)距程序（近距離）2009-08-06 21:16/*發(fā)射端用3組反相器功率放大接收端350倍放大有效距離10cm到70cm誤差范圍-3mm+3mmIO端口P1.0用于產(chǎn)生發(fā)送端脈沖由于校準(zhǔn)條件不行，本程序還未校準(zhǔn)過，但精度已達(dá)到，如本程序?qū)Ω魑慌笥延兴鶐椭?，?qǐng)自行校準(zhǔn)過*/#include#include #define uchar unsigned char#define uint unsigned int/#define V 347.889sbit FB = P10; /產(chǎn)生方波bit csover,first;uint avr;float ls; /上一次采樣值idata u

2、int distance11;float lenth;float ceju();void delayms(unsigned char ms) / 延時(shí)子程序 約1msunsigned char i;while(ms-) for(i = 0; i 124; i+);void delay() / 延時(shí)子程序 約150us uchar i;for(i = 0; i 15; i+);void INT0_INT() interrupt 0 TR0=0; EX0=0; IE0=0; csover=1;void timer1_int() interrupt 3 TH1=60536/256; TL1=6053

3、6%256; lenth=ceju();void init_ceju() uchar i; for(i=0;i11;i+) distancei=0; for(i=0;i0) t-; if(t=0) return (0x00); else time=TH0*256+TL0+12; csover=0; TH0=0; TL0=0; for(i=0;i11;i+) distancei=distancei+1; distance10=time; for(i=0;i11;i+) timi=distancei; for(i=0;i10;i+) for(j=i+1;jtimj) temp=timi; timi=timj; timj=temp; else ; for(i=3;i8;i+) sum+=timi; avr=sum/5; k=0; for(i=3;i8;i+) if(timiavr-5) temk+=timi; sum=0; avr=0; for(i=0;i10) k=9; if(first=1) ls=s; return (s); else if(s-ls0.15)|(ls-s0.15) return (ls); else ls=s; return (s); else return (0x00); void main() first=1; TMOD=0x11; EA=1; init_