测频率膜厚仪程序.doc

测频率膜厚仪程序.doc

ID:50906074

大小:38.50 KB

页数:15页

时间:2020-03-15

测频率膜厚仪程序.doc_第1页
测频率膜厚仪程序.doc_第2页
测频率膜厚仪程序.doc_第3页
测频率膜厚仪程序.doc_第4页
测频率膜厚仪程序.doc_第5页
资源描述:

《测频率膜厚仪程序.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、此文档收集于网络,如有侵权,请联系网站删除#include#include#defineuintunsignedint#defineucharunsignedcharsignedlongcount=0;signedlonghoud,fq;signedlongk1,k2,k3;inti=0,x=0;sbitP2_4=P2^4;sbitRS=P2^5;sbitRW=P2^6;sbitE=P2^7;//数字ASCII码放在数组中//unsignedintshu[]={0x30,0x31,0x32,

2、0x33,0x34,0X35,0x36,0x37,0x38,0x39};unsignedintshu1[]={0x30,0x31,0x32,0x33,0x34,0X35,0x36,0x37,0x38,0x39};voiddelay(intcount)//延时{intp;while(count--)for(p=0;p<110;p++);}voidwrite_com(unsignedintn)//写指令{RS=0;P1=n;delay(5);E=1;delay(5);E=0;}voidwrite_data(unsignedcha

3、rt)//写数据{此文档仅供学习与交流此文档收集于网络,如有侵权,请联系网站删除RS=1;P1=t;delay(5);E=1;delay(5);E=0;}voidtime1_int(void)interrupt3{TH1=TL1=0;TR1=1;x++;}voidtime0_int(void)interrupt1{TH0=(65535-50000)/256;//装初值,定时50msTL0=(65535-50000)%256;i++;if(i==20)//1s时间已到{i=0;TR1=0;//关闭计数器1count=(6553

4、6*x+256*TH1+TL1)*1000;x=0;此文档仅供学习与交流此文档收集于网络,如有侵权,请联系网站删除if(k1==1){fq=2.65;}elseif(k2==1){fq=2.7;}elseif(k3==1){fq=3.97;}houd=0.123*(6000000-count)/fq;TH1=TL1=0;//重新装初值TR1=1;//重新启动计数器器}}voidshow(){write_com(0x85);write_data(shu[count/100000]);delay(5);//显示十万位write_

5、com(0x86);write_data(shu[(count/10000)%10]);delay(5);//显示万位write_com(0x87);write_data(shu[(count/1000)%10]);delay(5);//显示千位write_com(0x88);write_data(shu[(count/100)%10]);delay(5);//显示百位write_com(0x89);write_data(shu[(count/10)%10]);delay(5);//显示十位write_com(0x8a);w

6、rite_data(shu[count%10]);delay(5);//显示个位write_com(0x83);write_data(0x66);delay(5);//显示频率表示的字符f此文档仅供学习与交流此文档收集于网络,如有侵权,请联系网站删除write_com(0x84);write_data(0x3d);delay(5);//显示字符=write_com(0x8b);write_data(0x48);delay(5);//显示字母Hwrite_com(0x8c);write_data(0x7a);delay(5);

7、//显示字母zwrite_com(0xc5);write_data(shu1[houd/100000]);delay(5);//显示十万位write_com(0xc6);write_data(shu1[(houd/10000)%10]);delay(5);//显示万位write_com(0xc7);write_data(shu1[(houd/1000)%10]);delay(5);//显示千位write_com(0xc8);write_data(shu1[(houd/100)%10]);delay(5);//显示百位writ

8、e_com(0xc9);write_data(shu1[(houd/10)%10]);delay(5);//显示十位write_com(0xca);write_data(shu1[houd%10]);delay(5);//显示个位write_com(0xc3);write_data(0x6

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。