main.c

实现AT89C52的LM12864的显示

//========================================
//---------   小波电子工作室   -----------
//      LM4229 液晶显示驱动程序 
//  作者：聂金波   完成日期：2008/0/05 
//  四川师范大学 电子工程学院 2005级5级
//  改进：2008/08/08增加显示5个32*32汉字程序
//        2008/08/10增加显示a*b大小照片（a为8的倍数）
//----------------------------------------
//   本程序参考proteus仿真论坛：http://proteus.5d6d.com一个网友
// 写的LCD240*128显示程序,在此表示感谢！
//=========================================


#include<AT89X52.h>
#include<en_code.h>
#include<cn_code.h>

#define uchar unsigned char
#define uint  unsigned int
#include<picture.h>
#define DATA_PORT P0

//-------------------------------------------
//              管脚定义   
//------------------------------------------
sbit HALT=P2^0;   //暂不清楚
sbit FS1=P2^1;    //字体模式选择
sbit MD2=P2^2;    //方式选择
sbit RST=P2^3;    //复位
sbit CD=P2^4;     //数据(L)/命令(H)选择
sbit READ=P2^5;     //读，低电平有效
sbit WRIT=P2^6;     //写，低电平有效
sbit CE=P2^7;     //使能,低电平有效

//===========================================
//              函数声明
//-------------------------------------------
void delay_lcd(uchar);
void write_data(uchar);
void write_com(uchar);
void clr_lcd(uchar,uchar,uint);



//--------------------------------------------
//              延时函数
//--------------------------------------------
void delay_lcd(uchar t)
{
 for(;t!=0; t--);
}

//--------------------------------------------
//              写数据函数
//--------------------------------------------
void write_data(uchar dat)
{
 CD=0;          //数据
 CE=0;          //LCD使能
 WRIT=0;        //写
 DATA_PORT=dat; //把数据送到P口
 delay_lcd(1);      //当晶振较高时加延时
 WRIT=1;        //关写
 CE=1;          //关使能
}


//--------------------------------------------
//              写命令函数
//--------------------------------------------
void write_com(uchar com)
{
 CD=1;    //命令
 CE=0;
 WRIT=0;
 DATA_PORT=com;
 delay_lcd(1);    //当晶振较高时加延时
 WRIT=1;
 CE=1;
}


//--------------------------------------------
//           指定位置、长度清屏
//--------------------------------------------
void clr_lcd(uchar x,uchar y,uint length)
{
 uint i,place;
 place=x*30+y;
 write_data(place&0xff);
 write_data(place/256);
 write_com(0x24);        //设置
 for(i=0;i<length;i++)
 write_data(0xff);          //写入空格，清屏
 write_com(0xb2);        //关闭自动写
}


//--------------------------------------------
//         指定位置向LCD写入指定字符
//
//
//--------------------------------------------
void write_lcd(uchar x,uchar y,char *cha)
{
  uint place,i=0;
  uchar length,c1,c2,j,k;
  for(length=0;cha[length]!=0;length++);
   do
    {
      c1=cha[i];      //取字符串的ASCII码
      c2=cha[i+1];
      place=x*30+y;
      if(c1<=128)        //#####小于128为字符，大于128为汉字
       {
        for(k=0;k<16;++k)     //字符设置为16*8
        {
          write_data(place&0xff);   //写入地址高位
          write_data(place/256);    //写入地址低位
          write_com(0x24);          //地址设置
          write_com(0xb0);          //设置数据自动写
          write_data(ASC_MSK[(c1-0x20)*16+k]); /*---例如：0的ASCII码为0x30,
          //在ASC_MSK中的位置为0x10*16 ---16字节字码依次写入LCD---   */
          write_com(0xb2);          //自动复位
          place=place+30;
        }
        if(y>28)            //y>28时候需要换行
          {x=x+16;y=0;}
        else                //否则，不换行，继续写下一个字符
          {y++;}
           i++;
      }
     else                   //#####c1大于128为汉字
      {
        for(j=0;j<sizeof(GB_16)/sizeof(GB_16[0]);j++)  //找到汉字
         {
           if(c1==GB_16[j].Index[0]&&c2==GB_16[j].Index[1])
           break;            //汉字找到则跳出   
         }
        if(j<sizeof(GB_16)/sizeof(GB_16[0]))   //------如果汉字在子码表内
         {
          for(k=0;k<16;k++)     //字符设置为16*8
           {
	            write_data(place&0xff);   //写入地址高位
	            write_data(place/256);    //写入地址低位
	            write_com(0x24);          //地址设置
	            write_com(0xb0);          //设置数据自动写
	            write_data(GB_16[j].Msk[k*2]);
				write_data(GB_16[j].Msk[k*2+1]); //16*16,每行2字节
	            write_com(0xb2);                 //自动复位
	            place=place+30;                  //下一行
           }
         }
        else             //-----没找到对应汉字则涂黑
         {
          for(k=0;k<16;k++)     //字符设置为16*8
           {
            write_data(place&0xff);   //写入地址高位
            write_data(place/256);    //写入地址低位
            write_com(0x24);          //地址设置
            write_com(0xb0);          //设置数据自动写
            write_data(0xff);
		   	write_data(0xff); 
            write_com(0xb2);             //自动复位
            place=place+30;              //下一行
           }
         }
        if(y>27)      //-------换行
         {x+=16;y=0;}
        else          //--------不用换行，则下一个字
         {y+=2;}
         i+=2;
      } 
    }
   while(i<length);
} 


