/***********常用操作命令和參數定義***************/
#define	 DISPON	0x3f	/*顯示on		*/
#define	 DISPOFF	0x3e	/*顯示off		*/
#define	 DISPFIRST	0xc0	/*顯示起始行定義	*/
#define	 SETX		0x40	/*X定位設定指令（頁）	*/
#define	 SETY		0xb8	/*Y定位設定指令（列）	*/
#define	 Lcdbusy	0x80	/*LCM忙判斷位		*/

/**************顯示分區邊界位置*****************/
#define	 MODL		0x00	/*左區			*/
#define	 MODR		0x40	/*中區和右區分界	*/
#define	 LCMLIMIT	0x80	/*顯示區的右邊界	*/

/****************全局變量定義*******************/
Uchar col,row,cbyte;		/*列x,行(頁)y,輸出數據	*/
bit xy;				/*畫線方向標志：1水平	*/

/*****************函數列表**********************/
void Lcminit(void);		/*液晶模塊初始化	*/
void Delay(Uchar);		/*延時，入口數為Ms	*/
void lcdbusyL(void);		/*busy判斷、等待(左區)	*/

void lcdbusyR(void);		/*busy判斷、等待(右區)	*/
void Putedot(Uchar);		/*半角字符輸出		*/
void Putcdot(Uchar);		/*全角(漢字)輸出	*/
void Wrdata(Uchar);		/*數據輸出給LCM		*/
void Lcmcls( void );		/*LCM全屏幕清零(填充0)	*/
void wtcom(void);		/*公用busy等待		*/
void Locatexy(void);		/*光標定位		*/
void WrcmdL(Uchar);		/*左區命令輸出		*/

void WrcmdR(Uchar);		/*右區命令輸出		*/
void Putstr(Uchar *puts,Uchar i);	/*中英文字符串輸出	*/
void Rollscreen(Uchar x);	/*屏幕向上滾動演示	*/
void Rddata(void);		/*  從液晶片上讀數據	*/
void Linehv(Uchar length);	/*橫(豎)方向畫線	*/
void point(void);		/*打點			*/
void Linexy(Uchar endx,Uchar endy);

void Display(Uchar hang,Uchar lie,Uchar *chuan,Uchar shu );//字符輸出函數





/************************************************/
/*畫線。任意方向的斜線，不支持垂直的或水平線	*/
/************************************************/

void Linexy(Uchar endx,Uchar endy)
{
	register Uchar t;
	int xerr=0,yerr=0,delta_x,delta_y,distance;
	Uchar incx,incy;

/* 	compute the distance in both directions */
	delta_x=endx-col;
	delta_y=endy-row;

/* compute  the direction of the increment ,
	an increment of "0" means either a vertical or horizontal lines */

	if(delta_x>0) incx=1;
	else if( delta_x==0 ) incx=0;
		else incx=-1;


	if(delta_y>0) incy=1;
	else if( delta_y==0 ) incy=0;
		else incy=-1;

/*  determine which distance is greater */
	delta_x = cabs( delta_x );
	delta_y = cabs( delta_y );

	if( delta_x > delta_y ) distance=delta_x;
	else distance=delta_y;

/* draw the line */
	for( t=0;t <= distance+1; t++ ) {
		point();
 	   xerr += delta_x ;
		yerr += delta_y ;
		if( xerr > distance ) {
			xerr-=distance;
 		    col+=incx;
		}
		if( yerr > distance ) {
			yerr-=distance;
 		    row+=incy;
		}

	}
}

/****************************************/
/*畫線。只提供X或Y方向的，不支持斜線	*/
/****************************************/
void Linehv(Uchar length)
	{
		Uchar xs,ys;
		if (xy){ys = col;
			for (xs=0;xs<length;xs++){
					col = ys + xs;
					point();}
				}
		else	{xs = row;
			for (ys=0;ys<length;ys++){
					row = xs + ys;
					point();}
				}
}

/****************************************/
/*	畫點				*/
/****************************************/

void point(void)
	{
		Uchar	x1,y1,x,y;
		x1=col;
		y1=row;
		row=y1>>3;		/*取Y方向分頁地址	*/
		Rddata();
		y=y1&0x07;		/*字節內位置計算	*/
		x=0x01;
		x=x<<y;			/*移入所畫點		*/
		Wrdata(cbyte|x);	/*畫上屏幕		*/
		col=x1;			/*恢復xy坐標		*/
		row=y1;
	}

/****************************************/
/*	屏幕滾動定位			*/
/****************************************/
void Rollscreen(Uchar x)
	{
		cbyte = DISPFIRST|x;	/*定義顯示起始行為x?*/
		WrcmdL(cbyte);
		
		WrcmdR(cbyte);
	}
  
