欢迎来到天天文库
浏览记录
ID:56100807
大小:70.00 KB
页数:2页
时间:2020-06-19
《基于51单片机的测速模块数码管显示.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、#include#defineucharunsignedchar#defineuintunsignedintsbitdula=P2^6;sbitwela=P2^7;uintshi,ge,pp,val;unsignedcharcodetable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};voiddelay(uintcount){uinti,j;for(i=0;i2、voiddisplay(uintshi,uintge){P0=table[shi];dula=1;dula=0;P0=0xfe;wela=1;wela=0;delay(5);P0=table[ge];dula=1;dula=0;P0=0xfd;wela=1;wela=0;delay(5);}uintread(){uchartl,th1,th2;uintval;while(1){th1=TH0;tl=TL0;th2=TH0;if(th1==th2)break;}val=th1*256+tl;returnv3、al;}voidInit(){ET1=1;TR1=1;EA=1;TH1=(65536-46080)/256;TL1=(65536-46080)%256;}voidmain(){floata,b;uintnum;TMOD=0x15;TH0=0;TL0=0;TR0=1;Init();while(1){if(pp==20){pp=0;num=read();//脉冲个数TH0=0;TL0=0;}a=num/20.0;//转速b=3.14*a*6*10;//速度cm/sshi=b/100;ge=(b-100*sh4、i)/10;display(shi,ge);}}voidtime1()interrupt3{TH1=(65536-46080)/256;TL1=(65536-46080)%256;pp++;}
2、voiddisplay(uintshi,uintge){P0=table[shi];dula=1;dula=0;P0=0xfe;wela=1;wela=0;delay(5);P0=table[ge];dula=1;dula=0;P0=0xfd;wela=1;wela=0;delay(5);}uintread(){uchartl,th1,th2;uintval;while(1){th1=TH0;tl=TL0;th2=TH0;if(th1==th2)break;}val=th1*256+tl;returnv
3、al;}voidInit(){ET1=1;TR1=1;EA=1;TH1=(65536-46080)/256;TL1=(65536-46080)%256;}voidmain(){floata,b;uintnum;TMOD=0x15;TH0=0;TL0=0;TR0=1;Init();while(1){if(pp==20){pp=0;num=read();//脉冲个数TH0=0;TL0=0;}a=num/20.0;//转速b=3.14*a*6*10;//速度cm/sshi=b/100;ge=(b-100*sh
4、i)/10;display(shi,ge);}}voidtime1()interrupt3{TH1=(65536-46080)/256;TL1=(65536-46080)%256;pp++;}
此文档下载收益归作者所有