成功的超声波测距C源程序_第1页
成功的超声波测距C源程序_第2页
成功的超声波测距C源程序_第3页
成功的超声波测距C源程序_第4页
成功的超声波测距C源程序_第5页
已阅读5页,还剩1页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、成功的超声波测距C源程序.c#include <REG2051.H> /成功的源程序 P1.0-P1.7分别是数码管的A-H段码#define k1 P3_4 /晶振采用12M,P1口为数码管段输出口,P3.0P3.2为数码管位输出口,P3.5超声波发送输出,P3.7超声波接收。#define csbout P3_5 /超声波发送#define csbint P3_7 /超声波接收#define csbc=0.034 /声速340米每秒. 在电路图中的发射变压器是用电子镇流器的磁环,初级绕15匝,次级绕180匝后接发射头#define bg P3_3unsigned char cs

2、bds,opto,digit,buffer3,xm1,xm2,xm0,key,jpjs;/显示标识unsigned charconvert10=0x3F,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f;/09段码unsigned int s,t,i, xx,j,sj1,sj2,sj3,mqs,sx1;bit cl;void csbcj();void delay(j); /延时函数void scanLED(); /显示函数 void timeToBuffer(); /显示转换函数 void keyscan();void k1cl();void k2cl(

3、);void k3cl();void k4cl();void offmsd();void main() /EA=1; /TMOD=0x11; /定时ET0=1; /ET1=1; /TH0=0x00;TL0=0x00;TH1=0x9E;TL1=0x57;csbds=0;csbint=1;csbout=1;cl=0;opto=0xff;jpjs=0;sj1=45;sj2=200;sj3=400;k4cl(); 主函数 开中断 设定时器0为计数,设定时器定时器0中断允许 定时器1中断允许 1TR1=1;while(1)keyscan();if(jpjs<1)csbcj();if(s>sj

4、3)buffer2=0x76; /超出测量范围,显示HHH buffer1=0x76; /超出测量范围,显示HHH buffer0=0x76; /超出测量范围,显示HHH else if(s<sj1)buffer2=0x40; /初始化显示000buffer1=0x40; /初始化显示000buffer0=0x40; /初始化显示000else timeToBuffer();else timeToBuffer(); /将值转换成LED段码 offmsd();scanLED(); /显示函数if(s<sj2)bg=0;bg=1;void scanLED() /显示功能模块 digit

5、=0x04;for( i=0; i<3; i+) /3位数显示P3=digit&opto; /依次显示各位数 P1=bufferi; /显示数据送P1口 delay(20); /延时处理P1=0xff; /P1口置高电平(关闭) if(P3&0x10)=0) /判断3位是否显示完 key=0;digit>>=1; /循环右移1位 void timeToBuffer() /转换段码功能模块 xm0=s/100;xm1=(s-100*xm0)/10;xm2=s-100*xm0-10*xm1;buffer2=convertxm2;buffer1=convertxm1

6、;buffer0=convertxm0;void delay(i)while(-i);void timer1int (void) interrupt 3 using 2 TH1=0x9E;TL1=0x57;csbds+;if(csbds>=40)csbds=0;cl=1;void csbcj()if(cl=1)TR1=0;TH0=0x00;TL0=0x00;i=10;while(i-)csbout=!csbout;TR0=1;i=mqs; / while(i-)i=0;while(csbint)i+;if(i>=2450) / csbint=0;TR0=0; 盲区 上限值TH1=0

7、x9E;TL1=0x57;t=TH0;t=t*256+TL0;s=t*csbc/2;TR1=1;cl=0;void keyscan() /xx=0;if(k1!=1) / delay(400); / if(k1!=1) / while(!k1)delay(30); xx+;if(xx>2000) jpjs+;if(jpjs>4)jpjs=0;xx=0;switch(jpjs)case 1: k1cl();break; case 2: k2cl();break; case 3: k3cl();break; 健盘处理函数 判断开关是否按下 延时去抖动 判断开关是否按下case 4: k4cl();break;void k1cl()sj1=sj1+5;if(sj1>100)sj1=30;s=sj1;void k2cl()sj2=sj2+5;if(sj2>500)sj2=40;s=sj2;void k3cl()sj3=sj3+10;if(sj3>500)sj3=100;s

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论