8字点阵屏左移程序.c

51单片机C语言多种点阵屏驱动程序（开发软件为keil C ---8字点阵屏左移程序

/****************************************************************************************

51_isp学习板 8字点阵屏左移程序。 C51程序
编写：luojian
日期：2007-6-14

Email:[e-mail]


本程序目的在于了解和撑握单片机人驱动16*16点阵LED动态扫描程序的写法和用LED显示汉字的方法。
所先由专用汉字取模软件对汉字进行取模，由于一个汉字至少要16*16的点阵可能正常，所以一个汉字
在单片机中要32个字节的内存保存。89S51数据存储器有4K，所以89S51中可以保存100个左右的汉字。

单片机通过串口与点阵屏连接，点阵屏列驱动为74HC595，四字须8个595IC，行驱动为74HC138由于
两个138驱动16行。

 程序的算法为取出每一个汉字的最上一行编码通过串口发送到595上，595通过内移位锁存器将数据锁存在
  端口上，89S51向595发送移位时钟信号和锁存信号。并驱动138对各列进行扫描。扫描完16行后重复。

*****************************************************************************************/
#include <AT89x51.H>
#define uchar unsigned char
#define uint unsigned int
uchar yid,h;			   //YID为移动计数器，H为行段计数器。
uint zimuo;		           //字模计数器
uchar code hanzi[];		   //汉字字模
uchar BUFF[18];			   //缓存
void in_data(void);		   //调整数据
void rxd_data(void);	   //发送数据
void sbuf_out();		   //16段扫描
unsigned char code hanzi[]; //字模数组
unsigned char code sw[16]={0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,
                           0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,}; //138的驱动代码，根据138的真值表计算而来。
unsigned char e;
void delay();                      /*延时*/



/*********************************************************
函数名:main()
功能:主功能函数
51_isp学习板 8字点阵屏左移程序。 C51程序

/*********************************************************/
void main()
{
unsigned char i,d=7;
 P2_0=0;             //关闭蜂鸣器

 yid=0;
 zimuo=0;							   
 while(1)
  {
	while(yid<16)				       //数据移位。
	{
		for(i=0;i<d;i++)			   //移动速度
		 {
		 sbuf_out();
         }
		yid++;				//移动一步
	}
   yid=0;
   zimuo=zimuo+32;			    //后移一个字，
   if(zimuo>=3096)				//总数减7个字。
   zimuo=0;
  }

 
}

/*********************************************************
函数名:sbuf_out()
功能:16行扫描
51_isp学习板 8字点阵屏左移程序。 C51程序

/*********************************************************/
void sbuf_out()
{
	for(h=0;h<16;h++)	              //16行扫描
		{

		    in_data();				  //调整数据
            P0_4=1;		              //关闭显示
			rxd_data();				  //串口发送数据

            P0_6=1;					  //锁存为高，595锁存信号
			P0=sw[h];			      //送段码
		}
}
/*********************************************************
函数名:in_data()
功能:移动数据调整
51_isp学习板 8字点阵屏左移程序。 C51程序

/*********************************************************/
void in_data(void)
{
 char s;
	for(s=8;s>=0;s--)			//h为向后先择字节计数器，zimuoo为向后先字计数器
	{
	 BUFF[2*s+1]=hanzi[zimuo+32*s+2*h];			 
	 BUFF[2*s]=hanzi[zimuo+1+32*s+2*h];	    
	}
}/*********************************************************
函数名:rxd_data()
功能:串口发送数据
51_isp学习板 8字点阵屏左移程序。 C51程序

/*********************************************************/
void rxd_data(void)		             //串行发送数据
{
  char s;
  uchar inc,tempyid,temp;
  if(yid<8)
    inc=0;
  else 
    inc=1;
  for(s=0+inc;s<16+inc;s++)			   //发送8字节数据
	{
	  if(yid<8) 
     tempyid=yid;
      else 
    tempyid=yid-8;
    temp=(BUFF[s]>>tempyid)|(BUFF[s+1]<<(8-tempyid));	//h1左移tempyid位后和h2右移8-tempyid相或，取出移位后的数据。
    temp=255-temp;	
	 SBUF=temp;                        //把BUFF中的字节从大到小移位相或后发送输出。
	 while(!TI);TI=0;				   //等待发送中断
	}
}