//--------------------------------------------
//         LM4229初始化函数
//--------------------------------------------
void lcd_init()
{
 	FS1 = 0;//fs1管脚高电平时表示字体为8*6;
            //低电平时为8*8
	MD2 = 0;
	HALT = 0;
	write_data(0); 
	write_data(0);        //图形首地址
	write_com(0x42);     //图形首地址设置 
	write_data(30);
	write_data(0);
	write_com(0x43);     //图形区域设置
	write_com(0x80);     //设置为OR模式
	write_com(0x9a);    //关闭文本显示,开图形显示
}

//========================================================
//--------------------------------------------
//         LM4229在指定位置显示32*32汉字
//--------------------------------------------

void write_pic(uchar x,uchar y)
{
 uint place;
 uchar i,n;
 place=x*30+y;

 for(n=0;n<5;n++)   //5个汉字
 {
   for(i=0;i<32;i++)   //32*32
    {
     write_data(place&0xff);
     write_data(place/256);
     write_com(0x24);  //设置地址
     write_com(0xb0);  //设置数据自动写
     write_data(tab_pic[4*i+0+128*n]);
     write_data(tab_pic[4*i+1+128*n]);
     write_data(tab_pic[4*i+2+128*n]);
     write_data(tab_pic[4*i+3+128*n]);
     write_com(0xb2);    //自动复位
     place=place+30;
    }
   place=x*30+y+4*(n+1);
 }
}	
//===============================================

//--------------------------------------------
//         LM4229在指定位置显示a*b图片
//     a为图片长，b为图片宽（a为8的倍数）
//--------------------------------------------
void write_image(uchar x,uchar y,uchar a,uchar b,uchar *tab_image)
{
  uint place;
  uchar i,j;
  place=x*30+y;
  for(i=0;i<b;i++)        //b行数据
  {
    write_data(place&0xff);   //写地址低8位
    write_data(place/256);    //写地址高8位
    write_com(0x24);  //设置地址
    write_com(0xb0);  //设置数据自动写
    for(j=0;j<a/8;j++)    //a/8列数据
    {write_data(tab_image[(a/8)*i+j]);}
    write_com(0xb2);    //自动复位
    place=place+30;     //换行
  }
}

//==============================================
void main(){
	uchar count=40;
	  lcd_init();
 	write_lcd(10,2,"------------------------------");
 	write_lcd(102,2,"------------------------------");
 	write_lcd(22,1,"北京奥运同北京奥运");
	write_image(33,12,80,72,tab_image_h);
 while(1){
 	if(P3_3==0){
		 delay_lcd(255);
		 if(P3_3==0){
		 	count+=10;
		 	write_lcd(count,2,"北京奥运");
			while(P3_3==0);
		 }
	}
 }
}