lcd12864.c

lcd12864的驱动程序

/*****************************************************************/ 
/*                                                               */                                                                
/*名称：                LCD12864显示程序                         */                                                                                                                                                                           
/*功能：           显示英文，数字，符号，图片。                  */                                                    
/*难度等级：                   高                                */                                                                     
/* 作者：                  zengrenliang                          */
/* 版权：           http://www.51kaifa.com                       */
/*编写日期：        2006.05.20                                   */                                                                                                                                                                                                             
/*****************************************************************/

#include <reg52.h>
#include  <string.h>

#define uchar unsigned char

/**********引脚定义*********/

sbit lck = P3^5;//锁存信号
sbit CSA = P2^4;//又区选择
sbit CSB = P2^5;//左区选择
sbit RW = P2^7;//LCD片选
sbit DI = P2^6;//数据/命令选择

/********常用命令及参数定义********/
#define DISPON     0x3f
#define DISPOFF    0x3e
#define DISPFIRST  0xc0
#define SETX       0x40
#define SETY       0xb8
#define LCDBUZY    0x80
#define L          0x00
#define R          0x40
#define LIMIT      0x80


/**********全局变量************/
uchar  cbyte;
uchar data statu;
bit xy;

/**************函数声明******************/

void WrL(uchar x);
void WrR(uchar x);
void Lcmcls(void);
void delay1s(void);
void Lcminit (void);
void Putpicture(uchar flag);
void delay(unsigned int time);
void VtoH8x16change(uchar *hzbuf);
void Puthalf(uchar *strch,uchar row,uchar col);
void Wrdata(uchar x,uchar row,uchar col);
void Locatexy(uchar row,uchar col);
void vWrite8x16Character(uchar *ch,uchar row,uchar col,bit flag);
void vWrite8x16String(uchar  *str,uchar col, uchar row, bit flag);


extern uchar  code picture1[];
extern uchar  code picture2[];
extern uchar  code  char_Table[95][16];

/***********主程序***************/
void main(void)
{      
     P1 = 0x20;//"液晶"指示灯亮
    Lcminit();
    while(1){
     Putpicture(0);
     delay1s();
     Lcmcls();
     Putpicture(1);
     delay1s();
     Lcmcls();
     vWrite8x16String("abcdefghijklmn" ,0, 8,0);
     vWrite8x16String("ABCDEFGHIJKLMN", 2, 8,0);
     vWrite8x16String("12345678901234", 4, 8,0);
     vWrite8x16String("+-*/!@#$%^&*()", 6, 8,0);
     delay1s();
     Lcmcls();
    }   

}


/***************微秒级延时*****************/
void delay(unsigned int  time)
{ unsigned int i;
    for(i=0;i<time;i++);
 }

/***************约5S延时********************/
void delay1s(void)
{
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
}

//***********初始化LCD*******************/

void Lcminit (void)
{ 
    cbyte=DISPOFF;
    WrL(cbyte);
    WrR(cbyte);
    cbyte=DISPON;
    WrL(cbyte);
    WrR(cbyte);
    cbyte=DISPFIRST;
    WrL(cbyte);
    WrR(cbyte);
    Lcmcls();
    Locatexy(0,0);
}


/***************LCD清屏********************/
void Lcmcls(void)
{ uchar  i,j;
    for(i=0;i<8;i++){
      delay(6);
        for(j=0;j<LIMIT;j++){
          delay(6);
          Wrdata(0x0,i,j);
         }
     }
}

/*****************写左区******************/

void WrL(uchar x)
{
   
   RW = 1;//RW=1（读)
   CSA = 0;
   CSB = 1;
   DI = 0;//命令操作
   lck = 0;
   P1 = 0xff;//ELCD=1，使能LCD
   lck = 1;
   while(P0 & LCDBUZY);//最高位为1，表示忙，则循环检测
   lck = 0;
   P1 = 0xef;//ELCD=1，使能LCD
   lck = 1;
   RW = 0;//RW=0（写）
   P0 = x;   //数据送到P0口

   CSA = 0;
   CSB = 1;
   DI = 0;

   lck = 0;
   P1 = 0xff;//ELCD=1，使能LCD,把数据打入LCD
   lck = 1;
   delay(3);  
   lck = 0;
   P1 = 0xef;//ELCD=0
   lck = 1;

}

