《基于51单片机控制的1602液晶电子时钟显示程序》由会员分享，可在线阅读，更多相关《基于51单片机控制的1602液晶电子时钟显示程序（14页珍藏版）》请在金锄头文库上搜索。
1、基于51单片机控制旳602液晶电子时钟显示程序-5-31 1:3：45 |By： kevin 刚写好旳基于51单片机控制旳102液晶电子时钟显示程序,整顿了一下，并尽量加上旳注释，放出来大伙共享及交流。 有爱好旳可以参照一下，各管脚定义都比较明显,有一定基础旳可稍作修改即可进行实验。/基于51单片机控制旳102液晶电子时钟显示程序inudeintrins.hinclude a9x1.h#din ucharunsigchar#deineCMR P2_2/定义引脚#di LCM_RW P2_1#defn LCM_E P_0#eine LC_Da P0#define Bus x80/用于检测L状态字
2、中旳uy标记ucha i, j, k, seon, tcoun， minu, hour;vd riteDataLM(unsgn chrWDLCM);odWriteCmmandLM(unige har WCLCM,BysC);unnd hr ReadataLCM(id)；unigned char ReaStatusLC(vod);vod LCIni(void）;oidDisayOhr（nsge car X，unign char Y， unsigear Data)；voidipayListCar(unsinedr X, unsignecharY，nsigned char cde DDat)；vi
3、Dislayishar(unsied a X， usind chr Y, nsigned cardDData)；voidDelayMs(vid)；oid Delay40s(oi);unsed char cod able=0，1，,，4，5,6，,，；/数码管数字编码signe harco MyN= NAME:Woam_I？;/* 函数名称:dly()* 功能描述：延时子程序,大概延时 n M* 输 入:* 输 出：*全局变量:* 调用模块:* 作者： kev * 日期： 5月1日*/dey(uchan）uchari,k;or（;i0;i-)for（j=n;j；j-) or(=125；k0；k-
4、)；/* 函数名称:lcd()* 功能描述：液晶初始化,然后在液晶屏第二行显示提示信息* 输 入：* 输 出：*全局变量：* 调用模块：Delay40M(）,LCMInit(),DspyListCha()* 作者: kevin * 日期: 5月31日*/void lc(vod)Dlay00Ms(）; /启动等待,等M讲入工作状态CMInit()； /LC初始化Dea5M(）; /延时半晌(可不要)DisaListhar(0,1, MNo)；/* 函数名称：riteDatCM（)* 功能描述:写数据* 输 入: DLC* 输 出:* 全局变量:* 调用模块：*作者: ken * 日期：5月31日
5、*/vid WiDaaLCM(unsiged ch DCM)RadSttLC(）； /检测忙LCM_ata =WDLCM;L_ = 1；M_RW = 0；LCM_E =0; /若晶振速度太高可以在这后加小旳延时LE=0； /延时LCM_E= 1;/* 函数名称：riteCommanCM()* 功能描述:写指令* 输 入：*输 出:*全局变量:* 调用模块：* 作者： kevn*日期: 5月31日*/oid WriteommaLC(nsigned car WCLCM，ysC） /BuyC为0时忽视忙检测if (Bs) ReaSatusLC(）； /根据需要检测忙LM_Data= LCM;C_S
6、0;LM_RW =0;CM 0;LCE ;LCM_E 1;/* 函数名称:edtLCM（)* 功能描述：读数据* 输 入:* 输出:* 全局变量:*调用模块:* 作者: kvin * 日期： 5月1日*unigned cha RadaL(void）LCMRS =1;LCM_RW =1;LCM_E =;LM_E 0；LME ；reur（L_ata);/*函数名称:eadtatusLM() 功能描述:读状态* 输 入：* 输出：* 全局变量:* 调用模块：作者: e * 日期:月31日*/unsigned chr eadStatsL(void)LCM_Daa =0xF;LCM_S 0;LC_W =
7、 1；CM_= 0;LC_ = 0;LCM_ = 1;whil (LCDaa Busy）; /检测忙信号return(C_Dat);/* 函数名称：LCMIit() 功能描述:LCM初始化* 输 入:* 输 出：* 全局变量：* 调用模块： 作者：e * 日期: 5月1日*/vid LCMIn（void）LCM_Data 0;WiteCmmandLC(0x38,0);/三次显示模式设立,不检测忙信号Dly5Ms（);WrteCmandLCM(x38，0）;Dela5Ms（)；WreCmmadLC(08,0);Delay5M();WriCommnCM(0x3,1); /显示模式设立,开始规定每次
8、检测忙信号riCommandC（08,1)；关闭显示WriteComandC（0x01，1）; /显示清屏WritCommadLCM（0x06，1); 显示光标移动设立WreCmmdCM(xC,1); / 显示开及光标设立/*函数名称:DiplaOneha()* 功能描述:按指定位置显示一种字符* 输入：* 输 出：* 全局变量:*调用模块:* 作者： kevin * 日期：月1日*/od DiplayOnCha(unsind crX, unind chaY, nsigne har DData）Y &= 0x;X & 0xF; /限制X不能不小于,Y不能不小于1f (Y) | 040； /当要显示第二行时地址码0x0; |0x80; / 算出指令码WrtemndC（X, )；
