实现8*8点阵LED上下左右移动程序

51单片机，实现实现8*8点阵LED，数字0~9上下左右移动

运行时，0~9循环显示模式，按下按键，对应各种显示模式，复位键恢复循环显示模式

硬件接法如下：

 代码如下：

#include <reg51.h>
#include <stdio.h>
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long
uchar code num[] = 
{
   0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	//首尾各加入一个空白字符，仅为移动时更丝滑
   0x00,0x3e,0x41,0x41,0x41,0x3e,0x00,0x00,	//8*8点阵0~9代码
   0x00,0x00,0x21,0x7f,0x01,0x00,0x00,0x00,
   0x00,0x21,0x41,0x43,0x45,0x39,0x00,0x00,
   0x00,0x22,0x49,0x49,0x49,0x36,0x00,0x00,
   0x00,0x0c,0x14,0x24,0x7f,0x04,0x00,0x00,
   0x00,0x72,0x51,0x51,0x51,0x4e,0x00,0x00,
   0x00,0x3e,0x49,0x49,0x49,0x26,0x00,0x00,
   0x00,0x40,0x40,0x40,0x4f,0x70,0x00,0x00,
   0x00,0x36,0x49,0x49,0x49,0x36,0x00,0x00,
   0x00,0x32,0x49,0x49,0x49,0x3e,0x00,0x00,
   0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
};
uchar code tab[] ={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};	//点阵行控制，也可改用移位实现
uchar key = 5;

void delay100us(uint n)
{
   uchar i;
   for(;n>0;n--)
   {
      for(i=0;i<10;i++){;}
   }
}

void delay10ms(uint n)
 {
   uchar i,j;
   for(;n>0;n--)
   {
      for(i=0;i<18;i++)
      {
	 for(j=0;j<184;j++){;}
      }
   }
 }

void dis_moveup()	//字符上移
{
   uchar i,j,k,a;
   for(i=0;i<88;i+=8)
   {
      for(a=0;a<8;a++)
      {
	 for(j=0;j<50;j++)	//显示延时
	 {
	    for(k=0;k<8;k++)
	    {
	       P0 = 0x00;
	       P0 = (num[(i+k)] << a) | (num[(i+k+8)] >> (8-a));	//逐次从高位取到低位，并与下一个字合并显示
	       P3 = ~tab[k];
	       delay100us(10);
	    }
	    if(P1 != 0xff) break;
	 }
	 if(P1 != 0xff) break;
      }
      if(P1 != 0xff) break;
   }
}

void dis_movedown()	//字符下移，原理同上移
{
   uchar i,j,k,a;
   for(i=0;i<88;i+=8)
   {
      for(a=0;a<8;a++)
      {
	 for(j=0;j<50;j++)
	 {
	    for(k=0;k<8;k++)
	    {
	    P0 = 0x00;
	    P0 = (num[(i+k)] >> a) | (num[(i+k+8)] << (8-a));
	    P3 = ~tab[k];
	    delay100us(10);
	    }
	    if(P1 != 0xff) break;
	 }
	 if(P1 != 0xff) break;
      }
      if(P1 != 0xff) break;
   }
}

void dis_moveleft()	//字符左移
{
   uchar i,j,k;
   for(i=0;i<88;i++)
   {
      for(j=0;j<50;j++)
      {
	 for(k=0;k<8;k++)
	 {
	    P0 = 0x00;
	    P0 = num[i+k];	//逐个取字
	    P3 = ~tab[k];
	    delay100us(10);
	 }
	 if(P1 != 0xff) break;
      }
      if(P1 != 0xff) break;
   }
}

void dis_moveright()	//字符右移
{
   uchar i,j,k,m,a;
   for(i=1;i<88;i+=8)
   {
      for(a=0;a<8;a++)	//右移时，字符最低位消失在右边时，下一字符的高位应在左边出现
	 {
	 for(m=0;m<50;m++)
	 {
	    for(j=a;j>0;j--)
	    {
	       P0 = 0x00;
	       P0 = num[i+15-j];
	       P3 = ~tab[a-j];
	       delay100us(10);
	    }   
	    for(k=a;k<8;k++)
	    {
	       P0 = 0x00;
	       P0 = num[i+k-a-1];
	       P3 = ~tab[k];
	       delay100us(10);
	    }
	    if(P1 != 0xff) break;
	 }
	 if(P1 != 0xff) break;
      }
      if(P1 != 0xff) break;
   }
}

void dis_normal()	//循环显示0~9
{
   uchar i,j,k;
   for(i=8;i<88;i+=8)	//去除首尾空白字符
   {
      for(j=0;j<200;j++)
      {
	 for(k=0;k<8;k++)
	 {
	    P0 = 0x00;
	    P0 = num[i+k];
	    P3 = ~tab[k];
	    delay100us(10);
	 }
	 if(P1 != 0xff) break;
      }
      if(P1 != 0xff) break;
   }
}

int key_scan()	//按键扫描
{
   if(P1 != 0xff)
   {
      delay10ms(1);
      if(P1 != 0xff)
      switch(~P1)
      {
	     case 0x01 : key = 1; 	break;
	     case 0x02 : key = 2; 	break;
	     case 0x04 : key = 3; 	break;
	     case 0x08 : key = 4; 	break;
	     case 0x10 : key = 5; 	break;
      }
   }
   return key;
}
 
int main(void)
{
   P1 = 0xff;
   while(1) 
   {
      switch(key_scan())
      {
	     case 1 : dis_moveleft();	break;
	     case 2 : dis_moveright();	break;
	     case 3 : dis_moveup();		break;
	     case 4 : dis_movedown();	break;
	     case 5 : dis_normal();		break;
      }
   }
}