16x2 字符液晶屏驱动演示程序总线方式        
=============================================================================
连接线图: LCM-------51  LCM-------51  LCM--------51
         DB0-----P0.0  DB4-----P0.4  RW-------P2.0
         DB1-----P0.1  DB5-----P0.5  RC-------P2.1
         DB2-----P0.2  DB6-----P0.6  E--------P2.7 =>74ls00+wr+rd
         DB3-----P0.3  DB7-----P0.7  VLCD接1K2电阻到GND
[注]:AT89C51的晶振频率为12MHz
============================================================================*/
//#pragma src        // 产生汇编文件
#include <reg51.h>
#include<intrins.h>
//========= 变量类型标识的宏定义，大家都喜欢这么做 ==============
#define Uchar unsigned char
#define Uint unsigned int
// ================= LCM1602A端口地址定义 =======================
char xdata Lcd1602CmdPort _at_ 0x7cff;  //E=1 RS=0 RW=0
char xdata Lcd1602WdataPort _at_ 0x7eff; //E =1 RS=1 RW=0
char xdata Lcd1602StatusPort _at_ 0x7dff; //CS=1 RS=0 RW=1
#define Busy 0x80       // 忙判别位

code char exampl[]="For an example.     - By xiaoqi\n";
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 main(void)
{
Uchar temp;

Delay400Ms();    // 启动时必须的延时，等待lcm进入工作状态
LcdReset();        // 这也是必需的....初始化
temp = 32;
ePutstr(0,0,exampl);  // 上面一行显示一个预定字符串
Delay400Ms();       // 保留显示内容
Delay400Ms();
Delay400Ms();
Delay400Ms();
Delay400Ms();
Delay400Ms();
Delay400Ms();
Delay400Ms();
while(1)
{
  temp &= 0x7f;   // 只显示ASCII字符
  if (temp<32)temp=32; // 屏蔽控制字符，不予显示
  Display( temp++ );
  
  Delay400Ms();
}
}
/*=======================================================
显示字符串
=======================================================*/
void ePutstr(Uchar x,Uchar y, Uchar code *ptr) {
Uchar i,l=0;
while (ptr[l] >31){l++;};
for (i=0;i<l;i++) {
  DispOneChar(x++,y,ptr[i]);
  if ( x == 16 ){
   x = 0; y ^= 1;
  }
}
}
/*=======================================================
演示一行连续字符串，配合上位程序演示移动字串
=======================================================*/
void Display( Uchar dd ) {
Uchar i;

for (i=0;i<16;i++) {
  DispOneChar(i,1,dd++);
  
  dd &= 0x7f;
  if (dd<32) dd=32;
}
}
/*=======================================================
显示光标定位
=======================================================*/
void LocateXY( char posx,char posy) {
Uchar temp;
temp = posx & 0xf;
posy &= 0x1;
if ( posy )temp |= 0x40;
temp |= 0x80;
LcdWriteCommand(temp,0);
}
/*=======================================================
按指定位置显示数出一个字符
=======================================================*/
void DispOneChar(Uchar x,Uchar y,Uchar Wdata) {
LocateXY( x, y );    // 定位显示地址
LcdWriteData( Wdata );   // 写字符
}
/*=======================================================
初始化程序, 必须按照产品资料介绍的初始化过程进行
=======================================================*/
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);   // 显示开及光标设置
}
/*=======================================================
写控制字符子程序: E=1 RS=0 RW=0
=======================================================*/
void LcdWriteCommand( Uchar CMD,Uchar AttribC ) {
if (AttribC) while( Lcd1602StatusPort & Busy );  // 检测忙信号?
Lcd1602CmdPort = CMD;
}

/*=======================================================
当前位置写字符子程序: E =1 RS=1 RW=0
=======================================================*/
void LcdWriteData( char dataW ) {
while( Lcd1602StatusPort & Busy );     // 检测忙信号
Lcd1602WdataPort = dataW;
}
// 短延时
void Delay5Ms(void)
{
Uint i = 5552;
while(i--);
}
//长延时
void Delay400Ms(void)
{
Uchar i = 5;
Uint j;
while(i--)
{
  j=7269;
  while(j--);
};
}

----------------------------------------------