lcd1602.c

本人做的一款LED控制程序

/*===========================================================================

			KS0070(44780) 16x2 字符液晶屏驱动演示程序总线方式         
=============================================================================
连接线图:	LCM-------51 	LCM-------51 	LCM--------51
        	DB0-----P0.0 	DB4-----P0.4 	RW-------P2.2
        	DB1-----P0.1 	DB5-----P0.5 	RS-------P2.1
        	DB2-----P0.2 	DB6-----P0.6 	OE-------P2.3 
        	DB3-----P0.3 	DB7-----P0.7 	

// ================= LCM1602A端口地址定义 =======================
//char xdata Lcd1602CmdPort _at_ 0x7cff;	//OE=1 RS=0 RW=0
//char xdata Lcd1602WdataPort _at_ 0x7eff;	//OE=1 RS=1 RW=0
//char xdata Lcd1602StatusPort _at_ 0x7dff;	//OE=1 RS=0 RW=1
*/

sbit RW=P2^1;
sbit RS=P2^0;
sbit OE=P2^2;
#define Busy	0x80 						// 忙判别位
#define DataPort P0	 

void Delay400Ms(void);
void Delay5Ms(void);
void LcdWriteData( char dataW );
void LcdWriteCommand( Uchar CMD,Uchar AttribC );
void LcdReset( void );
void Display( Uchar dd );
void DispOneChar(Uchar x,Uchar y,Uchar Wdata);
void ePutstr(Uchar x,Uchar y, Uchar code *ptr);

void Delay40us(void)
{
	Uchar i = 40;
	while(--i);
}
/*=======================================================
正常读写操作之前必须检测LCD控制器状态:    CS=1 RS=0 RW=1
DB7:    0  LCD控制器空闲; 1  LCD控制器忙
========================================================*/
void WaitForEnable( void ) {
   
    DataPort = 0xff;
   
    RS =0; RW = 1; _nop_(); ET1=0;   OE = 1; _nop_(); _nop_();

    while( DataPort & Busy );
    
    OE = 0;	ET1=1;
}

/*=======================================================
 显示字符串
=======================================================*/
void ePutstr(Uchar x,Uchar y, Uchar code *ptr) {
Uchar i,l=0;
	while (ptr[l] > '\0'){l++;};
	for (i=0;i<l;i++) {
		DispOneChar(x++,y,ptr[i]);
		if ( x == 16 ){
			x = 0; y ^= 1;
		} 	  
	}
}

/*=======================================================
 显示光标定位
=======================================================*/
void LocateXY( char posx,char posy) {

Uchar temp;
    
	temp = posx & 0xf;
	posy &= 0x1;
	if ( posy )temp |= 0x40;
	temp |= 0x80;
	LcdWriteCommand(temp,0);
}
/*=======================================================
 显示光标定位闪烁
=======================================================*/
void Coruscant (Uchar x ,y) {
	LocateXY( x, y );
	LcdWriteCommand( 0x0f, 1);
}

/*=======================================================
 按指定位置显示数出一个字符
=======================================================*/
void DispOneChar(Uchar x,Uchar y,Uchar Wdata) {

	LocateXY( x, y );				// 定位显示地址
    Delay40us();
	LcdWriteData( Wdata );			// 写字符
    Delay40us();

}

/*=======================================================
 初始化程序, 必须按照产品资料介绍的初始化过程进行
=======================================================*/
void LcdReset( void ) {

   	LcdWriteCommand( 0x38, 0);			// 显示模式设置(不检测忙信号)
		Delay5Ms();
	LcdWriteCommand( 0x38, 0);			// 共三次
		Delay5Ms();
	LcdWriteCommand( 0x38, 0);
		Delay5Ms();

	LcdWriteCommand( 0x38, 1);			// 显示模式设置(以后均检测忙信号)
    LcdWriteCommand( 0x08, 1);			// 显示关闭
   	LcdWriteCommand( 0x01, 1);			// 显示清屏
	LcdWriteCommand( 0x06, 1);			// 显示光标移动设置
	LcdWriteCommand( 0x0c, 1);			// 显示开及光标设置	  0x0c

}
/*=======================================================
 写控制字符子程序: E=1 RS=0 RW=0
=======================================================*/
void LcdWriteCommand( Uchar CMD,Uchar AttribC ) {

	if (AttribC) WaitForEnable();    // 检测忙信号?
	
	RS=0;
	RW=0;
	ET1=0;	
	P0 = CMD;
	OE=1;	
	OE=0;
	ET1=1;
   }
/*=======================================================
 当前位置写字符子程序: E =1 RS=1 RW=0
=======================================================*/
void LcdWriteData( char dataW ) 
{
    WaitForEnable();			
	RS=1;
	RW=0;
	ET1=0;	
	P0= dataW;
	OE=1;	
	OE=0;
	ET1=1;
}



// 短延时
void Delay5Ms(void)
{
	Uint i = 11104;
	while(i--);
}

//长延时
void Delay400Ms(void)
{
	Uchar i = 10;
	Uint j;
	while(i--)
	{
		j=7269;
		while(j--);
	};
}