《时间温度日历》word版

《时间温度日历》word版

ID:29640698

大小:67.50 KB

页数:16页

时间:2018-12-21

《时间温度日历》word版_第1页
《时间温度日历》word版_第2页
《时间温度日历》word版_第3页
《时间温度日历》word版_第4页
《时间温度日历》word版_第5页
资源描述:

《《时间温度日历》word版》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、/*52单片机与ds12b887,ds18b20综合使用,1602显示*/#include#include#defineucharunsignedchar#defineuintunsignedintsbitdula=P2^6;sbitwela=P2^7;sbitrs=P3^5;sbitwr=P3^6;sbitE=P3^4;sbits1=P3^0;sbits2=P3^1;sbits3=P3^2;sbits4=P3^2;//闹钟查看键sbitrd=P3^7;sbitbeep=P2^3;sbitdscs=P1^4;sbi

2、tdsas=P1^5;sbitdswr=P1^6;sbitdsds=P1^7;sbitdsirq=P3^3;sbitJD=P0^6;sbitBF=P0^7;sbitDQ=P2^2;bitflag1,flag_ri;ucharcount,s1num,flag,t0_num;ucharmiao,shi,fen,year,month,day,week,amiao,afen,ashi,time;voidwrite_ds(uchar,uchar);//函数申明voidset_alarm(uchar,uchar,uchar);voidread_alarm();uch

3、arread_ds(uchar);voidset_time();ucharcodetable[]="20--";ucharcodetable1[]="::";ucharcodedigit[10]={"0123456789"};ucharcodeError[]={"Error!Check!"};ucharcodeTemp[]={"Temp:"};ucharcodeCent[]={"*C"};ucharread_ds(ucharadd){uchards_date;dsas=1;dsds=1;dswr=1;dscs=0;P0=add;dsas=0;dsds=0

4、;P0=0xff;ds_date=P0;dsds=1;dsas=1;dscs=1;returnds_date;}voidwrite_ds(ucharadd,uchardate){dscs=0;dsas=1;dsds=1;dswr=1;P0=add;dsas=0;dswr=0;P0=date;dswr=1;dsas=1;dscs=1;}voidset_time(){write_ds(4,10);write_ds(2,32);}voidset_alarm(ucharashi,ucharafen,ucharamiao){write_ds(1,amiao);wr

5、ite_ds(3,afen);write_ds(5,ashi);}voiddelay(uintz){uintx,y;for(x=z;x>0;x--)for(y=110;y>0;y--);}voiddelay1ms(){unsignedchari,j;for(i=0;i<4;i++)for(j=0;j<33;j++);}voiddelaynms(unsignedcharn){unsignedchari;for(i=0;i

6、=0;delay(50);beep=1;delay(100);beep=0;delay(50);beep=1;}voidwrite_com(ucharcom){rs=0;E=0;P0=com;delay(5);E=1;delay(5);E=0;}voidwrite_date(uchardate){rs=1;E=0;P0=date;delay(5);E=1;delay(5);E=0;}voidinit(){ucharnum;EA=1;EX1=1;IT1=1;flag1=0;t0_num=0;s1num=0;week=1;dula=0;wela=0;E=0;

7、rd=0;//以下几行在首次设置DS12C887时使用,以后不必再写入write_ds(0x0A,0x20);write_ds(0x0B,0x26);//设置24小时模式,数据二进制格式set_time();//设置上电默认时间//-----------------------------------------------------*/write_com(0x38);//1602液晶初始化write_com(0x0c);write_com(0x06);write_com(0x01);write_com(0x80);for(num=0;num<15;n

8、um++)//写入液晶固定部分显示{write_date(table[num])

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。