/****************************************************************************
* 文件名：LCMDRV.C
* 功能：MG12864圖形液晶模塊驅(qū)動(dòng)程序。使用LPC2131的GPIO口控制操作。
*       用于ZLG/GUI用戶圖形界面。
* 液晶模塊與LPC2131的連接如下所示：
*	D0 (7)	--		P0.4
*	.		--		.
*	.		--		.
*	.		--		.
*	D7 (14)	--		P0.11
*
*  	CS1		--		P0.12
*	CS2		--		P0.13
*	
*   RST     --      P0.14
*	D/I		--		P0.15
*	R/W		--		GND
*	E		--		P0.16
*
*  R/W為0進(jìn)行寫操作，為1時(shí)進(jìn)行讀操作；
*  D/I為1表示數(shù)據(jù)傳送， 為0表示命令傳送；
*  E讀寫脈沖；
*  CS1和CS2為左右半屏選擇，高電平選中；
*  RST為復(fù)位控制，低電平復(fù)位。
*  
*  作者：黃紹斌
*  日期：2005/3/7
****************************************************************************/
#include "config.h"


/* 定義顯示緩沖區(qū) */
TCOLOR  gui_disp_buf[GUI_LCM_YMAX/8][GUI_LCM_XMAX];


/* 定義總線起始的GPIO，即D0對(duì)應(yīng)的GPIO值(P0.4) */
#define  BUS_NO		4

/* 輸出總線數(shù)據(jù)宏定義 */
#define	 OutData(dat)	IO0CLR = 0xFF<<BUS_NO; IO0SET = (dat&0xff)<<BUS_NO


/* 定義CS1控制 */
#define  LCM_CS1	12
#define  SCS1()		IO0SET = 1<<LCM_CS1
#define  CCS1()		IO0CLR = 1<<LCM_CS1

/* 定義CS2控制 */
#define  LCM_CS2	13
#define  SCS2()		IO0SET = 1<<LCM_CS2
#define  CCS2()		IO0CLR = 1<<LCM_CS2

/* 定義RST控制 */
#define  LCM_RST	14
#define  SRST()		IO0SET = 1<<LCM_RST
#define  CRST()		IO0CLR = 1<<LCM_RST


/* 定義DI控制 */
#define  LCM_DI		15
#define  SDI()		IO0SET = 1<<LCM_DI
#define  CDI()		IO0CLR = 1<<LCM_DI


/* 定義E控制 */
#define  LCM_E		16
#define  SE()		IO0SET = 1<<LCM_E
#define  CE()		IO0CLR = 1<<LCM_E


/* 定義LCM操作的命令字 */
#define	LCM_DISPON			0x3f	/* 打開LCM顯示												*/
#define LCM_STARTROW		0xc0	/* 顯示起始行0，可以用LCM_STARTROW+x設(shè)置起始行。(x<64) 		*/
#define	LCM_ADDRSTRX		0xb8	/* 頁起始地址，可以用LCM_ADDRSTRX+x設(shè)置當(dāng)前頁(即X)。(x<8)	*/
#define	LCM_ADDRSTRY		0x40	/* 列起始地址，可以用LCM_ADDRSTRY+x設(shè)置當(dāng)前列(即Y)。(x<64)	*/	


/*********************************************************************************
* 名稱：DELAY5()
* 功能：軟件延時(shí)函數(shù)。用于LCM顯示輸出時(shí)序控制。
* 入口參數(shù)：無
* 出口參數(shù)：無
**********************************************************************************/
void DELAY5(void)
{ int i;

  for(i=0; i<100; i++);
}


/***********************************************************************
* 名稱：LCM_WrCommand()
* 功能：寫命令子程序
* 入口參數(shù)：command  	要寫入LCM的命令字
* 注：數(shù)據(jù)口為P0口(作IO口)
***********************************************************************/
void LCM_WrCommand(uint8 command) 
{ CE();				// 先將E置為低					
  CDI();			// DI=0，表示發(fā)送命令				
          
  OutData(command);           
  DELAY5();     
  SE();
  DELAY5();     
  CE();
  DELAY5();     
}


/***********************************************************************
* 名稱：LCM_WrData()
* 功能：寫數(shù)據(jù)子程序
* 入口參數(shù)：wrdata  	要寫入LCM的數(shù)據(jù)
***********************************************************************/
void LCM_WrData(uint8 wrdata) 
{ CE();			// 先將E置為低	
  SDI();		// DI=1，表示發(fā)送數(shù)據(jù)	
          
  OutData(wrdata);       
  DELAY5();     
  SE();
  DELAY5();     
  CE();     
  DELAY5();             
}


