7段数码管动态显示proteus仿真电路及C语言源程序

利用proteus软件对数码管动态显示进行了仿真，由于是软件仿真，对于动态数码管的视觉残留有一些影响，所以把延时时间调的较长，以便能够看清其扫描显示的过程，可以作为课堂给学生演示的课件，亦可以给爱好者作为参考！

#include
unsigned char code num[]={0x3f0x060x5b0x4f
				  		  0x660x6d0x7d0x07
			              0x7f0x6f0x770x7c
				          0x390x5e0x790x71};
sbit P36=P3^6;
sbit P20=P2^0;
sbit P21=P2^1;
void delay（unsigned int x）
{	
	TH1=0xfc;
	TL1=0x66;
	TR1=1;
	while（x!=0）
	{
	 	if（TF1==1）
		{
			TR1=0;
			TH1=0xfc;
			TL1=0x66;
			x--;
			TR1=1;
		}
	}
}
void main（）
{
	TMOD=0x10;
	while（1）
	{
		P36=1;	   //1
		P0=num[5];
		P20=1;
		P36=0;
		P20=0;
		P0=0x00;

		P21=0;
		P0=0x01;
		P21=1;
		P36=0;
		P21=0;
		delay（5000）;

		P36=1;	   //2
		P0=num[8];
		P20=1;
		P36=0;
		P20=0;
		P0=0x00;
		

		P21=0;
		P0=0x02;
		P21=1;
		P36=0;
		P21=0;
		delay（5000）;
	}
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件        3126  2011-10-02 16:06  51_C_Design\7_Seg_led
     文件         418  2011-10-02 16:06  51_C_Design\7_Seg_led.hex
     文件          70  2011-10-02 16:06  51_C_Design\7_Seg_led.lnp
     文件        6125  2011-10-02 16:06  51_C_Design\7_Seg_led.M51
     文件        1039  2011-10-02 16:07  51_C_Design\7_Seg_led.Opt
     文件        3776  2011-10-02 16:06  51_C_Design\7_Seg_led.plg
     文件         738  2011-10-02 16:06  51_C_Design\7_Seg_led.plg.c
     文件        3106  2011-10-02 16:06  51_C_Design\7_Seg_led.plg.LST
     文件        2738  2011-10-02 16:06  51_C_Design\7_Seg_led.plg.OBJ
     文件        2168  2011-10-02 16:07  51_C_Design\7_Seg_led.Uv2
     文件        1039  2011-09-23 23:28  51_C_Design\7_Seg_led_Opt.Bak
     文件        2168  2011-09-22 23:26  51_C_Design\7_Seg_led_Uv2.Bak
     文件      129884  2011-10-02 16:07  51_C_Design\7seg_com_cat.DSN
     文件        6376  2005-03-22 15:22  51_C_Design\STARTUP.A51
     文件       14048  2011-10-02 16:06  51_C_Design\STARTUP.LST
     文件         749  2011-10-02 16:06  51_C_Design\STARTUP.OBJ