51单片机超声波测距程序
《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. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 北大纵横-湖北东方化学工业-管理咨询项目建议书课件
- SPSS的认识和基本运用课件
- 房地产企业集团化管控
- Section-B-1最新版新目标七年级pptUnit-7全国青年教师素养大赛一等奖课件
- 戴德梁行深圳市中山公园项目服务建议书
- 房地产项目入伙管理与工程质量投诉集中处理方法要点
- 北大纵横——某房地产公司人力资源-课件
- spss统计(卡方检验和t检验)课件
- 户内燃气设施隐患及事故性质判断课件
- 北大纵横××集团人力资源战略教学课件
- 地产设计部流程进度管理教学课件
- 房地产置业顾问拓客技巧及执行
- 等比数列的概念与通项公式2ppt课件
- 北大纵横-鞍钢新轧-企业文化诊断报告课件
- 递推递归的复杂性分析课件