- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
AT89S52超声波模块程序
超声波模块程序
#includereg52.h
#includeintrins.h
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long
uint c=340;
ulong l,time;
char i=1,j=1,k=80,aa;
char t,tp=10,ts,tg,lb,ls,lg,lsf,fh,cb,cs,cg;
sbit RW=P2^1;
sbit RS=P2^0;
sbit E=P2^2;
sbit rece=P3^3;
sbit k2=P1^1;
sbit k1=P1^0;
sbit k3=P1^2;
sbit k4=P1^3;
sbit sg=P3^7;
sbit ctl=P3^5;
void delay(uint i)
{while(i--);
}
void writercom(uchar q)
{E=1;
RS=0;
RW=0;
P0=q;
E=0;
delay(20);
}
void writerdata(uchar o)
{
E=1;
RS=1;
RW=0;
P0=o;
E=0;
delay(20);
}
void writer_d(uchar *u)
{while(*u)
writerdata(*u++);
}
void xsinit(void)
{writercom(0x01);
writercom(0x38);
writercom(0x0c);
writercom(0x06);
}
void inptt()
{while(1)
{ if(k2==0) {tp++;if(tp=99)tp=99;}
delay(7000);
if(k1==0){tp--;if(tp=(-30))tp=(-30);}
delay(7000);
t=tp;
if(t0){fh=0x2d;t=~t+1;}
else{fh=0x20;}
ts=t/10;
tg=t%10;
writercom(0x80);
writer_d( T:);
writerdata(fh);
writerdata(ts+0x30);
writerdata(tg+0x30);
writerdata(0xdf);
writer_d(C );
writercom(0xba);
writer_d(Press K4 finish );
if(k4==0)break;
}
}
void sen()
{uchar times=0;
TMOD=0x12;
IE=0x84;
TH0=244;
TL0=244;
TR0=1;
TR1=1;
while(1)
{while(TF0==0);
sg=~sg;
times++;
TF0=0;
if(times==20)break;}
TR0=0;
times=0;
}
rec()interrupt 2 using 2
{TR1=0;
ctl=0;
time=TH1*256+TL1;
l=time*c/2;
TH1=0;
TL1=0;
}
void dataxs()
{if(tp=10)c=338+(tp-10)*0.6;
else c=338+(10-tp)*0.6;
cb=c/100;
cs=c%100/10;
cg=c%100%10;
lb=l/1000000;
ls=l%1000000/100000;
lg=l%1000000%100000/10000;
/******显示********/
writercom(0x80);
if(l=360000)writer_d(too near! );
else if(TH1=93)writer_d(too long! );
else {writer_d(L=);
writerdata(.);
writerdata(ls+0x30);
writerdata(lg+0x30);
writer_d(m );
writer_d(c=);
writerdata(cb+0x30);
writerdata(cs+0x30);
writerdata(cg+0x30);
writer_d(m/s );
}
}
void unauto()
{while(i)
{while(k--)
{writercom(0xba);
writer_d(Press K4 measure);
if(k4==0||k3==0){
您可能关注的文档
最近下载
- 道德与法治六年级上册第四单元 法律保护我们健康成长 大单元整体学历案教案 教学设计附作业设计(基于新课标教学评一致性).docx VIP
- 论实验动物的质量管理与控制.docx VIP
- (2024秋新版)北师大版一年级数学上册《可爱的校园》PPT课件.pptx VIP
- 《批判与创意思考》 教材配套PPT 第三章 是什么阻碍了你的思考.pptx VIP
- 麻疹病例教育课件.pptx VIP
- 第九章 冷热疗法课件.ppt VIP
- 2025年秋季新教材部编版小学道德与法治二年级上册全册道法最新教案(教学设计).docx
- 《旅游地理学》全套教学课件.ppt
- 汇德大厦材料二次转运方案.pdf VIP
- 城市公共空间设计教学提纲.ppt VIP
文档评论(0)