/*
12864LCD （ST7920）驅(qū)動程序
馬文壘     2004/12/27

*/

#include <reg52.h>
#include <intrins.h>
  //引腳定義
sbit CS=P2^0;	//片選 高電平有效 單片LCD使用時可固定高電平
sbit SID=P2^2;	//數(shù)據(jù)
sbit SCLK=P2^4;	//時鐘
sbit PSB=P3^5;	//低電平時表示用串口驅(qū)動，可固定低電平
sbit RESET=P3^7;	//LCD復(fù)位，LCD模塊自帶復(fù)位電路。可不接

void write(bit start, unsigned char ddata);
void sendbyte(unsigned char bbyte);
void delaynms(unsigned int di);
void lcdinit(void);
void lcdtest(void);
void lcdcls(void);

unsigned char code ma[] ={"  漢字顯示LCD   "};
unsigned char code ma2[]={"自帶字庫圖文混排"};
unsigned char code ma3[]={"控制IC：ST7920  "};
unsigned char code ma4[]={"湘潭大學(xué)信工學(xué)院"};

void lcdinit(void)	//初始化LCD
{
  delaynms(10); //啟動等待，等LCM講入工作狀態(tài)
  PSB=0; ;   	 //串口驅(qū)動模式
  RESET=0; delaynms(1); RESET=1; // 復(fù)位LCD
  CS=1;
  write(0,0x30);  //8 位介面，基本指令集
  write(0,0x0c);  //顯示打開，光標(biāo)關(guān)，反白關(guān)
  write(0,0x01);  //清屏，將DDRAM的地址計數(shù)器歸零
}

void write(bit start, unsigned char ddata) //寫指令或數(shù)據(jù)
{
  unsigned char start_data,Hdata,Ldata;
  if(start==0) start_data=0xf8;	 //寫指令
    else       start_data=0xfa;  //寫數(shù)據(jù)

  Hdata=ddata&0xf0;		  //取高四位
  Ldata=(ddata<<4)&0xf0;  //取低四位
  sendbyte(start_data);	  //發(fā)送起始信號
  delaynms(5); //延時是必須的
  sendbyte(Hdata);	      //發(fā)送高四位
  delaynms(1);  //延時是必須的
  sendbyte(Ldata);		  //發(fā)送低四位
  delaynms(1);  //延時是必須的
}

void sendbyte(unsigned char bbyte) //發(fā)送一個字節(jié)
{
 unsigned char i;
 for(i=0;i<8;i++)
   {
   SID=bbyte&0x80; //取出最高位
   SCLK=1;
   SCLK=0;
   bbyte<<=1; //左移
   }
}

void delaynms(unsigned int di) //延時
{
 unsigned int da,db;
 for(da=0;da<di;da++)
   for(db=0;db<10;db++);
}

void lcdtest(void)	//圖形方式下屏幕全黑
{
unsigned char i,j;
for(i=0;i<32;i++)
  { write(0,0x80+i);write(0,0x80);
    for(j=0;j<16;j++) write(1,0xff);
  }

 for(i=0;i<32;i++)
  { write(0,0x80+i);write(0,0x88);
    for(j=0;j<16;j++) write(1,0xff);
  }
}

void lcdcls(void)  //圖形方式下清屏
{
unsigned char i,j;
for(i=0;i<32;i++)
  { write(0,0x80+i);write(0,0x80);
    for(j=0;j<16;j++) write(1,0x00);
  }

 for(i=0;i<32;i++)
  { write(0,0x80+i);write(0,0x88);
    for(j=0;j<16;j++) write(1,0x00);
  }
}

void main(void)
{
 unsigned char i;
 lcdinit();

 while(1)
 {
  write(0,0x80); for(i=0;i<16;i++)  write(1,ma[i]);
  write(0,0x90); for(i=0;i<16;i++)  write(1,ma2[i]);
  write(0,0x88); for(i=0;i<16;i++)  write(1,ma3[i]);
  write(0,0x98); for(i=0;i<16;i++)  write(1,ma4[i]);

  write(0,0x36); //圖形方式
  lcdtest();
  lcdcls();
 }

}