/****************************************/
/*	一個字串的輸出			*/
/****************************************/
void Putstr(Uchar *puts,Uchar i)
	{
		Uchar j,X;
		for (j=0;j<i;j++)
		{
		X = puts[j];
			if (X&0x80)
				{
					Putcdot(X&0x7f);	/*只保留低7位*/
				}
			else Putedot(X-0x20);		/*ascii碼表從0x20開始*/
		}
	}

/****************************************/
/*   半角字符點陣碼數據輸出		*/
/****************************************/
void Putedot(Uchar Order)
	{
	Uchar i,bakerx,bakery;	/*共定義4個局部變量			*/
	int x;			/*偏移量，字符量少的可以定義為UCHAR	*/
	bakerx = col;		/*暫存x,y坐標，已備下半個字符使用	*/
	bakery = row;
	x=Order * 0x10;		/*半角字符，每個字符16字節	*/
/*上半個字符輸出，8列	*/
	for(i=0;i<8;i++)
		{
		cbyte = Ezk[x];				/*取點陣碼，rom數組	*/
		Wrdata(cbyte);				/*寫輸出一字節		*/
		x++;
		col++;
		if (col==LCMLIMIT){col=0;row++;row++;};	/*下一列，如果列越界換行*/
			if (row>7) row=0;		/*如果行越界，返回首行	*/
		}					/*上半個字符輸出結束	*/

	col = bakerx;					/*列對齊		*/
	row = bakery+1;					/*指向下半個字符行	*/
/*下半個字符輸出，8列	*/
	for(i=0;i<8;i++)
		{
		cbyte = Ezk[x];				/*取點陣碼		*/
		Wrdata(cbyte);				/*寫輸出一字節		*/
		x++;
		col++;
		if (col==LCMLIMIT){col=0;row=row+2;};	/*下一列，如果列越界換行*/
			if (row>7) row=1;		/*如果行越界，返回首行	*/
		}					/*下半個字符輸出結束	*/
	row=bakery;
	}						/*整個字符輸出結束	*/


/****************************************/
/*  全角字符點陣碼數據輸出		*/
/****************************************/
void Putcdot(Uchar Order)
	{
	Uchar i,bakerx,bakery;		/*共定義3個局部變量		*/
	int x;				/*偏移量，字符量少的可以定義為UCHAR	*/
	bakerx = col;			/*暫存x,y坐標，已備下半個字符使用	*/
	bakery = row;
	x=Order * 0x20;			/*每個字符32字節	*/
	
/*上半個字符輸出，16列	*/
	for(i=0;i<16;i++)
		{
		Wrdata(Hzk[x]);				/*寫輸出一字節		*/
		x++;
		col++;
		if (col==LCMLIMIT){ col=0;row++;row++;}	/*下一列，如果列越界換行*/
			if (row>6) row=0;		/*如果行越界，返回首行	*/
		}					/*上半個字符輸出結束	*/
		
/*下半個字符輸出，16列	*/
	col = bakerx;
	row = bakery+1;
	for(i=0;i<16;i++)				/*下半部分*/
		{
		Wrdata(Hzk[x]);
		x++;
		col++;
		if (col==LCMLIMIT){col=0;row++;row++;}	/*下一列，如果列越界換行*/
			if (row>7) row=1;		/*如果行越界，返回首行	*/
		}					/*下半個字符輸出結束	*/
	row = bakery;
	}						/*整個字符輸出結束	*/

/****************************************/
/*	清屏，全屏幕清零		*/
/****************************************/
void Lcmcls( void )
	{
	for(row=0;row<8;row++)
   		for(col=0;col<LCMLIMIT;col++) Wrdata(0);
	}

/****************************************/
/*  從液晶片上讀數據，保留在全局變量中	*/
/****************************************/

void Rddata(void)
	{
	Locatexy();		/*坐標定位，返回時保留分區狀態不變	*/
		Datalcm=0xFF;
		Dilcm = 1;	/*數據*/
		Rwlcm = 1;	/*讀數據*/
		Elcm = 1;	/*讀入到LCM*/
		_nop_();
		cbyte = Datalcm;	/*虛讀一次 */
		Elcm = 0;
	   Locatexy();		/*坐標定位，返回時保留分區狀態不變	*/
		Datalcm=0xFF;
		_nop_();
		Dilcm = 1;	/*數據*/
		Rwlcm = 1;	/*讀數據*/
		Elcm = 1;	/*讀入到LCM*/
		_nop_();
		cbyte = Datalcm;	/*從數據口讀數據，真讀 */
		Elcm = 0;
	}

/****************************************/
/*	數據寫輸出			*/
/****************************************/

void Wrdata(Uchar X)
	{
	Locatexy();		/*坐標定位，返回時保留分區狀態不變	*/
    wtcom();
		Dilcm = 1;	/*數據輸出*/
		Rwlcm = 0;	/*寫輸出  */
		Datalcm = X;	/*數據輸出到數據口 */
		Elcm = 1;	/*讀入到LCM*/
		//_nop_();
      Delay(1);
		Elcm = 0;
	}