/***********************************************************************
* 名稱：LCM_WriteByte()
* 功能：向指定點(diǎn)寫數(shù)據(jù)(一字節(jié))。
* 入口參數(shù)：x 		x坐標(biāo)值(0-127)
*	    	y       y坐標(biāo)值(0-63)
*           wrdata	所要寫的數(shù)據(jù)
* 說明：會(huì)重新設(shè)置CS1/CS2，及其內(nèi)部指針
***********************************************************************/
void LCM_WriteByte(uint8 x, uint8 y, uint8 wrdata) 
{ x = x&0x7f;				// 參數(shù)過濾
  y = y&0x3f;

  CCS1();
  CCS2();
  
  //更新顯示緩沖區(qū)
  y = y>>3;
  gui_disp_buf[y][x] = wrdata;
   
  // 更新LCD顯示
  if(x<64)					// 選擇液晶控制芯片(即CS1--控制前64個(gè)點(diǎn)，CS2--控制后64個(gè)點(diǎn))
  { SCS1();  
  }
  else
  { SCS2();
    x = x-64;
  }
  LCM_WrCommand(LCM_ADDRSTRY+x);	// 設(shè)置當(dāng)前列地址，即x坐標(biāo)
  LCM_WrCommand(LCM_ADDRSTRX+y);	// 設(shè)置當(dāng)前頁地址，即y坐標(biāo)

  LCM_WrData(wrdata);
}


/***********************************************************************
* 名稱：LCM_ReadByte()
* 功能：讀取指定點(diǎn)上的數(shù)據(jù)。
* 入口參數(shù)：x 	  x坐標(biāo)值(0-127)
*	   	    y     y坐標(biāo)值(0-63)
* 出口參數(shù)：返回該點(diǎn)上的字節(jié)數(shù)據(jù)。
***********************************************************************/
uint8  LCM_ReadByte(uint8 x, uint8 y)
{ x = x&0x7f;				// 參數(shù)過濾
  y = y&0x3f;

  y = y>>3;
  return(gui_disp_buf[y][x]);
}



/////////////////////////////////////////////////////////////////////////


/***********************************************************************
* 名稱：LCM_DispFill()
* 功能：向顯示緩沖區(qū)填充數(shù)據(jù)
* 入口參數(shù)：filldata  	要寫入LCM的填充數(shù)據(jù)
* 注：此函數(shù)會(huì)設(shè)置顯示起始行為0，且會(huì)自動(dòng)選中CS1有效
***********************************************************************/
void LCM_DispFill(uint8 filldata)
{ uint8  x,y;

  SCS1();			// 選中兩個(gè)控制芯片	
  SCS2();
	
  LCM_WrCommand(LCM_STARTROW);		// 設(shè)置顯示起始行為0

  for(x=0; x<8; x++)
  { LCM_WrCommand(LCM_ADDRSTRX+x);	// 設(shè)置頁地址，即X
  	LCM_WrCommand(LCM_ADDRSTRY);	// 設(shè)置列地址，即Y
    for(y=0; y<64; y++)
    { LCM_WrData(filldata);
	}	
  }

  CCS2();
}

    
/***********************************************************************
* 名稱：LCM_DispIni()
* 功能：LCM顯示初始化
* 入口參數(shù)：無
* 出口參數(shù)：無
* 注：初化顯示后，清屏并設(shè)置顯示起始行為0
*     會(huì)復(fù)位LCM_DISPCX，LCM_DISPCY.(并會(huì)只選中CS1)
***********************************************************************/
void LCM_DispIni(void)
{ uint32  i;

    // 設(shè)置引腳連接模塊
#if LCM_CS1 < 16
    PINSEL0 &= ~(3 << (2 * LCM_CS1));
#else
    PINSEL1 &= ~(3 << (2 * (LCM_CS1 - 16)));
#endif

#if LCM_CS2 < 16
    PINSEL0 &= ~(3 << (2 * LCM_CS2));
#else
    PINSEL1 &= ~(3 << (2 * (LCM_CS2 - 16)));
#endif

#if LCM_DI < 16
//    PINSEL0 &= ~(3 << (2 * LCM_DI));
#else
    PINSEL1 &= ~(3 << (2 * (LCM_DI - 16)));
#endif

#if LCM_RST < 16
    PINSEL0 &= ~(3 << (2 * LCM_RST));
#else
    PINSEL1 &= ~(3 << (2 * (LCM_RST - 16)));
#endif

#if LCM_E < 16
    PINSEL0 &= ~(3 << (2 * LCM_E));
#else
    PINSEL1 &= ~(3 << (2 * (LCM_E - 16)));
#endif

#if  BUS_NO<9
    for (i = BUS_NO; i < BUS_NO+8; i++)
    {
        PINSEL0 &= ~(3 << (2 * i));
    }

#else
    for (i = BUS_NO; i < 16; i++)
    {
        PINSEL0 &= ~(3 << (2 * i));
    }
    
    for (; i < (BUS_NO+8); i++)
    {
        PINSEL1 &= ~(3 << (2 * (i-16)));
    }
#endif    
	
  // 設(shè)置I/O為輸出方式
  IO0DIR = IO0DIR|(1<<LCM_CS1)|(1<<LCM_CS2)|(1<<LCM_DI)|(1<<LCM_RST)|(1<<LCM_E);
  IO0DIR = IO0DIR|(0xFF<<BUS_NO);	
  
  // 復(fù)位LCM
  CRST();				
  for(i=0; i<5000; i++);
  SRST();   
  for(i=0; i<5000; i++); 

  SCS1();					// 選中兩個(gè)控制芯片	
  SCS2();  

  LCM_WrCommand(LCM_DISPON);	// 打開顯示	
  LCM_WrCommand(LCM_STARTROW);	// 設(shè)置顯示起始行為0
        
  LCM_WrCommand(LCM_ADDRSTRX);	// 設(shè)置頁地址，即X	
  LCM_WrCommand(LCM_ADDRSTRY);	// 設(shè)置列地址，即Y	
}



