1、基于51单片机控制的1602液晶电子时钟显示程序 200705-31 13:31:45 By: kevin 刚写好的基于51单片机控制的1602液晶电子时钟显示程序,整理了一下,并尽量加上的注释,放出来大家共享及交流。有兴趣的可以参考一下,各管脚定义都比较明显,有一定基础的可稍作修改即可进行实验。/基于51单片机控制的1602液晶电子时钟显示程序i nclude intrins。hi nclude at89x51。h#define uchar unsigned char#define LCM_RS P2_2 /定义引脚define LCM_RW P2_1define LCM_E P2_0def
2、ine LCM_Data P0define Busy 0x80 /用于检测LCM状态字中的Busy标识uchar i, j, k, second, tcount, minute, hour;void WriteDataLCM(unsigned char WDLCM);void WriteCommandLCM(unsigned char WCLCM,BuysC);unsigned char ReadDataLCM(void);unsigned char ReadStatusLCM(void);void LCMInit(void);void DisplayOneChar(unsigned char
3、 X, unsigned char Y, unsigned char DData);void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *DData);void DisplayqListChar(unsigned char X, unsigned char Y, unsigned char code DData);void Delay5Ms(void);void Delay400Ms(void);unsigned char code table=0,1,2,3,4,5,6,7,8,9;/数码管数字编
4、码unsigned char code MyNo = NAME:Who_am_I?”;/* 函数名称:delay()* 功能描述:延时子程序,大约延时 n MS 输 入:* 输 出:* 全局变量:* 调用模块: 作者: kevin 日期: 2007年5月31日*/delay(uchar n)uchar i,j,k;for(i=2;i0;i)for(j=n;j0;j-) for(k=125;k0;k);/* 函数名称:lcd()* 功能描述:液晶初始化,然后在液晶屏第二行显示提示信息* 输 入: 输 出: 全局变量:* 调用模块:Delay400Ms(),LCMInit(),DisplayLis
5、tChar()* 作者: kevin * 日期: 2007年5月31日*/void lcd(void)Delay400Ms(); /启动等待,等LCM讲入工作状态LCMInit(); /LCM初始化Delay5Ms(); /延时片刻(可不要)DisplayListChar(0, 1, MyNo);/* 函数名称:WriteDataLCM() 功能描述:写数据 输 入: WDLCM 输 出:* 全局变量:* 调用模块:* 作者: kevin * 日期: 2007年5月31日*/void WriteDataLCM(unsigned char WDLCM)ReadStatusLCM(); /检测忙L
6、CM_Data = WDLCM;LCM_RS = 1;LCM_RW = 0;LCM_E = 0; /若晶振速度太高可以在这后加小的延时LCM_E = 0; /延时LCM_E = 1;/* 函数名称:WriteCommandLCM()* 功能描述:写指令* 输 入: 输 出: 全局变量:* 调用模块: 作者: kevin * 日期: 2007年5月31日*/void WriteCommandLCM(unsigned char WCLCM,BuysC) /BuysC为0时忽略忙检测if (BuysC) ReadStatusLCM(); /根据需要检测忙LCM_Data = WCLCM;LCM_RS
7、 = 0;LCM_RW = 0;LCM_E = 0;LCM_E = 0;LCM_E = 1;/* 函数名称:ReadDataLCM()* 功能描述:读数据* 输 入:* 输 出:* 全局变量:* 调用模块:* 作者: kevin * 日期: 2007年5月31日*/unsigned char ReadDataLCM(void)LCM_RS = 1;LCM_RW = 1;LCM_E = 0;LCM_E = 0;LCM_E = 1;return(LCM_Data);/* 函数名称:ReadStatusLCM()* 功能描述:读状态 输 入:* 输 出:* 全局变量:* 调用模块:* 作者: kev
8、in * 日期: 2007年5月31日*/unsigned char ReadStatusLCM(void)LCM_Data = 0xFF;LCM_RS = 0;LCM_RW = 1;LCM_E = 0;LCM_E = 0;LCM_E = 1;while (LCM_Data Busy); /检测忙信号return(LCM_Data);/* 函数名称:LCMInit()* 功能描述:LCM初始化* 输 入: 输 出:* 全局变量:* 调用模块: 作者: kevin * 日期: 2007年5月31日*/void LCMInit(void)LCM_Data = 0;WriteCommandLCM(0
9、x38,0); /三次显示模式设置,不检测忙信号Delay5Ms();WriteCommandLCM(0x38,0);Delay5Ms();WriteCommandLCM(0x38,0);Delay5Ms();WriteCommandLCM(0x38,1); /显示模式设置,开始要求每次检测忙信号WriteCommandLCM(0x08,1); /关闭显示WriteCommandLCM(0x01,1); /显示清屏WriteCommandLCM(0x06,1); / 显示光标移动设置WriteCommandLCM(0x0C,1); / 显示开及光标设置/* 函数名称:DisplayOneCha
10、r()* 功能描述:按指定位置显示一个字符* 输 入: 输 出: 全局变量: 调用模块:* 作者: kevin * 日期: 2007年5月31日*/void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData)Y &= 0x1;X = 0xF; /限制X不能大于15,Y不能大于1if (Y) X |= 0x40; /当要显示第二行时地址码+0x40;X = 0x80; / 算出指令码WriteCommandLCM(X, 0); /这里不检测忙信号,发送地址码WriteDataLCM(DData);/* 函数名
11、称:DisplayListChar() 功能描述:按指定位置显示一串字符* 输 入: 输 出: 全局变量:* 调用模块:* 作者: kevin * 日期: 2007年5月31日*/void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *DData)unsigned char ListLength; ListLength = 0;Y &= 0x1;X = 0xF; /限制X不能大于15,Y不能大于1while (DDataListLength0x20) /若到达字串尾则退出 if (X = 0xF) /
12、X坐标应小于0xF DisplayOneChar(X, Y, DDataListLength); /显示单个字符 ListLength+; X+; /* 函数名称:Delay5Ms() 功能描述:5ms延时* 输 入: 输 出:* 全局变量: 调用模块:* 作者: kevin * 日期: 2007年5月31日*/void Delay5Ms(void)unsigned int TempCyc = 5552;while(TempCyc);/* 函数名称:Delay400Ms()* 功能描述:400ms延时* 输 入: 输 出:* 全局变量:* 调用模块: 作者: kevin * 日期: 2007年
13、5月31日*/void Delay400Ms(void)unsigned char TempCycA = 5;unsigned int TempCycB;while(TempCycA-) TempCycB=7269; while(TempCycB-);;/* 函数名称:timer0() 功能描述:中断子程序,1秒重写一次液晶,以此实现60秒计数* 输 入:* 输 出: 全局变量:* 调用模块:* 作者: kevin * 日期: 2007年5月31日*/void timer0() interrupt 1 using 0int i;TH0=(6553650000)/2563; /中断设置初始化 T
14、L0=(65536-50000)%2563; tcount+; if(tcount=60) /满1秒 i=0; DisplayOneChar(i+, 0, T); /在第1行第1个坐标显示 DisplayOneChar(i+, 0, I); /在第1行第2个坐标显示 DisplayOneChar(i+, 0, M); /在第1行第3个坐标显示 DisplayOneChar(i+, 0, E); /在第1行第4个坐标显示 DisplayOneChar(i+, 0, :); /在第1行第5个坐标显示 DisplayOneChar(i+, 0, tablehour/10); /在第1行第6个坐标显示
15、 DisplayOneChar(i+, 0, tablehour10); /在第1行第7个坐标显示 DisplayOneChar(i+, 0, :); /在第1行第1个坐标显示 DisplayOneChar(i+, 0, tableminute/10); /在第1行第8个坐标显示 DisplayOneChar(i+, 0, tableminute10); /在第1行第9个坐标显示 DisplayOneChar(i+, 0, :); /在第1行第10个坐标显示 DisplayOneChar(i+, 0, tablesecond/10); /在第1行第11个坐标显示 DisplayOneChar(
16、i+, 0, tablesecond10); /在第1行第12个坐标显示 tcount=0;second+; if(second=60) /满1分 second=0;minute+; /分数加1,秒数归零 if(minute=60) /满1小时 minute=0;hour+; /小时数加1,分数归零 if(hour=24) hour=0; /* 函数名称:main() 功能描述:主程序,设置初始时间,中断设置初始化,液晶显示,等待中断* 输 入: 输 出: 全局变量: 调用模块:* 作者: kevin 日期: 2007年5月31日*/void main()uchar i;second=0;mi
17、nute=0;hour=0; /设置初始时间TH0=(6553650000)/256; /中断设置初始化 TL0=(65536-50000)%256; EA=1;ET0=1;TMOD=0x21;TR0=1; lcd(); i=0; DisplayOneChar(i+, 0, T); /在第1行第1个坐标显示 DisplayOneChar(i+, 0, I); /在第1行第2个坐标显示 DisplayOneChar(i+, 0, M); /在第1行第3个坐标显示 DisplayOneChar(i+, 0, E); /在第1行第4个坐标显示 DisplayOneChar(i+, 0, :); /在
18、第1行第5个坐标显示 DisplayOneChar(i+, 0, tablehour/10); /在第1行第6个坐标显示 DisplayOneChar(i+, 0, tablehour10); /在第1行第7个坐标显示 DisplayOneChar(i+, 0, :); /在第1行第1个坐标显示 DisplayOneChar(i+, 0, tableminute/10); /在第1行第8个坐标显示 DisplayOneChar(i+, 0, tableminute%10); /在第1行第9个坐标显示 DisplayOneChar(i+, 0, :); /在第1行第10个坐标显示 DisplayOneChar(i+, 0, tablesecond/10); /在第1行第11个坐标显示 DisplayOneChar(i+, 0, tablesecond%10); /在第1行第12个坐标显示 while(1); /等待中断