/***********************************************************
共陰數碼管
***********************************************************/
#include
#define?uchar?	unsigned?char
#define?uint	unsigned?int
uchar?code?acLEDCS[]={0x010x020x040x08};	/*?位選地址碼，“0”有效，位選接的是P0口低4位?*/
uchar?code?acLedSegCode[]={0x3f0x060x5b0x4f
						???0x660x6d0x7d0x07
						???0x7f0x6f0x770x7c};/*?段碼?*/
uchar?acLED[4];							/*?顯示緩沖區?*/
char??cScanIndex=0flag=0;					/*?位選指針0~3?*/
uchar?bdata?cBakP0?=?0xf0;
uint?f=0nTimer=0speed=0;


void?display（）			
{				??
??						//數據處理
	acLED[0]=acLedSegCode[speed/10/1000];	/*?LED顯示第1位?*/
	acLED[1]=0x80|acLedSegCode[speed/10/100%10];	/*?LED顯示第2位?*/
	acLED[2]=acLedSegCode[speed/10/10%10];	/*?LED顯示第3位?電機速率*/
	acLED[3]=acLedSegCode[speed/10%10];		/*?LED顯示第4位?*/	
}

void?main（）
{
	TMOD=?0x15;
	TH0?=0;?		
	TL0?=?0;			
	TR0?=?1;
	ET0?=?1;

	TH1?=?（65536-49989）/256;?		
	TL1?=?（65536-49989）%256;			
	TR1?=?1;
	ET1?=?1;

	EX0?=?1;				/*?允許外部中斷0?*/
	EA?=?1;					/*?開總中斷	*/
	while（1）
	{
	
		//*************************顯示刷新******************
		display（）;
		P1?=?0;					/*?先清顯示再換位選?*/
		P0?=?cBakP0?|?acLEDCS[cScanIndex];		/*?送位選數據?*/
		P1?=?acLED[cScanIndex++];		/*?送顯示數據，位選指針移位?*/???
		cScanIndex?&=?3;				/*?位選指針回位?*/
	if（flag==1）
	{
		flag=0;
		display（）;
		f=0;
		nTimer=0;
		TH0=0;?													
????????TL0=0;?
????????TR0=1;
	}

	}
}

void??IntT0（）?interrupt?1
{??
	f++;
}

void??IntT1（）?interrupt?3?
{

	TH1?=?（65536-50045）/256;?		
	TL1?=?（65536-50045）%256;??
	nTimer++;
	if（nTimer?==?20）
	{
		speed?=f*65536+TH0*256+TL0;
		TR0=0;
		flag=1;
		//nTimer=0;
	}

}
/*void??Pint0（）?interrupt?0
{
}??*/

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件?????259970??2010-12-05?22:33??信號發生器ILC8038\8038加程序.rar

?????文件?????770048??2010-11-01?22:47??信號發生器ILC8038\experiment2.Ddb

?????文件??????18432??2008-12-13?21:42??信號發生器ILC8038\experiment2元件清單.xls

?????文件?????158869??2007-09-10?22:22??信號發生器ILC8038\ICL8038.pdf

?????文件????4544512??2010-12-07?14:34??信號發生器ILC8038\8038加程序\experiment2最終.Ddb

?????文件???????1820??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51cepin.c

?????文件???????4862??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51cepin.LST

?????文件???????5094??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51cepin.OBJ

?????文件???????5087??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51測頻1

?????文件???????2131??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51測頻1.hex

?????文件?????????62??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51測頻1.lnp

?????文件???????8064??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\51測頻1.M51

?????文件???????1027??2010-12-06?19:42??信號發生器ILC8038\8038加程序\51測頻\51測頻1.Opt

?????文件????????175??2010-12-06?19:42??信號發生器ILC8038\8038加程序\51測頻\51測頻1.plg

?????文件???????2154??2010-11-04?20:54??信號發生器ILC8038\8038加程序\51測頻\51測頻1.Uv2

?????文件???????1029??2010-12-05?22:13??信號發生器ILC8038\8038加程序\51測頻\51測頻1_Opt.Bak

?????文件???????2154??2010-11-04?18:44??信號發生器ILC8038\8038加程序\51測頻\51測頻1_Uv2.Bak

?????文件???????6376??2005-03-22?15:22??信號發生器ILC8038\8038加程序\51測頻\STARTUP.A51

?????文件??????14048??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\STARTUP.LST

?????文件????????758??2010-12-05?22:12??信號發生器ILC8038\8038加程序\51測頻\STARTUP.OBJ

?????目錄??????????0??2011-03-27?16:32??信號發生器ILC8038\8038加程序\51測頻

?????目錄??????????0??2011-03-27?16:32??信號發生器ILC8038\8038加程序

?????目錄??????????0??2011-03-27?16:32??信號發生器ILC8038

-----------?---------??----------?-----??----

??????????????5806672????????????????????23