LCD1602液晶显示带汉字的万年历程序(51单片机)

发布时间：2018-03-26 浏览量：

#include "reg51.h"

#define uint unsigned int
#define uchar unsigned char
#define port P0
uchar table[]="I love you!";
uchar table1[]="Shang Hong Rui!";
uchar table2[]="LI ZHEN WEI!" ;
uchar table3[]="> > > > > > > > ";
uchar num;
sbit rs=P2^0;
sbit rw=P2^1;
sbit e=P2^2;
/********************************************
   1ms 为基本单位的延时函数
********************************************/
void delay(uint z)
{
uint x,y;
for(x=z;x>0;x--)
    for(y=110;y>0;y--);
}
/********************************************
   读取lcd1602状态
********************************************/
read()
{
uchar temp ;
port=0xff;
rs=0;
rw=1;
e=1;
temp=port;
e=0;
return temp;
}
/********************************************
   检测lcd是否忙碌         小卒整天没事
********************************************/
void busy()
{
uchar temp;
do
    {
   temp=read();
}

while((temp&0x80)==0x80);
}
/********************************************
   向 lcd 里写命令
********************************************/
void write_com(uchar com)
{
busy();
//delay(2);
port=com;
//busy();
rs=0;
rw=0;
e=1;
e=0;
}/********************************************
   向 lcd 里写数据
********************************************/
void write_data(uchar dat)
{
busy();
//delay(2);
port=dat;
//busy();
rs=1;
rw=0;
e=1;
e=0;
}
/********************************************
   初始化lcd
********************************************/
void init()
{
write_com(0x06) ;//显示地址递增，即写一个数据后，显示位置右移一位
write_com(0x0e) ;//开显示，有光标，光标不闪
write_com(0x38) ;//8位数据，双列，5*7字形
write_com(0x01) ;//清屏
}
/**********************************************
   主程序实现显示
***********************************************/
main()
{
init();
write_com(0x80+0x02);
for(num=0;num<11;num++)
{
    write_data(table[num]);
delay(150);
}
//busy();
write_com(0x80+0x40);
for(num=0;num<15;num++)
{
    write_data(table1[num]);
delay(150);
}
write_com(0x01); //清屏
write_com(0x80+0x15);
for(num=0;num<12;num++)
{
    write_data(table2[num]);
delay(5);
}
for(num=0;num<20;num++)
{
    //write_com(0x1c) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向左移动
write_com(0x18) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向右移动
delay(120);
}
//busy();
delay(50);
write_com(0x01); //清屏
write_com(0x80+0x54);
for(num=0;num<16;num++)
{
    write_data(table3[num]);
delay(5);
}

for(num=0;num<20;num++)
{
    //write_com(0x1c) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向左移动
write_com(0x18) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向右移动
delay(120);
}
delay(50);
write_com(0x01); //清屏
write_com(0x80+0x15);
for(num=0;num<12;num++)
{
    write_data(table2[num]);
delay(5);
}
write_com(0x80+0x54);
for(num=0;num<16;num++)
{
    write_data(table3[num]);
delay(5);
}

for(num=0;num<19;num++)
{
    write_com(0x1c) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向左移动
//write_com(0x18) ; //显示地址递增，即写一个数据后，显示位置右移一位整屏向右移动
delay(120);
}
while(1);
}

/*0000000000000000000000000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000000000000000000*/

#include "reg51.h"
#define uchar unsigned char
#define uint unsigend int
#define port P0
uchar table[]="0123456789";
uchar miaog=0,miaos=1,feng=1,fens=1,shig=1,shis=1;
sbit rs=P2^0;
sbit rw=P2^1;
sbit e=P2^2;

/***********************************
***00000 5*7 -> 0xff
*****0** /5*8     0x40
*****0**    0x40 ----> I
*****0**    0x40 ---->
*****0**    0x40
*****0**    0x40
***00000    0x1f
添加自己的自定义字符
***********************************/
code uchar ziku[]=
{
0x0f,0x09,0x09,0x0f,0x09,0x09,0x0f,0x00, //汉字“日”
0x0F,0x09,0x0F,0x09,0x0F,0x09,0x11,0x00, //汉字“月”
0x01,0x02,0x03,0x05,0x09,0x03,0x00,0x00, //汉字“年”左半部
0x00,0x00,0x1e,0x08,0x08,0x1e,0x08,0x08 //汉字“年”右半部
};