/*********************************************************
函数名:delay()
功能:延时
51_isp学习板 8字点阵屏左移程序。 C51程序

/*********************************************************/
void delay()
{unsigned char n;
 for(n=50;n>0;n--)
   {;}
}

/*******************************************************/
uchar code hanzi[]=
{
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,	
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
//=============================================================================
 			/*--  调入了一幅图像：这是您新建的图像  --*/
/*--  宽度x高度=16x16  --*/
0x00,0x00,0x38,0x3C,0x7E,0x7E,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,
0xFF,0xFF,0x7F,0xFE,0x3F,0xFC,0x1F,0xF8,0x0F,0xF0,0x07,0xE0,0x03,0xC0,0x00,0x00,
/*--  文字:  欢  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x01,0x00,0x01,0x00,0x01,0x3F,0x7F,0xA0,0x20,0xA1,0x12,0x52,0x02,0x14,0x02,0x08,
0x02,0x18,0x06,0x18,0x05,0x24,0x09,0x24,0x18,0x82,0x70,0x61,0x20,0x1C,0x00,0x00,

/*--  文字:  迎  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x02,0x01,0x84,0x3E,0x6C,0x22,0x24,0x22,0x20,0x22,0x20,0x22,0x27,0x22,0x24,
0x22,0xA4,0x2A,0x64,0x12,0x24,0x02,0x04,0x02,0x04,0x00,0x0A,0x7F,0xF1,0x00,0x00,

/*--  文字:  来  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x80,0x00,0x80,0x3F,0xFC,0x00,0x80,0x0C,0x90,0x04,0xA0,0x02,0xC0,0x7F,0xFE,
0x01,0x80,0x02,0xC0,0x04,0xA0,0x18,0x90,0x70,0x8C,0x20,0x83,0x00,0x80,0x00,0x80,

/*--  文字:  到  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x20,0x00,0x21,0xFE,0x20,0x10,0x24,0x48,0x24,0x84,0x25,0xFE,0x24,0xA4,0x24,0x20,
0x24,0x20,0x25,0xFE,0x24,0x20,0x24,0x20,0x21,0xA0,0x20,0x70,0x28,0x0E,0x10,0x04,
/*--  文字:  单  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x04,0x10,0x0C,0x60,0x02,0x20,0x1F,0xFC,0x10,0x84,0x1F,0xFC,0x10,0x84,0x10,0x84,
0x1F,0xFC,0x10,0x84,0x00,0x80,0x7F,0xFF,0x00,0x80,0x00,0x80,0x00,0x80,0x00,0x80,

/*--  文字:  片  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x02,0x00,0x02,0x08,0x02,0x08,0x22,0x08,0x7F,0xF8,0x00,0x08,0x00,0x08,0x00,0x08,
0x0F,0xF8,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x04,0x08,0x04,0x08,0x02,0x08,0x01,

/*--  文字:  机  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x08,0x1F,0x08,0x11,0x08,0x11,0x7F,0x11,0x08,0x11,0x08,0x11,0x1C,0x11,0x2C,
0x11,0x2A,0x11,0x0A,0x10,0x89,0x50,0x88,0x50,0x48,0x50,0x48,0x60,0x28,0x00,0x08,

/*--  文字:  爱  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x1F,0x00,0x09,0xFC,0x08,0x48,0x04,0x90,0x7F,0xFC,0x40,0x44,0x00,0x42,0x3F,0xFC,
0x00,0x20,0x0F,0xE0,0x04,0x30,0x02,0xD0,0x03,0x08,0x0C,0xC6,0x70,0x31,0x20,0x0C,

/*--  文字:  好  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x08,0x3F,0x88,0x10,0x08,0x08,0x08,0x04,0x3F,0x04,0x24,0x04,0x24,0x7F,0xE4,
0x04,0x22,0x04,0x26,0x04,0x18,0x04,0x10,0x04,0x28,0x04,0x64,0x05,0x22,0x02,0x01,

/*--  文字:  者  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x80,0x10,0x80,0x37,0xFC,0x08,0x80,0x04,0x80,0x7F,0xFE,0x01,0x00,0x00,0xC0,
0x1F,0xE0,0x10,0x38,0x10,0x27,0x1F,0xE0,0x10,0x20,0x10,0x20,0x1F,0xE0,0x10,0x20,

/*--  文字:  D  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x1F,0x00,0x22,0x00,0x42,0x00,0x42,0x00,0x42,