/*
128*64 LCD （ST7920）驅動程序

*/

#include <reg52.h>
//bit P2_0=P2^0;
//bit P2_1=P2^1;
//bit P2_2=P2^2;
//bit P3_6=P3^6;
//bit P3_7=P3^7;
/******************************引腳定義*************************************/

sbit CS=P2^3;	//片選 高電平有效 單片LCD使用時可固定高電平RS
sbit SID=P2^1;	//數據	RW
sbit SCLK=P2^0;	//時鐘	E
//#define PSB   P3_6	//低電平時表示用串口驅動，可固定低電平
//#define RESET P3_7	//LCD復位，LCD模塊自帶復位電路。可不接


/******************************函數聲明**************************************/

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);





/*******************************初始化函數*************************************/

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

/********************************寫數據函數*************************************/
void write(bit start, unsigned char ddata) //寫指令或數據
{
  unsigned char start_data,Hdata,Ldata;
  if(start==0) start_data=0xf8;	 //寫指令
    else       start_data=0xfa;  //寫數據
  
  Hdata=ddata&0xf0;		  //取高四位
  Ldata=(ddata<<4)&0xf0;  //取低四位
  sendbyte(start_data);	  //發送起始信號
  delaynms(5); //延時是必須的
  sendbyte(Hdata);	      //發送高四位
  delaynms(1);  //延時是必須的
  sendbyte(Ldata);		  //發送低四位
  delaynms(1);  //延時是必須的
}

/********************************發送字節函數************************************/
void sendbyte(unsigned char bbyte) //發送一個字節
{
 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);
  }
}