#include<reg52.h>
#define uchar unsigned char       
#define uint  unsigned int
#define DataPort  P3
sbit E=P2^0;
sbit RW=P2^1;
sbit RS=P2^2;
sbit PSB=P2^3;
uchar code a1[]="啊啊啊啊啊啊啊啊";
uchar code a2[]="哈哈哈哈哈哈哈哈";
uchar code a3[]="啦啦啦啦啦啦啦啦";
uchar code a4[]="呃呃呃呃呃呃呃呃";
uchar d[]={0x98,0x90,0x88,0x80};
/**************延时1ms*count*****************/
void delay(int count)
{        int x,y;
for(x=0;x<count;x++)
for(y=0;y<120;y++);
}


/***********忙检测********************/
void Busy()
{
DataPort=0xFF;
RS=0;
RW=1;
while (1)
   {
E =1;
if (P0^7==0) break;
}
E=0;
}
/***********写指令子程序****************/
void Write_Com(uchar command)
{
Busy();        //检测忙标志位
RS=0;
RW=0;                                                          
DataPort=command;        //写入指令
E=1;
delay(1);                                                       
E=0;                                                                                                  
}                                                          
/***********写数据子程序***************/
void Write_Data(uchar Data)
{
Busy();
RS=1;                 
RW=0;
DataPort=Data;
E=1;
delay(1);
E=0;  
}
/***********LCD初始化*******************/
void Init_LCD(void)
{   
PSB=0;
delay(1);
PSB=1;         //将PSB置1，通信方式为8位数据并口
delay(1);
Write_Com(0x30);//30H--基本指令操作
Write_Com(0x34);   
Write_Com(0x0c);//开显示，关光标，不闪烁。
Write_Com(0x01);//清除显示  
Write_Com(0x02);
Write_Com(0x06);//指定在资料写入或读取时，光标的移动方向，DDRAM的地址计数器（AC）加1。
Write_Com(0x04);//显示状态 全关
}
/*****************清屏***********************/
void Clear_Lcd(void)
{
Write_Com(0x01);
Write_Com(0x34);
Write_Com(0x30);
}

/*******************逐行显示***************************************/
void Lcd_pos(uchar X,uchar Y)
{                          
   uchar  pos;
   if (X==1)
     {X=0x80;}
   else if (X==2)
     {X=0x90;}
   else if (X==3)
     {X=0x88;}
   else if (X==4)
     {X=0x98;}
   pos = X+Y ;

   Write_Com(pos);     //显示地址
}

void main()
{
   uchar i;
   delay(100);                 //上电，等待稳定
   Init_LCD();                 //初始化LCD
   while(1)
   {
     Lcd_pos(1,0);             //设置显示位置为第一行
     for(i=0;i<16;i++)
     {
       Write_Data(a1[i]);
       delay(30);
     }

     Lcd_pos(2,0);             //设置显示位置为第二行
     for(i=0;i<16;i++)
     {
       Write_Data(a2[i]);
       delay(30);
     }
     Lcd_pos(3,0);             //设置显示位置为第三行
     for(i=0;i<16;i++)
     {
       Write_Data(a3[i]);
       delay(30);
     }
     Lcd_pos(4,0);             //设置显示位置为第四行
     for(i=0;i<16;i++)
     {
       Write_Data(a4[i]);
       delay(30);
     }
    Clear_Lcd(); //清屏函数，为下次刷新准备
   }
}