/////////////////////////////////////////////////////////////////////////////


/****************************************************************************
* 名稱：GUI_FillSCR()
* 功能：全屏填充。直接使用數(shù)據(jù)填充顯示緩沖區(qū)。
* 入口參數(shù)：dat		填充的數(shù)據(jù)
* 出口參數(shù)：無
* 說明：用戶根據(jù)LCM的實(shí)際情況編寫此函數(shù)。
****************************************************************************/
void  GUI_FillSCR(TCOLOR dat)
{  uint32 i,j;
  
   // 填充緩沖區(qū)
   for(i=0; i<(GUI_LCM_YMAX/8); i++)
   {  for(j=0; j<GUI_LCM_XMAX; j++)
      {  gui_disp_buf[i][j] = dat;
      }
   }
   
   // 填充LCM
   LCM_DispFill(dat);
}


/****************************************************************************
* 名稱：GUI_Initialize()
* 功能：初始化GUI，包括初始化顯示緩沖區(qū)，初始化LCM并清屏。
* 入口參數(shù)：無
* 出口參數(shù)：無
* 說明：用戶根據(jù)LCM的實(shí)際情況編寫此函數(shù)。
****************************************************************************/
void  GUI_Initialize(void)
{  LCM_DispIni();					// 初始化LCM模塊工作模式，純圖形模式
   GUI_FillSCR(0x00);				// 初始化緩沖區(qū)為0x00，并輸出屏幕(清屏)
}


uint8 const  DEC_HEX_TAB[8] = {0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80};
/****************************************************************************
* 名稱：GUI_Point()
* 功能：在指定位置上畫點(diǎn)。
* 入口參數(shù)：x		指定點(diǎn)所在列的位置
*           y		指定點(diǎn)所在行的位置
*           color	顯示顏色(對(duì)于黑白色LCM，為0時(shí)滅，為1時(shí)顯示)
* 出口參數(shù)：返回值為1時(shí)表示操作成功，為0時(shí)表示操作失敗。
* 說明：操作失敗原因是指定地址超出緩沖區(qū)范圍。
****************************************************************************/
uint8  GUI_Point(uint8 x, uint8 y, TCOLOR color)
{  uint8   bak;
   
   // 參數(shù)過濾 
   if(x>=GUI_LCM_XMAX) return(0);
   if(y>=GUI_LCM_YMAX) return(0);
   
   // 設(shè)置相應(yīng)的點(diǎn)為1或0 
   bak = LCM_ReadByte(x,y);
   if(0==color)
   {  bak &= (~DEC_HEX_TAB[y&0x07]);
   }
   else
   {  bak |= DEC_HEX_TAB[y&0x07];
   }
  
   // 刷新顯示 
   LCM_WriteByte(x, y, bak);
   return(1);
}