/**************写右区**************/
void WrR(uchar data x)
{
   RW = 1;//R/W=1读
   CSA = 1;
   CSB = 0;
   DI = 0;//命令操作
   lck = 0;
   P1 = 0xff;
   lck = 1;
 //EN = 1;//使能LCD
   while(P0 & LCDBUZY);//最高位为1，表示忙，则循环
   lck = 0;
   P1 = 0xe;
   lck = 1;
   RW = 0;//RW = 0写

   P0=x;     //数据送到P0口

   CSA = 1;
   CSB = 0;
   DI = 0;
   lck = 0;
   P1 = 0xff;
   lck = 1;//使能LCD，把数据打入LCD
   delay(3);  
   lck = 0;
   P1 = 0xef;
   lck = 1;
    
}


/*************定位*****************/
void Locatexy(uchar  row,uchar  col)
{
   uchar  x, y, right;
   switch(col&0xc0)
    {
    case 0:{//右半屏
           RW = 1;//R/W=1（读）
           CSA = 1;
           CSB = 0;
           DI = 0;//命令操作
           lck = 0;
           P1 = 0xff;
           lck = 1;; //使能LCD        
           while(P0 & LCDBUZY);//最高位为1，表示忙，则循环  
           lck = 0;
           P1 = 0xef;
           lck = 1;
           right = 1;break;}//置右半屏标志
   case 0x40:{//左半屏 
           
           RW = 1;//R/W=1读
           CSA = 0;
           CSB = 1;
           DI = 0;//命令操作
           lck = 0;
           P1 = 0xff;
           lck = 1;//使能LCD
           while(P0 & LCDBUZY);//最高位为1，表示忙，则循环
           lck = 0;
           P1 = 0xef;
           lck = 1;
           right = 0;break;}//置左半屏标志
     }
   x=col&0x3f|SETX;//把列数据变成行命令
   y=row&0x07|SETY;//把行数据变成行命令
/**********************************/
   lck = 0;
   P1 = 0xff;
   lck = 1;//判断忙标志
   while(P0 & LCDBUZY);//最高位为1，表示忙，则循环 
   lck = 0;
   P1 = 0xef;
   lck = 1;
/*********以上为判断忙标志********/
/*********************************/
   RW = 0;//R/W=0写

   P0 = y;//行数据送到P0口

   lck = 0;
   P1 = 0xff;
   lck = 1;//使能LCD，把数据打入LCD
   delay(3);
   lck = 0;
   P1 = 0xef;
   lck = 1;
/**********以上为送行命令***********/
   RW =1;//R/W=1读
   lck = 0;
   P1 = 0xff;
   lck = 1;//使能LCD，准备读忙标志
   while(P0 & LCDBUZY);//最高位为1，表示忙，则循环 
   lck = 0;
   P1 = 0xef;
   lck = 1;
/*********以上为判断忙标志********/
   RW = 0;//R/W=0写

   P0 = x;//列数据送P0口

   lck = 0;
   P1 = 0xff;
   lck = 1;//使能LCD，把数据打入LCD
   delay(3);
   lck = 0;
   P1 = 0xef;
   lck = 1;
/**********以上为送列命令***********/
   if(right)
    statu = 1;//置右半区标志
   else
    statu = 0;//置左半区标志
}


