AT89C51 of 1602LCD of program

//*******显示一个字符函数*********
void LCD_disp_char(uchar x,uchar y,uchar dat)
{
if(y>=64)
{
y=y-1;
}
LCD_write_command(0x40|y);
delay(10);
LCD_write_command(0xb8|x);
LCD_write_data(dat);
}
//********************************
/*******检查忙函数*************
voidLCD_check_busy()
//实践证明，在我的LCD1602 上，检查忙指令通
过率极低，以至于不能正常使用LCD。因此我没有再用检查忙函数。而使
do//用了延时的方法，延时还是非常好用的。我试了一下，用//
{LCD_E=0; //for 循环作延时，普通指令只要1次循就可完成。清屏指令
LCD_RS=0; //要用200次循环便能完成。
LCD_RW=1;
LCD_DB=0xff;
LCD_E=1;
while(LCD_DB^7==1);
｝
******************************/
//********延时函数***************
void delay(uint n)
{ uint i;
uchar j;
for(i=n;i>0;i--)
for(j=0;j<2;j++); //在这个延时循环函数中我只做了2次循环，
} //实践证明我的LCD1602 上普
//通的指令只需1次循环就能可靠完成。
//*******************************
//*********主函数*****************
void main(void)
{
while(1)
{
uint i;
LCD_init();
while(1)
{
for (i=0;i<12;i++)//陕字上半部
{
cs1=1;
cs2=0;
LCD_disp_char(0,i+36+4,kk[i]);//加36是显示起始位置左移，因为一个汉字的宽度为12
delay(500);
}
for (i=12;i<24;i++)//陕字下半部
{
cs1=1;
cs2=0;
LCD_disp_char(1,i+24+4,kk[i]);
delay(500);
}
for (i=0;i<12;i++)//西上
{
cs1=1;
cs2=0;
LCD_disp_char(0,i+48+4,xi[i]);
delay(500);
}
for (i=12;i<24;i++)//西下
{
cs1=1;
cs2=0;
LCD_disp_char(1,i+36+4,xi[i]);
delay(500);
}
for (i=0;i<12;i++)//电上
{
cs1=0;
cs2=1;
LCD_disp_char(0,i,~dian[i]);
delay(500);
}
for (i=12;i<24;i++)//电下
{
cs1=0;
cs2=1;
LCD_disp_char(1,i-12,~dian[i]);
delay(500);
}
for (i=0;i<12;i++)//子上
{
cs1=0;
cs2=1;
LCD_disp_char(0,i+12,~zi[i]);
delay(500);
}
for (i=12;i<24;i++)//子下
{
cs1=0;
cs2=1;
LCD_disp_char(1,i,~zi[i]);
delay(500);
}
/**************************************/
for (i=0;i<12;i++)//ke上
{

LCD_disp_char(0,i+24,~ke[i]);
delay(500);
}
for (i=12;i<24;i++)//ke下
{
LCD_disp_char(1,i+12,~ke[i]);
delay(500);
}
for (i=0;i<12;i++)//ji上
{
cs1=1;
cs2=0;
LCD_disp_char(3,i+48+4,ji[i]);
delay(500);
}
for (i=12;i<24;i++)//ji下
{
LCD_disp_char(4,i+36+4,ji[i]);
delay(500);
}
for (i=0;i<12;i++)//xue上
{
cs1=0;
cs2=1;
LCD_disp_char(3,i+24-24,~xue[i]);
delay(500);
}
for (i=12;i<24;i++)//xue下
{
LCD_disp_char(4,i+12-24,~xue[i]);
delay(500);
}
for (i=0;i<12;i++)//yuan上
{
cs1=0;
cs2=1;
LCD_disp_char(3,i+36-24,yuan[i]);
delay(500);
}
for (i=12;i<24;i++)//下
{
LCD_disp_char(4,i+24-24,yuan[i]);
delay(500);
}
for (i=0;i<12;i++)//yu上
{
cs1=1;
cs2=0;
LCD_disp_char(6,i+48+4,~yu[i]);
delay(500);
}
for (i=12;i<24;i++)//yu下
{
LCD_disp_char(7,i-12+48+4,~yu[i]);
delay(500);
}
for (i=0;i<12;i++)//老上
{
cs1=0;
cs2=1;
LCD_disp_char(6,i,~lao[i]);
delay(500);
}
for (i=12;i<24;i++)//老下
{
LCD_disp_char(7,i-12,~lao[i]);
delay(500);
}
for (i=0;i<12;i++)//shi上
{
cs1=0;
cs2=1;
LCD_disp_char(6,i+24-12,~shi[i]);
delay(500);
}
for (i=12;i<24;i++)//shi下
{
LCD_disp_char(7,i-12+24-12,~shi[i]);
delay(500);
}
LCD_write_command(0x01);
delay(10000);
}
}
}