51单片机超声波测距程序

上传人:彩*** 文档编号:73135719 上传时间:2022-04-11 格式:DOC 页数:9 大小:54.50KB
收藏 版权申诉 举报 下载
51单片机超声波测距程序_第1页
第1页 / 共9页
51单片机超声波测距程序_第2页
第2页 / 共9页
51单片机超声波测距程序_第3页
第3页 / 共9页
资源描述:

《51单片机超声波测距程序》由会员分享,可在线阅读,更多相关《51单片机超声波测距程序(9页珍藏版)》请在装配图网上搜索。

1、标准实用文案/ 超声波测距,测距范围 2cm-400cm; #include #include#define uint unsigned int#define uchar unsigned charsbit trig=P10;sbit echo=P32;sbit test=P11;/ 测试灯sbit dula=P26;sbit wela=P27;sbit BEEP=P23;uint timeh,timel,distance;uint ge,shi,bai,xiaoshu,flag,time;/* 共阴极数码管不带小数点代码表*/文档标准实用文案uchar code list=0x3f, 0x0

2、6 , 0x5b , 0x4f ,0x66 , 0x6d ,0x7d , 0x07 ,0x7f, 0x6f , 0x77 , 0x7c ,0x39 , 0x5e , 0x79 , 0x71 ;/* 共阴极数码管带小数点代码表*/uchar code listtwo = 0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef;/* 长延时函数 */void delay(uint z)uint x,y;for(x=z;x0;x-)for(y=100;y0;y-);文档标准实用文案/* 短延时函数 */void delay20us()uchar a;for

3、(a=0;a100;a+);/* 报警函数 */void beer()/ BEEP=0;delay(10);/* 定时器初始化 */void initime0()TMOD=0x01;TH0=0;文档标准实用文案TL0=0;EA=0;ET0=0;EX0=0;/* 外部中断函数 */void estern() interrupt 0timeh=TH0;timel=TL0;beer();flag=1;/ 进入中断,标志位就置1EX0=0;/ 同时关断外部中断和定时器TR0=0;/* 显示函数 */void display(distance)文档标准实用文案bai=distance/1000;shi=

4、distance%1000/100;ge=distance%100;xiaoshu=distance%10;dula=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;

5、P0=0xfe;wela=0;delay(1);文档标准实用文案/* 被调用子函数 */void diaoyong()uint i;EA=0;echo=1;/ 为了检测电平的高低,首先必须拉高trig=1;delay20us();trig=0;while(echo=0);/ 如果进入中断即接收到超声波就向下执行flag=0;/ 接收到就清除标志位EA=1;/ 同时打开总中断EX0=1;/ 打开外部中断TR0=1;/ 开定时器TH0=0;/ 定时器清零TL0=0;for(i=0;i100;i+)/ 等待测量的结果文档标准实用文案display(distance);/ 用 100 次显示循环来延时

6、,解决数码管显示不亮问题/delay(50);/ 用延时函数数码管闪烁TR0=0;/ 延时一段时间后关断定时器EX0=0;/ 延时一段时间后关断外部中断if(flag=1)/ 如果进入中断,说明测距已经测好time=timeh*256+timel;/计算测定距离,并显示distance=time*0.1720;display(distance);if(flag=0)/ 如果没有进入中断,距离为0,同时灯闪烁distance=0;test=!test;/* 主函数 */文档标准实用文案void main()initime0();test=0;trig=0;EA=1;while(1)diaoyong();display(distance);文档

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

copyright@ 2023-2025  zhuangpeitu.com 装配图网版权所有   联系电话:18123376007

备案号:ICP2024067431-1 川公网安备51140202000466号


本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知装配图网,我们立即给予删除!