51单片机99.9

#include <STC15.H>
sbit STCP=P1^0;
sbit SHCP=P1^1;
sbit DS=P1^2;
sbit STCP1=P1^3;
sbit SHCP1=P1^4;
sbit DS1=P1^5;
unsigned char code DispplayHex[10][32]={{0x00,0x00,0x00,0xFC,0x00,0xFC,0x00,0xCE,0x01,0xC6,0x01,0x87,0x03,
0x87,0x03,0x87,0x03,0x87,0x03,0x87,0x03,0xC6,0x01,0xCE,0x01,0xFC,0x00,0xFC,0x00,
0x00,0x00,0x00,
},
{0x00,0x00,0x00,0x30,0x00,0x3C,0x00,0x3C,0x00,0x30,0x00,0x30,0x00,
0x30,0x00,0x30,0x00,0x30,0x00,0x30,0x00,0x30,0x00,0x30,0x00,0x78,0x00,0xFC,0x01,
0x00,0x00,0x00,},
{0x00,0x00,0x00,0xFC,0x00,0xEE,0x01,0x86,0x01,0x8E,0x01,0x86,0x01,
0xC0,0x01,0xE0,0x00,0x70,0x00,0x38,0x00,0x1C,0x00,0x8E,0x01,0xFF,0x01,0xFF,0x01,
0x00,0x00,0x00,
},
{0x00,0x00,0x00,0xFC,0x00,0xEE,0x00,0xCE,0x01,0xC6,0x01,0xC0,0x01,
0xE0,0x00,0xF8,0x00,0xE0,0x01,0xC0,0x01,0x86,0x01,0xCF,0x01,0xEE,0x01,0xFC,0x00,
0x00,0x00,0x00,},
{0x00,0x00,0x00,0xE0,0x00,0xE0,0x00,0xF0,0x00,0xF8,0x00,0xFC,0x00,
0xEC,0x00,0xE6,0x00,0xE7,0x00,0xFF,0x03,0xE0,0x00,0xE0,0x00,0xE0,0x00,0xF8,0x03,
0x00,0x00,0x00,},
{0x00,0x00,0x00,0xFE,0x01,0xFE,0x00,0x06,0x00,0x06,0x00,0xFE,0x00,
0xCE,0x01,0xC6,0x01,0x80,0x01,0x80,0x01,0x8E,0x01,0xC7,0x01,0xEE,0x01,0xFC,0x00,
0x00,0x00,0x00,
},
{0x00,0x00,0x00,0xF8,0x00,0xDC,0x01,0xCE,0x01,0x06,0x00,0x07,0x00,
0xFF,0x00,0xDF,0x01,0x87,0x03,0x87,0x03,0x87,0x03,0x8E,0x01,0xDE,0x01,0xFC,0x00,
0x00,0x00,0x00,},
{0x00,0x00,0x00,0xFE,0x03,0xFE,0x01,0xC6,0x00,0xC0,0x00,0x60,0x00,
0x60,0x00,0x70,0x00,0x30,0x00,0x38,0x00,0x38,0x00,0x38,0x00,0x38,0x00,0x38,0x00,
0x00,0x00,0x00,
},
{0x00,0x00,0x00,0xFC,0x00,0xCE,0x01,0x86,0x01,0x87,0x01,0x8E,0x01,
0xFC,0x00,0xFC,0x00,0xE6,0x01,0xC7,0x01,0x87,0x03,0x87,0x01,0xCE,0x01,0xFC,0x00,
0x00,0x00,0x00,
},
{0x00,0x00,0x00,0xFC,0x00,0xEE,0x01,0xC7,0x01,0x87,0x01,0x87,0x03,
0xC7,0x03,0xEE,0x03,0xFE,0x01,0xC0,0x01,0xC0,0x01,0xCE,0x01,0xEE,0x00,0x7E,0x00,
0x00,0x00,0x00,}};
unsigned char code DisplayHex[]={0xff,0xc0,0xf9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0x7f};
unsigned char code DissplayHex[]={0xff,0x40,0x79,0x24,0x30,0x19,0x12,0x02,0x78,0x00,0x10,0x7f};
unsigned char disp[12]={0,1,2,3,4,5,6,7,8,9,10,11};
void Delay(unsigned int i)
{
	unsigned char j;
	while(i)
	{
		i--;
		for (j=255;j>0;j--)
		{
		}
	}
}
void Send595(unsigned char a)
{
	unsigned char i,j;
	j=0x80;
	for (i=0;i<8;i++)
	{
		if (a&j) DS = 1;
		else           DS = 0;
		SHCP = 0;
		SHCP = 1;
		j>>=1;
	}
}
void Send(unsigned char a)
{
	unsigned char i,j;
	j=0x80;
	for (i=0;i<8;i++)
	{
		if (a&j) DS1 = 1;
		else           DS1 = 0;
		SHCP1 = 0;
		SHCP1 = 1;
		j>>=1;
	}
}
void DisplayBy595()
{
	unsigned char r,t,y;
		unsigned char i;
		unsigned char a;
		unsigned char b;
		unsigned char c;
	for (y=0;y<10;y++)
	{
	for (t=1;t<11;t++)
	{
		for (r=0;r<10;r++)
		{
	 for(b=3000;b>0;b--)
	 {
		for (i=0;i<16;i++)
		{
		Send(~DispplayHex[r][2*i]);
		Send(~DispplayHex[r][2*i+1]);
		STCP1=0;
		STCP1=1;
	  P0=i;
	}
	 }
		Send595(DissplayHex[disp[t]]);
		Send595(DisplayHex[disp[y]]);
		Send595(DisplayHex[disp[0]]);
		Send595(DisplayHex[disp[0]]);
	STCP=0;
	STCP=1;
	Delay(200);
		
	}
}
	if (y==0)
	{
	y=y+1;
	}
}
	
}
void main()
{
		unsigned char i;
	P0M0 = 0XFF;P0M1 = 0;
	P1M0 = 0XFF;P1M1 = 0;
		DisplayBy595();
	while(1)
	{
		while(1)
	{
		while(1)
	{
		
		for (i=0;i<16;i++)
		{
		Send(~DispplayHex[9][2*i]);
		Send(~DispplayHex[9][2*i+1]);
		STCP1=0;
		STCP1=1;
	  P0=i;
	}
	}
	}
	}
}