lcd.c

LM128*64液晶驱动程序

{    
	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==LCDLIMIT){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==LCDLIMIT){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==LCDLIMIT){ 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==LCDLIMIT){col=0;row++;row++;}	/*下一列，如果列越界换行*/
			if (row>7) row=1;	/*如果行越界，返回首行*/
		}					/*下半个字符输出结束*/
	row = bakery;
	}						/*整个字符输出结束*/

/***************************从液晶片上读数据，保留在全局变量中***************************/
void Rddata(void)
	{  
	    Locatexy();			/*坐标定位，返回时保留分区状态不变*/
		Data=0xFF;
	    RS = 1;				/*数据*/
		RW = 1;			/*读数据*/
		E = 1;				/*读入到LCM*/
		_nop_();
		cbyte = Data;			/*虚读一次*/
		E= 0;
	     Locatexy();			/*坐标定位，返回时保留分区状态不变*/
		Data=0xFF;
		_nop_();
		RS = 1;				/*数据*/
		RW = 1;			/*读数据*/
		E = 1;				/*读入到LCM*/
		_nop_();
		cbyte = Data;			/*从数据口读数据，真读*/
		E= 0;
	}

/****************************************延时*******************************************/
void Delay(Uchar nMS)
	{
		Uchar us,usn;
		while(nMS!=0)
			{ usn = 4;
				while(usn!=0)
					{
						us=0xf0;
						while (us!=0){us--;};
						usn--;
					}
				nMS--;
			}
	}