/*******************************
   读取lcd1602状态
*******************************/
uchar lcd_readcom()
{
uchar temp;
e=0;
port=0xff;
rs=0;
rw=1;
e=1;
temp=port;
e=0;
return temp;
}
/***************************************
   检测 lcd 是否忙碌         小卒整天没事
***************************************/
check_busy()
{
   uchar temp;
   do{
   temp=lcd_readcom();
     }while((temp&0x80)==0x80);
}
/*****************************************
      向lcd里写命令
*****************************************/
void lcd_writecom(uchar dat)
{
check_busy();
e=0;
port=dat;
rs=0;
rw=0;
e=1;
e=0;
}
/***************************************
   读取lcd对应地址数据
*****************************************/
uchar lcd_readdat()
{
uchar temp;
check_busy();
e=0;
port=0xff;
rs=1;
rw=1;
e=1;
temp=port;
e=0;
return temp;
}
/****************************************
       向lcd里写数据
****************************************/
void lcd_writedat(uchar dat)
{
check_busy();
e=0;
port=dat;
rs=1;
rw=0;
e=1;
e=0;
}
/****************************************
     向lcd写字符串
*****************************************/
void lcd_gets(char *dat)
{
while(*dat!=0)
{

lcd_writedat(*dat);
dat++;
}
}
/*****************************************
      确定要写的位子即x y 坐标
******************************************/
void lcd_xy(uchar x,uchar y)
{
switch(y)
{
case 0:lcd_writecom(0x80+x);break;//第一行第X个位置
case 1:lcd_writecom(0xc0+x);break;//0xc0==0x80+0x50 第二行第X个位置
case 2:lcd_writecom(0x94+x);break;//
case 3:lcd_writecom(0xd4+x);break;//4*20
}
}
/****************************************************
单行显示才有5*10 其他5*8 MODE=1 5*8 MODE=0 5*10
****************************************************/
add_custom_word(uchar *dat,uchar len,uchar mode)
{
uchar n,m;
for(n=0;n     {
if(mode)
{
   lcd_writecom(0x40+8*n);
    for(m=0;m<8;m++)
       {
    lcd_writedat(*dat);
     dat++;
    }
   }
   else
    {
    lcd_writecom(0x40+10*n);
    for(m=0;m<10;m++)
       {
    lcd_writedat(*dat);
     dat++;
    }
   }
}
}
/********************************************
   初始化lcd
********************************************/
void lcd_init()
{
lcd_writecom(0x01) ;//清屏
lcd_writecom(0x03) ;
lcd_writecom(0x3c) ;
lcd_writecom(0x40) ;
lcd_writecom(0x0c) ;
add_custom_word(ziku,4,1); //初始化自定义字符
}
/********************************************
   1ms 为基本单位的延时函数
********************************************/
void delay(uchar z)
{
uchar x,y,a;
for(x=z;x>0;x--)
    for(y=110;y>0;y--)
   for(a=1;a>0;a--) ;
}

/**********************************************
主程序实现显示
***********************************************/
main()
{
lcd_init();

//lcd_xy(0,0);
//lcd_gets(" I LOVE YOU");
//lcd_xy(0,1);
//lcd_gets("Shang Hong Rui");
lcd_xy(2,0) ;
lcd_gets("2011");
lcd_xy(6,0) ;
lcd_writedat(2);
lcd_xy(7,0);
lcd_writedat(3);
lcd_xy(8,0) ;
lcd_gets("03");
lcd_xy(10,0);
lcd_writedat(1);
lcd_xy(11,0) ;
lcd_gets("06");
lcd_xy(13,0);
lcd_writedat(0);

lcd_xy(3,1) ;
lcd_gets("0");
lcd_xy(4,1) ;
lcd_gets("0");
lcd_xy(5,1) ;
lcd_gets(":");
lcd_xy(6,1) ;
lcd_gets("0");
lcd_xy(7,1) ;
lcd_gets("0");
lcd_xy(8,1) ;
lcd_gets(":");
lcd_xy(9,1) ;
lcd_gets("0");
lcd_xy(10,1) ;
lcd_gets("0");

while(1)
{

//for(m=0;m<10;m++)
lcd_xy(10,1);
lcd_writedat(table[miaog]); //秒个位
delay(1000);
miaog++;

if(miaog==10)
{
    miaog=0;
lcd_xy(9,1);
    lcd_writedat(table[miaos]); //秒十位
miaos++;
if(miaos==6)
{

   miaos=0;
   lcd_xy(7,1);
   lcd_writedat(table[feng]); //分个位
   feng++;
   if(feng==10)
    {
    feng=0;
   lcd_xy(6,1);
   lcd_writedat(table[fens]); //分十位
   fens++;
   if(fens==6)
    {
    fens=0;
   lcd_xy(4,1);
   lcd_writedat(table[shig]); //时个位
   shig++;
   if(shig==10)
    {
      shig=0;
      lcd_xy(3,1);
      lcd_writedat(table[shis]); //时十位
      shis++;
      if(shis==6)
       {
      shis=0;
    }

    }
    }
    }
}
}
}

//lcd_xy(0,0);
//lcd_writedat(0);//自定义字符使用,0表示第一个字，1表示第二个字，依此类推
//lcd_xy(15,0);
//lcd_writedat(3); //自定义字符使用

}

上一篇：两位数码管动态显示汇编程序+电路图

下一篇： DS18B20温度测试程序(51单片机数码管显示)+电路图