資源簡介
初學者必學的AD轉換電路以及C程序。本電路基于89C51單片機,以及經典轉換模塊ADC0808和數碼管顯示的PROTUES電路仿真圖以及對應的利用延遲函數或者中斷函數實現的C程序。

代碼片段和文件信息
#include?
#include
unsigned?int??temp;
unsigned?char?bt[]={0xc00xf90xa40xb00x990x920x820xf80x800x90};
unsigned?int??t=0;
/*延時函數*/
void?Delay?()
{
unsigned?char?ab;
for(a=0;a<5;a++)
for(b=0;b<50;b++);
}
/*定時器初始化*/
void?Int_Timer0(void)
{
TMOD|=0X01;
TH0=0x4c;
TL0=0XF7;
TR0=1;
ET0=1;
}
/*定時中斷*/
void?Timer_isr?(void)?interrupt?1
{
TH0=0x4c;
TL0=0xf7;
t++;
if(t==20)
{
t=0;
XBYTE[0X78FF]=0;
Delay?();
temp=XBYTE[0X78FF];
}
}
/*顯示函數????????????*/
void?disp_fun?(unsigned?int?temp)
{
unsigned?char?FJ[3];
FJ[0]=temp%10;
FJ[1]=(temp%100)/10;
FJ[2]=temp/100;
XBYTE[0XEFFF]=0X04;
XBYTE[0Xdfff]=bt[FJ[2]];
Delay();
XBYTE[0XEFFF]=0X02;
XBYTE[0Xdfff]=bt[FJ[1]];
Delay();
XBYTE[0XEFFF]=0X01;
XBYTE[0Xdfff]=bt[FJ[0]];
Delay();
}
/*主函數?*/
void?main?(void)
{EA=1;
Int_Timer0();
???
for(;;)
{
disp_fun(temp);
}
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????4325??2012-12-17?10:37??ad轉換程序(新)\ad
?????文件????????955??2012-12-17?10:37??ad轉換程序(新)\ad.hex
?????文件?????????40??2012-12-17?10:37??ad轉換程序(新)\ad.lnp
?????文件???????7074??2012-12-17?10:37??ad轉換程序(新)\ad.M51
?????文件???????1063??2012-12-17?10:39??ad轉換程序(新)\ad.Opt
?????文件???????2434??2012-12-17?10:39??ad轉換程序(新)\ad.plg
?????文件???????2019??2012-12-17?10:39??ad轉換程序(新)\ad.Uv2
????.......?????????0??2012-12-17?10:29??ad轉換程序(新)\ad_Uv2.Bak
?????文件???????5115??2012-09-05?16:14??ad轉換程序(新)\STARTUP.A51
?????文件??????11665??2012-12-17?10:37??ad轉換程序(新)\STARTUP.LST
?????文件????????758??2012-12-17?10:37??ad轉換程序(新)\STARTUP.OBJ
?????文件????????985??2012-12-17?21:59??ad轉換程序(新)\Text1.c
?????文件???????3359??2012-12-17?10:37??ad轉換程序(新)\Text1.LST
?????文件???????4178??2012-12-17?10:37??ad轉換程序(新)\Text1.OBJ
?????文件???????4911??2012-12-17?11:17??ad轉換程序(中斷)\ad
?????文件???????1393??2012-12-17?11:17??ad轉換程序(中斷)\ad.hex
?????文件?????????40??2012-12-17?11:17??ad轉換程序(中斷)\ad.lnp
?????文件???????7782??2012-12-17?11:17??ad轉換程序(中斷)\ad.M51
?????文件???????1073??2012-12-17?11:27??ad轉換程序(中斷)\ad.Opt
?????文件???????1892??2012-12-17?11:17??ad轉換程序(中斷)\ad.plg
?????文件???????2019??2012-12-17?11:27??ad轉換程序(中斷)\ad.Uv2
????.......?????????0??2012-12-17?10:39??ad轉換程序(中斷)\ad_Uv2.Bak
?????文件???????5115??2012-09-05?16:14??ad轉換程序(中斷)\STARTUP.A51
?????文件??????11665??2012-12-17?11:07??ad轉換程序(中斷)\STARTUP.LST
?????文件????????758??2012-12-17?11:07??ad轉換程序(中斷)\STARTUP.OBJ
?????文件???????1036??2012-12-17?11:17??ad轉換程序(中斷)\Text2.c
?????文件???????3622??2012-12-17?11:17??ad轉換程序(中斷)\Text2.LST
?????文件???????4739??2012-12-17?11:17??ad轉換程序(中斷)\Text2.OBJ
?????文件?????????35??2012-12-17?11:17??ad轉換程序(中斷)\Text2.__i
?????目錄??????????0??2012-12-17?10:39??ad轉換程序(新)
............此處省略8個文件信息
評論
共有 條評論