全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
基于52单片机控制的1602液晶电子时钟显示程序关于利用52单片机制作1602液晶电子时钟显示的程序,网上也有很多资料,不过个人感觉还是挺乱的。曾经我也是一名初学者,看过很多别人的资料,查找过很多书籍,一个个程序的摸索,经常被弄得头昏脑涨,深受其苦。今天,我自己精心的整理了一份“基于52单片机控制的1602液晶电子时钟显示程序”的资料,程序每个点几乎都有注释,适合初学者学习,供有兴趣的朋友参考。也算作为自己一直以来在网上搜索那么多资料而给大家的一点点回报吧。这程序简单易懂,也有一些可改善的地方,比如写命令和写数据的函数可以合并等等。大家可根据自己的爱好进行修改,多动手多尝试,相信你很快就能学会。值得注意的是,1,此程序是利用52单片机控制,如果你的是51单片机,需要改动一下头文件#include 的。2,关于引脚,大家需要根据实际情况定义具体的引脚,不同的学习板,或者你自己焊接的板子,引脚都可能不一样。3,本程序的日期是固定的,自己可以编写函数进行年月日显示。由于本作者水平有限,错误疏漏之处在所难免,欢迎读者指正。#include#define uchar unsigned char#define uint unsigned intsbit lcden=P34; /1602使能信号sbit lcdrs=P35; /1602命令(0)/数据(1)选择端sbit wr=P36; /1602读写选择端,一般为低电平(0)sbit key1=P37; /定义功能按键,可根据实际情况改变sbit key2=P20; /数字增加按键,也可根据实际情况改变sbit dula=P26; /关闭实验板上数码管的段选,这两句可根据实际情况注释掉sbit wela=P27; /关闭实验板上数码管的段选uchar temp,num,shi,fen,miao;uchar code tabe=2013-07-20; /固定日期,可扩展为动态void delay(uint z) /延时1ms程序uint i,j;for(i=z;i0;i-)for(j=110;j0;j-);void write_com(uchar com) /写命令lcdrs=0; /rs为低电平写命令P0=com;delay(5);lcden=1; /高脉冲使能delay(5);lcden=0;void write_data(uchar dat) /写数据lcdrs=1; /rs为高电平写数据P0=dat;delay(5);lcden=1;delay(5);lcden=0; void init() /初始化EA=1; /开总中断ET1=1; /开定时器1中断TMOD=0x10; /设置TMOD参数TH1=(65536-50000)/256; /给寄存器装初值TL1=(65536-50000)%256;TR1=1; /开启定时器1num=0;shi=0;fen=0;miao=0;lcden=0;dula=0;wela=0; wr=0; /写,低电平有效write_com(0x38); /设置16*2显示,5*7点阵,8位数据接口write_com(0x0C); /开显示,这里上下四句话需参考厂家提供的1602参数设置write_com(0x06); /写一个字符后地址指针加1,且光标加1,写一个字符时,整屏不动write_com(0x01); /显示清屏,数据指针清0void d1602(uchar add,uchar date)/给1602发送地址与数据uchar date2,date1;/拆分个位与十位date2=date/10;date1=date%10; write_com(0x80+0x40+add);/写指令,地址write_data(date2+0x30);delay(5);/写数据,十位write_data(date1+0x30);delay(5);/写数据,个位void key() /按键函数if(key1=0)delay(5); /去抖延时if(key1=0)num+; /功能键按下次数while(!key1); /松手判断if(num=1) /第一次按下TR1=0; /关定时器1,时钟暂停write_com(0x8b+0x40); /地址写到显示秒位置write_com(0x0f); /控制显示光标,光标闪烁if(num=2) /第二次按下write_com(0x88+0x40); /地址写到显示分位置if(num=3) /第三次按下write_com(0x85+0x40);/地址写到显示时位置if(num=4)/第四次按下num=0;write_com(0x0c); /开显示,不显示光标,光标也不闪烁TR1=1; /开启定时器1,时钟继续运行 if(num!=0)/当有功能按键按下,才进入下面操作 if(key2=0)/增加按键按下,增加时或分或秒 delay(10);/去抖if(key2=0)while(!key2);/松手判断if(num=1)/当功能键按下的次数是一次miao+;if(miao=60)miao=0;d1602(0x0a,miao); /改变一次,给1602送一次数据write_com(0x10); /因为上面操作一次,光标加1, /这里是光标左移,保证闪烁位置不变if(num=2)fen+;if(fen=60)fen=0;d1602(0x07,fen);write_com(0x10);if(num=3)shi+;if(shi=24)shi=0;d1602(0x04,shi);write_com(0x10); if(num=0) /当功能键没用被按下d1602(0x04,shi); /一直送时数据到相应位置d1602(0x07,fen); /一直送分数据到相应位置d1602(0x0a,miao); /一直送秒数据到相应位置void main() /主函数uchar ctr;init();write_com(0x83); /第一行首地址for(ctr=0;ctr10;ctr+) /固定不变的日期显示,1602的第一行write_data(tabectr);delay(5);write_com(0x86+0x40); /具体地址,写数据:write_data(:);delay(5);write_com(0x89+0x40);write_data(:);delay(5);while(1)key(); /不断的扫描按键void timer() interrupt 3 /中断TH1=(65536-50000)/256; /重装初值TL1=(655
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
评论
0/150
提交评论