/************************************定义字符串数组*************************************/
Uchar code STR1[]=" ^_^FEDLT";
Uchar code STR2[]="QQ  :282695105";
Uchar code STR3[]="TEL:[phone]";
Uchar code STR4[]="  Welcome you!";
Uchar code STR5[]={0x80,0x81};
/************************************定义中文字库***************************************/
Uchar code Hzk[]={
0x40, 0x40, 0x40, 0x5f, 0xd1, 0x51, 0x51, 0x51, 0x51, 0x51, 0x51, 0x5f, 0x40, 0x40, 0x40, 0x00, /*号*/
0x00, 0x00, 0x00, 0x02, 0x07, 0x02, 0x02, 0x22, 0x42, 0x82, 0x42, 0x3e, 0x00, 0x00, 0x00, 0x00, 

};
/*******************************定义ASCII字库8列*16行********************************/
Uchar code Ezk[]={
/*-文字:（space）--0x20*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:!--0x21*/
	 0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x27,0x00,0x00,0x00,0x00,
/*-文字:"--0x22*/
	 0x00,0x08,0x04,0x02,0x08,0x04,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:#--0x23*/
	 0x40,0x40,0xF8,0x40,0x40,0xF8,0x40,0x00,0x04,0x3F,0x04,0x04,0x3F,0x04,0x04,0x00,
/*-文字:$--0x24*/
	 0x00,0x70,0x88,0xFC,0x08,0x08,0x30,0x00,0x00,0x1C,0x20,0xFF,0x21,0x22,0x1C,0x00,
/*-文字:%--0x25*/
	 0xF0,0x08,0xF0,0x80,0x70,0x08,0x00,0x00,0x00,0x31,0x0E,0x01,0x1E,0x21,0x1E,0x00,
/*-文字:&--0x26*/
	 0x00,0xF0,0x08,0x88,0x70,0x00,0x00,0x00,0x1E,0x21,0x23,0x24,0x18,0x16,0x20,0x00,
/*-文字:'--0x27*/
	 0x20,0x18,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:(--0x28*/
	 0x00,0x00,0x00,0x00,0xC0,0x30,0x08,0x04,0x00,0x00,0x00,0x00,0x03,0x0C,0x10,0x20,
/*-文字:)--0x29*/
	 0x04,0x08,0x30,0xC0,0x00,0x00,0x00,0x00,0x20,0x10,0x0C,0x03,0x00,0x00,0x00,0x00,
/*-文字:*--0x2a*/
	 0x40,0x40,0x80,0xF0,0x80,0x40,0x40,0x00,0x02,0x02,0x01,0x0F,0x01,0x02,0x02,0x00,
/*-文字:+--0x2b*/
	 0x00,0x00,0x00,0xE0,0x00,0x00,0x00,0x00,0x01,0x01,0x01,0x0F,0x01,0x01,0x01,0x00,
/*-文字:,--0x2c*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80,0x60,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:---0x2d*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x00,
/*-文字:.--0x2e*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:/--ox2f*/
	 0x00,0x00,0x00,0x00,0x00,0xE0,0x18,0x04,0x00,0x40,0x30,0x0C,0x03,0x00,0x00,0x00,
/*-文字:0--0x30*/
	 0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00,0x00,0x0F,0x10,0x20,0x20,0x10,0x0F,0x00,
/*-文字:1--0x31*/
	 0x00,0x10,0x10,0xF8,0x00,0x00,0x00,0x00,0x00,0x20,0x20,0x3F,0x20,0x20,0x00,0x00,
/*-文字:2--0x32*/
	 0x00,0x70,0x08,0x08,0x08,0x88,0x70,0x00,0x00,0x30,0x28,0x24,0x22,0x21,0x30,0x00,
/*-文字:3--0x33*/
	 0x00,0x30,0x08,0x88,0x88,0x48,0x30,0x00,0x00,0x18,0x20,0x20,0x20,0x11,0x0E,0x00,
/*-文字:4--0x34*/
	 0x00,0x00,0xC0,0x20,0x10,0xF8,0x00,0x00,0x00,0x07,0x04,0x24,0x24,0x3F,0x24,0x00,
/*-文字:5--0x35*/
	 0x00,0xF8,0x08,0x88,0x88,0x08,0x08,0x00,0x00,0x19,0x21,0x20,0x20,0x11,0x0E,0x00,
/*-文字:6--0x36*/
	 0x00,0xE0,0x10,0x88,0x88,0x18,0x00,0x00,0x00,0x0F,0x11,0x20,0x20,0x11,0x0E,0x00,
/*-文字:7--0x37*/
	 0x00,0x38,0x08,0x08,0xC8,0x38,0x08,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:8--0x38*/
	 0x00,0x70,0x88,0x08,0x08,0x88,0x70,0x00,0x00,0x1C,0x22,0x21,0x21,0x22,0x1C,0x00,
/*-文字:9--0x39*/
	 0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00,0x00,0x00,0x31,0x22,0x22,0x11,0x0F,0x00,
/*-文字::--*/
	 0x00,0x00,0x60,0x60,0x00,0x00,0x00,0x00,0x00,0x00,0x18,0x18,0x00,0x00,0x00,0x00,
/*-文字:/--*/
	 0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x80,0x60,0x00,0x00,0x00,0x00,
/*-文字:<--*/
	 0x00,0x00,0x80,0x40,0x20,0x10,0x08,0x00,0x00,0x01,0x02,0x04,0x08,0x10,0x20,0x00,
/*-文字:=--*/
	 0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x00,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x00,
/*-文字:>--*/
	 0x00,0x08,0x10,0x20,0x40,0x80,0x00,0x00,0x00,0x20,0x10,0x08,0x04,0x02,0x01,0x00,
/*-文字:?--*/
	 0x00,0x30,0x08,0x08,0x08,0x88,0x70,0x00,0x00,0x00,0x00,0x26,0x01,0x00,0x00,0x00,
/*-文字:@--*/
	 0xC0,0x30,0xC8,0x28,0xE8,0x10,0xE0,0x00,0x07,0x18,0x27,0x28,0x27,0x28,0x07,0x00,
/*-文字:A--*/
	 0x00,0x00,0xE0,0x18,0x18,0xE0,0x00,0x00,0x30,0x0F,0x04,0x04,0x04,0x04,0x0F,0x30,
/*-文字:B--*/
	 0xF8,0x08,0x08,0x08,0x08,0x90,0x60,0x00,0x3F,0x21,0x21,0x21,0x21,0x12,0x0C,0x00,
/*-文字:C--*/
	 0xE0,0x10,0x08,0x08,0x08,0x10,0x60,0x00,0x0F,0x10,0x20,0x20,0x20,0x10,0x0C,0x00,
/*-文字:D--*/
	 0xF8,0x08,0x08,0x08,0x08,0x10,0xE0,0x00,0x3F,0x20,0x20,0x20,0x20,0x10,0x0F,0x00,
/*-文字:E--*/
	 0x00,0xF8,0x08,0x08,0x08,0x08,0x08,0x00,0x00,0x3F,0x21,0x21,0x21,0x21,0x20,0x00,
/*-文字:F--	*/
	 0xF8,0x08,0x08,0x08,0x08,0x08,0x08,0x00,0x3F,0x01,0x01,0x01,0x01,0x01,0x00,0x00,
/*-文字:G--*/
	 0xE0,0x10,0x08,0x08,0x08,0x10,0x60,0x00,0x0F,0x10,0x20,0x20,0x21,0x11,0x3F,0x00,
/*-文字:H--*/
	 0x00,0xF8,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x3F,0x01,0x01,0x01,0x01,0x3F,0x00,
/*-文字:I--*/
	 0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:J--*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x1C,0x20,0x20,0x20,0x20,0x1F,0x00,
/*-文字:K--*/
	 0x00,0xF8,0x00,0x80,0x40,0x20,0x10,0x08,0x00,0x3F,0x01,0x00,0x03,0x04,0x18,0x20,
/*-文字:L--*/
	 0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x20,0x20,0x20,0x20,0x20,0x20,0x00,
/*-文字:M--*/
	 0xF8,0xE0,0x00,0x00,0x00,0xE0,0xF8,0x00,0x3F,0x00,0x0F,0x30,0x0F,0x00,0x3F,0x00,
/*-文字:N--*/
	 0x00,0xF8,0x30,0xC0,0x00,0x00,0xF8,0x00,0x00,0x3F,0x00,0x01,0x06,0x18,0x3F,0x00,
/*-文字:O--*/
	 0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00,0x00,0x0F,0x10,0x20,0x20,0x10,0x0F,0x00,
/*-文字:P--	*/
	 0xF8,0x08,0x08,0x08,0x08,0x10,0xE0,0x00,0x3F,0x02,0x02,0x02,0x02,0x01,0x00,0x00,
/*-文字:Q--*/
	 0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00,0x00,0x0F,0x10,0x20,0x2C,0x10,0x2F,0x00,
/*-文字:R--*/
	 0xF8,0x08,0x08,0x08,0x08,0x90,0x60,0x00,0x3F,0x01,0x01,0x01,0x07,0x18,0x20,0x00,
/*-文字:S--*/
	 0x60,0x90,0x88,0x08,0x08,0x10,0x20,0x00,0x0C,0x10,0x20,0x21,0x21,0x12,0x0C,0x00,
/*-文字:T--*/
	 0x08,0x08,0x08,0xF8,0x08,0x08,0x08,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:U--*/
	 0xF8,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x0F,0x10,0x20,0x20,0x20,0x10,0x0F,0x00,
/*-文字:V--*/
	 0x18,0xE0,0x00,0x00,0x00,0xE0,0x18,0x00,0x00,0x01,0x0E,0x30,0x0E,0x01,0x00,0x00,
/*-文字:W--*/
	 0xF8,0x00,0xC0,0x38,0xC0,0x00,0xF8,0x00,0x03,0x3C,0x03,0x00,0x03,0x3C,0x03,0x00,
/*-文字:X--*/
	 0x08,0x30,0xC0,0x00,0xC0,0x30,0x08,0x00,0x20,0x18,0x06,0x01,0x06,0x18,0x20,0x00,
/*-文字:Y--*/
	 0x08,0x30,0xC0,0x00,0xC0,0x30,0x08,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:Z--*/
	 0x08,0x08,0x08,0x08,0xC8,0x28,0x18,0x00,0x30,0x2C,0x22,0x21,0x20,0x20,0x20,0x00,
/*-文字:{--*/
	 0x00,0x00,0x00,0x80,0x7E,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x20,0x00,0x00,
/*-文字:\--*/
	 0x00,0x08,0x70,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,0x0E,0x30,0xC0,0x00,
/*-文字:}--*/
	 0x00,0x02,0x7E,0x80,0x00,0x00,0x00,0x00,0x00,0x20,0x3F,0x00,0x00,0x00,0x00,0x00,
/*-文字:^--*/
	 0x00,0x08,0x04,0x02,0x02,0x04,0x08,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:_--*/
	 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,
/*-文字:`--*/
	 0x00,0x00,0x02,0x06,0x04,0x08,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/*-文字:a--*/
	 0x00,0x00,0x80,0x80,0x80,0x80,0x00,0x00,0x00,0x19,0x24,0x24,0x24,0x14,0x3F,0x00,
/*-文字:b--*/
	 0x00,0xF8,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0x3F,0x11,0x20,0x20,0x20,0x1F,0x00,
/*-文字:c--*/
	 0x00,0x00,0x80,0x80,0x80,0x80,0x00,0x00,0x0E,0x11,0x20,0x20,0x20,0x20,0x11,0x00,
/*-文字:d--*/
	 0x00,0x00,0x80,0x80,0x80,0x00,0xF8,0x00,0x00,0x1F,0x20,0x20,0x20,0x11,0x3F,0x00,
/*-文字:e--*/
	 0x00,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0x0E,0x15,0x24,0x24,0x24,0x25,0x16,0x00,
/*-文字:f--*/
	 0x00,0x80,0x80,0xF0,0x88,0x88,0x88,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:g--*/
	 0x00,0x00,0x80,0x80,0x80,0x80,0x80,0x00,0x40,0xB7,0xA8,0xA8,0xA8,0xA7,0x40,0x00,
/*-文字:h--*/
	 0x00,0xF8,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0x3F,0x01,0x00,0x00,0x00,0x3F,0x00,
/*-文字:i--*/
	 0x00,0x00,0x00,0x98,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:j--*/
	 0x00,0x00,0x00,0x00,0x98,0x00,0x00,0x00,0x00,0x80,0x80,0x80,0x7F,0x00,0x00,0x00,
/*-文字:k--*/
	 0x00,0xF8,0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x3F,0x04,0x02,0x0D,0x10,0x20,0x00,
/*-文字:l--*/
	 0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,
/*-文字:m--*/
	 0x80,0x80,0x80,0x80,0x80,0x80,0x00,0x00,0x3F,0x00,0x00,0x3F,0x00,0x00,0x3F,0x00,
/*-文字:n--*/
	 0x00,0x80,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0x3F,0x01,0x00,0x00,0x00,0x3F,0x00,
/*-文字:o--*/
	 0x00,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0x0E,0x11,0x20,0x20,0x20,0x11,0x0E,0x00,
/*-文字:p--*/
	 0x00,0x80,0x00,0x80,0x80,0x80,0x00,0x00,0x00,0xFF,0x11,0x20,0x20,0x20,0x1F,0x00,
/*-文字:q--*/
	 0x00,0x00,0x80,0x80,0x80,0x00,0x80,0x00,0x00,0x1F,0x20,0x20,0x20,0x11,0xFF,0x00,
/*-文字:r--*/
	 0x00,0x00,0x80,0x00,0x00,0x80,0x80,0x00,0x00,0x00,0x3F,0x01,0x01,0x00,0x00,0x00,
/*-文字:s--*/
	 0x00,0x00,0x80,0x80,0x80,0x80,0x00,0x00,0x00,0x13,0x24,0x24,0x24,0x24,0x19,0x00,
/*-文字:t--*/
	 0x00,0x80,0x80,0xE0,0x80,0x80,0x80,0x00,0x00,0x00,0x00,0x1F,0x20,0x20,0x20,0x00,
/*-文字:u--*/
	 0x00,0x80,0x00,0x00,0x00,0x00,0x80,0x00,0x00,0x1F,0x20,0x20,0x20,0x10,0x3F,0x00,
/*-文字:v--*/
	 0x80,0x00,0x00,0x00,0x00,0x00,0x80,0x00,0x00,0x07,0x18,0x20,0x18,0x07,0x00,0x00,
/*-文字:w--*/
	 0x80,0x00,0x00,0x80,0x00,0x00,0x80,0x00,0x0F,0x30,0x0E,0x01,0x0E,0x30,0x0F,0x00,
/*-文字:x--*/
	 0x80,0x00,0x00,0x00,0x00,0x00,0x80,0x00,0x20,0x11,0x0A,0x04,0x0A,0x11,0x20,0x00,
/*-文字:y--*/
	 0x80,0x00,0x00,0x00,0x00,0x00,0x80,0x00,0x00,0x87,0x98,0x60,0x18,0x07,0x00,0x00,
/*-文字:z--*/
	 0x00,0x80,0x80,0x80,0x80,0x80,0x80,0x00,0x00,0x30,0x28,0x24,0x22,0x21,0x20,0x00,
/*-文字:{--*/
	 0x00,0x00,0x00,0x80,0x7E,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x3F,0x20,0x00,0x00,
/*-文字:|--*/
	 0x00,0x00,0x00,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x00,0x00,0x00,0x00,
/*-文字:}--*/
	 0x00,0x02,0x7E,0x80,0x00,0x00,0x00,0x00,0x00,0x20,0x3F,0x00,0x00,0x00,0x00,0x00,
/*-文字:~--*/
	 0x00,0x06,0x01,0x01,0x06,0x04,0x03,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};