/****************************************************************************
* 名稱：GUI_ReadPoint()
* 功能：讀取指定點(diǎn)的顏色。
* 入口參數(shù)：x		指定點(diǎn)所在列的位置
*           y		指定點(diǎn)所在行的位置
*           ret     保存顏色值的指針
* 出口參數(shù)：返回0表示指定地址超出緩沖區(qū)范圍
* 說明：對(duì)于單色，設(shè)置ret的d0位為1或0，4級(jí)灰度則為d0、d1有效，8位RGB則d0--d7有效，
*      RGB結(jié)構(gòu)則R、G、B變量有效。
****************************************************************************/
uint8  GUI_ReadPoint(uint8 x, uint8 y, TCOLOR *ret)
{  uint8  bak;

   // 參數(shù)過濾
   if(x>=GUI_LCM_XMAX) return(0);
   if(y>=GUI_LCM_YMAX) return(0);
  
   bak = LCM_ReadByte(x,y);
   if( (bak & (DEC_HEX_TAB[y&0x07])) == 0 ) *ret = 0x00;
     else  *ret = 0x01;
   
   return(1);
}


/****************************************************************************
* 名稱：GUI_HLine()
* 功能：畫水平線。
* 入口參數(shù)：x0		水平線起點(diǎn)所在列的位置
*           y0		水平線起點(diǎn)所在行的位置
*           x1      水平線終點(diǎn)所在列的位置
*           color	顯示顏色(對(duì)于黑白色LCM，為0時(shí)滅，為1時(shí)顯示)
* 出口參數(shù)：無
* 說明：操作失敗原因是指定地址超出緩沖區(qū)范圍。
****************************************************************************/
void  GUI_HLine(uint8 x0, uint8 y0, uint8 x1, TCOLOR color) 
{  uint8  bak;

   if(x0>x1) 						// 對(duì)x0、x1大小進(jìn)行排列，以便畫圖
   {  bak = x1;
      x1 = x0;
      x0 = bak;
   }
   
   do
   {  GUI_Point(x0, y0, color);		// 逐點(diǎn)顯示，描出垂直線
      x0++;
   }while(x1>=x0);
}


/***********************************************************************
* 名稱：GUI_RLine()
* 功能：畫豎直線。根據(jù)硬件特點(diǎn)，實(shí)現(xiàn)加速。
* 入口參數(shù)：x0		垂直線起點(diǎn)所在列的位置
*           y0		垂直線起點(diǎn)所在行的位置
*           y1      垂直線終點(diǎn)所在行的位置
*           color	顯示顏色(對(duì)于黑白色LCM，為0時(shí)滅，為1時(shí)顯示)
* 出口參數(shù)：	無
* 說明：操作失敗原因是指定地址超出緩沖區(qū)范圍。
***********************************************************************/
void  GUI_RLine(uint8 x0, uint8 y0, uint8 y1, TCOLOR color) 
{  uint8  bak;
   uint8  wr_dat;
  
   if(y0>y1) 		// 對(duì)y0、y1大小進(jìn)行排列，以便畫圖
   {  bak = y1;
      y1 = y0;
      y0 = bak;
   }
   
   do
   {  // 先讀取當(dāng)前點(diǎn)的字節(jié)數(shù)據(jù)
      bak = LCM_ReadByte(x0,y0);	
      
      // 進(jìn)行'與'/'或'操作后，將正確的數(shù)據(jù)寫回LCM
      // 若y0和y1不是同一字節(jié)，則y0--當(dāng)前字節(jié)結(jié)束，即(y0+8)&0x38，全寫1，或者0。
      // 若y0和y1是同一字節(jié)，則y0--y1，要全寫1，或者0。
      // 方法：dat=0xff，然后按y0清零dat低位，按y1清零高位。
      if((y0>>3) != (y1>>3))		// 豎直線是否跨越兩個(gè)字節(jié)(或以上)
      {  wr_dat = 0xFF << (y0&0x07);// 清0低位
      
         if(color)					
         {  wr_dat = bak | wr_dat;	// 若color不為0，則顯示
         }
         else
         {  wr_dat = ~wr_dat;		// 若color為0，則清除顯示
            wr_dat = bak & wr_dat;
         }
         LCM_WriteByte(x0,y0, wr_dat);
         y0 = (y0+8)&0x38;
      }
      else
      {  wr_dat = 0xFF << (y0&0x07);
         wr_dat = wr_dat &  ( 0xFF >> (7-(y1&0x07)) );
              
         if(color)					
         {  wr_dat = bak | wr_dat;	// 若color不為0，則顯示
         }
         else
         {  wr_dat = ~wr_dat;		// 若color為0，則清除顯示
            wr_dat = bak & wr_dat;
         }
         LCM_WriteByte(x0,y0, wr_dat);
         return;
      } // end of if((y0>>3) != (y1>>3))... else...
   }while(y1>=y0);

}