/****************************************/
/* 命令輸出，每次輸出一個分區控制口	*/
/****************************************/

void Wrcmd(Uchar X)
{
   Locatexy();		/*確定分區，返回時保留分區狀態不變	*/
	wtcom();		/*等待LCM操作允許	*/
	Dilcm = 0;			/*數據操作	*/
	Rwlcm = 0;			/*寫輸出  	*/
	Datalcm = X;			/*數據輸出到數據口 */
	Elcm = 1;_nop_();Elcm = 0;	/*讀入到LCM*/
	}

/********************************/
/* 命令輸出到左區控制口		*/
/********************************/

void WrcmdL(Uchar X)
	{
		lcdbusyL();		/*確定分區，返回時保留分區狀態不變*/
		Dilcm = 0;			/*命令操作	*/
		Rwlcm = 0;			/*寫輸出  	*/
		Datalcm = X;			/*數據輸出到數據口 */
		Elcm = 1;_nop_();Elcm = 0;	/*讀入到LCM*/
	}


/********************************/
/* 命令輸出到右區控制口		*/
/********************************/

void WrcmdR(Uchar X)
	{
		lcdbusyR();	/*確定分區，返回時保留分區狀態不變	*/
		Dilcm = 0;			/*命令操作	*/
		Rwlcm = 0;			/*寫輸出  	*/
		Datalcm = X;			/*命令輸出到數據口 */
		Elcm = 1;_nop_();Elcm = 0;	/*讀入到LCM*/
	}

/********************************************************/
/* 分區操作允許等待,返回時保留分區選擇狀態		*/
/********************************************************/
void lcdbusyL(void)
	{
        CS1LCM = 0;		/*CLR	CS1		*/
        CS2LCM = 1;		/*SETB	CS2		*/

	     wtcom();		/* waitting for enable	*/
	}


void lcdbusyR(void)
	{
        CS1LCM = 1;		/*SETB	CS1		*/
        CS2LCM = 0;		/*SETB	CS2		*/

	     wtcom();		/* waitting for enable	*/
	}

void wtcom(void)
	{
	unsigned char Datalcm1;
	Dilcm = 0;		/*CLR	DI		*/
	Rwlcm = 1;		/*SETB	RW		*/
   Elcm  = 1;
	_nop_();		
	Datalcm1=P2;
 
    Elcm  = 0;
	}

/********************************************************/
/*根據設定的坐標數據，定位LCM上的下一個操作單元位置	*/
/********************************************************/
void Locatexy(void)
	{
	unsigned char  x,y;
	switch (col&0xc0)		/*  col.and.0xC0	*/
		{			/*條件分支執行		*/
		case 0:		{lcdbusyL();break;}	/*左區	*/
		//case 0x40:	{lcdbusyM();break;}	/*中區	*/
		case 0x40:	{lcdbusyR();break;}	/*右區	*/
		}
	x = col&0x3F|SETX;		/*  col.and.0x3f.or.setx	*/
	y = row&0x07|SETY;		/*  row.and.0x07.or.sety	*/
		wtcom();		/*  waitting for enable		*/
		Dilcm = 0;			/*CLR	DI	*/
		Rwlcm = 0;			/*CLR	RW	*/
		Datalcm = y;			/*MOV	P0,Y	*/
		Elcm = 1;_nop_();Elcm = 0;
		wtcom();		/*  waitting for enable		*/
		Dilcm = 0;			/*CLR	DI	*/
		Rwlcm = 0;			/*CLR	RW	*/
		Datalcm = x;			/*MOV	P0,X	*/
		Elcm = 1;_nop_();Elcm = 0;
	}

/********************************/
/*液晶屏初始化			*/
/********************************/

void Lcminit(void)
	{
		cbyte = DISPOFF;	/*關閉顯示屏	*/
   	WrcmdL(cbyte);

		WrcmdR(cbyte);
		cbyte = DISPON;		/*打開顯示屏	*/
		WrcmdL(cbyte);

		WrcmdR(cbyte);
		cbyte = DISPFIRST;	/*定義顯示起始行為零	*/

		WrcmdR(cbyte);
		Lcmcls();
		col=0;		/*清屏		*/
		row=0;
		Locatexy();
	}
/********************************/
/* 延時				*/
/********************************/
void Delay(Uchar MS)
	{
		Uchar us,usn;
		while(MS!=0)
			{ usn = 1;
				while(usn!=0)
					{
						us=0xf0;
						while (us!=0){us--;};
						usn--;
					}
				MS--;
			}
	}

void Display(Uchar hang,Uchar lie,Uchar *chuan,Uchar shu )
  
     {row =hang;
      col=lie;
      Putstr(chuan,shu);
     }