欢迎来到天天文库
浏览记录
ID:51259304
大小:24.50 KB
页数:2页
时间:2020-03-20
《STC12C5A60S2单片机AD转换程序.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、STC12C5A60S2单片机AD转换程序转换结果显示在数码管上,数码管电路图如下#include#includeunsignedcharcodedofly[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};unsignedintnum,result;voiddelay(unsignedintcnt){unsignedchari;for(;cnt>0;cnt--)for(i=0;i<250;i++);}voiddisplay(uns
2、ignedintnum){unsignedcharn[5],i;n[0]=num%100000/10000;n[1]=num%10000/1000;n[2]=num%1000/100;n[3]=num%100/10;n[4]=num%10;for(i=0;i<5;i++){P0=dofly[n[i]];P2=i;delay(1);}P0=0x00;}unsignedcharad(){ADC_CONTR=0xC0;//开A/D转换电源,选择AD速度P1ASF=0x00;//选择P1.0作为A/D转换通道ADC_CONTR
3、=0x0
4、8;//启动A/D转换while((ADC_CONTR&0x10)==0);//等待A/D转换结束ADC_CONTR&=0xE7;//将ADC_FLAG清0return(ADC_RES);//保存A/D转换结果}main(){unsignedchari;TMOD=0x02;EA=1;ET0=1;TH0=0x06;TL0=0x06;TR0=1;while(1){for(i=0;i<10;i++){display(num);result+=ad();}num=result/10;result=0;}}
此文档下载收益归作者所有