/**************数据写输出***************/
void  Wrdata(uchar  x,uchar  row,uchar  col)
{   
    Locatexy(row,col);//定位显示位置
    RW = 0;//R/W=0
    DI = 1;//数据操作
   lck = 0;
   P1 = 0xef;
   lck = 1;;//不使能LCD
    if(statu){//根据状态确定是左半屏还是右半屏
     CSA= 1;
     CSB= 0;    
    }else{
     CSA=0;
     CSB=1;
    }

    P0 = x;//送显示数据

   lck = 0;
   P1 = 0xff;
   lck = 1; //使能LCD，把P0数据打入LCD
    delay(3);
   lck = 0;
   P1 = 0xef;
   lck = 1;
}



/****************图形输出******************/
void Putpicture(uchar flag)
{
   unsigned char i,j,row, col ;
   unsigned int x;
   row = 0; col=0;
    for(j=0;j<128;j++){
     x=j*0x08; 
     for(i=0;i<8;i++)
      {  if(flag)
           cbyte=picture1[x++];
         else 
           cbyte=picture2[x++];
          Wrdata(cbyte,row,col);
        row++;
      }   
     row=0;
     col++;    
    }  
      
}

/***************半角数据点阵输出*******************/
void Puthalf(uchar *strch,uchar row,uchar col)
{
    uchar i,bakerx;
    bakerx = row;
    for(i=0;i<16;i++)//上半字输出
     {
        cbyte=strch[i];
        Wrdata(cbyte,bakerx,col);
  
        cbyte=strch[i+1];
        Wrdata(cbyte,bakerx+1,col);
        col++;
        i++;
       }
}


/************汉字输出******************/
/*void Puthz(uchar *str,uchar row,uchar col)
{
    uchar  i,bakerx;
    bakerx=row;
    for(i=0;i<32;i++)
      {
        cbyte=str[i];
        Wrdata(cbyte,row,col);       //上半字节输出
        i++;
        row=bakerx+1;
        cbyte=str[i];
        Wrdata(cbyte,row,col);       //下半字节输出

        row=bakerx;
        col=col+1;
      }
}

*/
/***********************字符型点阵行--》列转换********************/
void VtoH8x16change(uchar   *hzbuf)
{   uchar  i,j,k,  cash[16];
    uchar   newbyte, savebit[8];
    for(k=0;k<16;k++){
      newbyte = 0;
      for(i=0;i<8;i++){
        savebit[i]=hzbuf[i] & 0x80;
       }
      for(j=0;j<8;j++){
        savebit[j] = savebit[j] >> (7-j);
        newbyte = newbyte | savebit[j];
       }
      cash[k] = newbyte;
      newbyte = 0;
      for(i=8;i<16;i++){
        savebit[i-8]=hzbuf[i] & 0x80;
       }
      for(j=0;j<8;j++){
        savebit[j] = savebit[j] >> (7-j);
        newbyte = newbyte |savebit[j];
       }
      cash[k+1] = newbyte;
      for(j=0;j<16;j++){
        hzbuf[j] = hzbuf[j] <<1; 
       }
      k++;
     }
    for(i=0;i<16;i++)
      hzbuf[i] = cash[i];
 }


/************************显示英文和符号字符********************/
void vWrite8x16Character(uchar *ch,uchar row,uchar col,bit flag)
{
	uchar    ucXArray[16],i;

    if(flag){     // 反白显示英文
		for(i = 0; i < 16; i++)
			ucXArray[i] = ~ch[i];
	}else{
        for(i = 0; i < 16; i++)
            ucXArray[i] = ch[i];
    }
    VtoH8x16change(ucXArray);
	Puthalf(ucXArray,row,col);
}

/*************************显示英文字符串**********************/
void  vWrite8x16String(uchar  *str,uchar row, uchar col, bit flag)
{
	unsigned char  i,  j,thiscol;
	j = strlen(str);
	for(i = 0; i < j; i++)
	{   thiscol = (i % 16) * 8 + col;//计算列地址
		if(str[i] < 0xa1)//当前显示内容为英文字符
          vWrite8x16Character(&char_Table[str[i]-0x20][0],row,thiscol,flag);           
	}
}