




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
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. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 网上零售平台入驻协议
- 农村林业资源开发与保护合作协议条款
- 行政心理学与企业战略的有效结合研究试题及答案
- 市政学备考试题及答案快速参考
- 施工团队效率分析试题及答案
- 行政管理与市政风险评估试题及答案
- 2025行政管理心理学考试复习要点试题及答案
- 行政管理的研究方法试题及答案
- 2025工程咨询合同大全
- 教育改革成功的内在支撑条件与策略探究
- 地七年级下册全册知识要点总复习-2024-2025学年七年级地理教学课件(人教版2024)
- 海洋能发电技术-中国海洋能发电技术(新能源发电技术)
- 创业大赛活动策划方案
- 西部计划考试试题及答案
- 【广安】2025上半年四川广安理工学院筹建处第一次招聘非事业编制专任教师15人笔试历年典型考题及考点剖析附带答案详解
- 2025医院护理面试题库及答案
- 2025新疆西北兴业城投集团有限公司岗位招聘(12人)笔试参考题库附带答案详解
- 餐厅供餐协议书范本
- 期中素养测评卷(试题)2024-2025学年五年级下册科学教科版
- 供水公司笔试试题及答案
- 2024年宝鸡市城投资产管理有限公司招聘真题
评论
0/150
提交评论