欢迎来到天天文库
浏览记录
ID:30775010
大小:105.50 KB
页数:7页
时间:2019-01-03
《12864汉字液晶显示--按键电子时钟程序(具有闪烁,移位,加一,减一功能)》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、^include^include#defineucharunsignedcharvoidlcd_ini();voidascii_changc(void);voiddelay();voidwriadd(ucharcom);voidwridat(ucharcoml);voidshan(void);voiddisp();voidtkey(void);sbitcs=Pl7;sbitsid二P「6;sbitsclk=Pl5;bitflag二1;uchardat,count,f=l;//f测试
2、哪个单元为当前闪烁状态uchardataclock[3]={23,45,12};ucharcodeclockname[10]={,z北京吋间:〃};uchardatanum[6];voidmain()lcd_ini();count,二10;//机器周期为lus,每次定时50ms,此变量用来控制循环次数,在下面赋值为20,共定时1秒TM0D=0x01;TL0=0XB0;TH0=0X3C;EA=1;ETO=1;IT0=l;EXO=1;TRO二1;whi1e(1){back:asciichange();dispO;delay(
3、);if(flag==l)gotoback;tkey();shan();delay();/lcd初始化/voidlcd_ini(){wriadd(0x30);delay();wriadd(0x0c);delay();wriadd(0x01);delay();wri_add(0x06);delay();voidtimerl()interrupt1using2TLO=OXBO;TH0=0X3C;count一一;if(count二二0){count=10;clock[2]++;//秒//}elsegotoout;if(cloc
4、k[2]==60)clock[2]=0;clock[l]++;//分//if(clock[l]==60)clock[l]=0;clock[0]++;if(clock[0]==24)//吋//clock[0]=0;out:_nop_();}""/]•位个位转换成ASCII码/voidascii_change(void){"num[5]=clock[2]-(clock[2]/10)10+0x30;num[4]=clock[2]/10+0x30;num[3]=clock[1]-(clock[l]/10)10+0x30;num[
5、2]=clock[1]/10+0x30;num[l]=clock[0]-(clock[0]/10)10+0x30;num[0]=clock[0]/10+0x30;voiddelay()uchari,j;for(i=250;i>0;i—)for(j=250;j>0;j~);}/Writeaddress/voidwriadd(ucharcom){uchari,j,k;cs=0;cs=l;dat=0xf8;for(i=l;i<=8;i++){sid=(bit)(dat&0x80);sclk=0;sclk=l;sclk=0;da
6、t=dat<7、cs=0;cs二1;dat=0xfa;for(i=l;i<=8;i++){sid=(bit)(dat&0x80);sclk=0;sclk=l;sclk=0;dat二dat<8、5:(08X0)PPb!助:0二”'!juqon}()ds!ppiOA/uiGJ[菽cud!p/:0二肌osg[0S:0二肌os:(O8xo沿即)(打q)二P!s}(++牢8二>来【二H)JOJ:0那0當即二护p//:("wp)ron—二wp:juioo=q.ep{:[>>卿二Wp:0二肌os:0二肌os-(08X0
7、cs=0;cs二1;dat=0xfa;for(i=l;i<=8;i++){sid=(bit)(dat&0x80);sclk=0;sclk=l;sclk=0;dat二dat<8、5:(08X0)PPb!助:0二”'!juqon}()ds!ppiOA/uiGJ[菽cud!p/:0二肌osg[0S:0二肌os:(O8xo沿即)(打q)二P!s}(++牢8二>来【二H)JOJ:0那0當即二护p//:("wp)ron—二wp:juioo=q.ep{:[>>卿二Wp:0二肌os:0二肌os-(08X0
8、5:(08X0)PPb!助:0二”'!juqon}()ds!ppiOA/uiGJ[菽cud!p/:0二肌osg[0S:0二肌os:(O8xo沿即)(打q)二P!s}(++牢8二>来【二H)JOJ:0那0當即二护p//:("wp)ron—二wp:juioo=q.ep{:[>>卿二Wp:0二肌os:0二肌os-(08X0
此文档下载收益归作者所有