51单片机c语言知识电子万年历完整编辑程序.doc

《51单片机c语言知识电子万年历完整编辑程序.doc》由会员分享，可在线阅读，更多相关《51单片机c语言知识电子万年历完整编辑程序.doc（26页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、/该程序为51单片机c语言电子万年历#includereg52.h/#include#define uchar unsigned char#define uint unsigned intsbit lcden=P34;sbit lcdrs=P35;sbit DATA=P07; sbit RST=P05; sbit SCLK=P06;sbit menu=P30; /菜单sbit add=P31; /加一sbit dec=P37; /减一sbit led0=P10;sbit led1=P11;sbit led2=P12;sbit led3=P13;sbit ds=P32;/sbit beep=P3

2、3;uint temp;float f_temp;uint warn_l1=270;uint warn_l2=250;uint warn_h1=300;uint warn_h2=320;uint get_temp();void delayms(uint x);void write_com(uchar com);void write_data(uchar date);void init();void dis_temp(uint t);void Write1302(uchar dat);void WriteSet1302(uchar Cmd,uchar dat);uchar Read1302(vo

3、id);uchar ReadSet1302(uchar Cmd);void Init_DS1302(void);void DisplaySecond(uchar x);void DisplayMinute(uchar x);void DisplayHour(uchar x);void DisplayDay(uchar x);void DisplayMonth(uchar x);void DisplayYear(uchar x);void DisplayWeek(uchar x);void dis_temp(uint t);void read_date(void);void turn_val(c

4、har newval,uchar flag, uchar newaddr,uchar s1num);void key_scan(void);char code table=0123456789 ;uchar code table2= TUEWESTHUFRISATSUNMON;uchar second,minute,hour,day,month,year,week,count=0; uchar ReadValue,num,time; void delayms(uint x) uint i,j; for(i=x;i0;i-) for(j=110;j0;j-);/void write_com(uc

5、har com) lcdrs=0; P2=com; delayms(5); lcden=1; delayms(5); lcden=0;void write_data(uchar date) lcdrs=1; P2=date; delayms(5); lcden=1; delayms(5); lcden=0;void init() lcden=0; write_com(0x38); write_com(0x0c); write_com(0x06); write_com(0x01);/void Write1302(uchar dat) uchar i; SCLK=0; /拉低SCLK，为脉冲上升沿

6、写入数据做好准备 delayms(2); /稍微等待，使硬件做好准备 for(i=0;i=1; /将dat的各数据位右移1位，准备写入下一个数据位 void WriteSet1302(uchar Cmd,uchar dat) RST=0; /禁止数据传递 SCLK=0; /确保写数居前SCLK被拉低 RST=1; /启动数据传输 delayms(2); /稍微等待，使硬件做好准备 Write1302(Cmd); /写入命令字 Write1302(dat); /写数据 SCLK=1; /将时钟电平置于已知状态 RST=0; /禁止数据传递 uchar Read1302(void) uchar i

7、,dat; delayms(2); /稍微等待，使硬件做好准备 for(i=0;i=1; /将dat的各数据位右移1位，因为先读出的是字节的最低位 if(DATA=1) /如果读出的数据是1 dat|=0x80; /将1取出，写在dat的最高位 SCLK=1; /将SCLK置于高电平，为下降沿读出 delayms(2); /稍微等待 SCLK=0; /拉低SCLK，形成脉冲下降沿 delayms(2); /稍微等待 return dat; /将读出的数据返回 uchar ReadSet1302(uchar Cmd) uchar dat; RST=0; /拉低RST SCLK=0; /确保写数居

8、前SCLK被拉低 RST=1; /启动数据传输 Write1302(Cmd); /写入命令字 dat=Read1302(); /读出数据 SCLK=1; /将时钟电平置于已知状态 RST=0; /禁止数据传递 return dat; /将读出的数据返回void Init_DS1302(void) WriteSet1302(0x8E,0x00); /根据写状态寄存器命令字，写入不保护指令 WriteSet1302(0x80,(0/10)4|(0%10); /根据写秒寄存器命令字，写入秒的初始值 WriteSet1302(0x82,(59/10)4|(59%10); /根据写分寄存器命令字，写入分

9、的初始值 WriteSet1302(0x84,(23/10)4|(23%10); /根据写小时寄存器命令字，写入小时的初始值 WriteSet1302(0x86,(28/10)4|(28%10); /根据写日寄存器命令字，写入日的初始值 WriteSet1302(0x88,(2/10)4|(2%10); /根据写月寄存器命令字，写入月的初始值 WriteSet1302(0x8c,(14/10)4|(14%10); /nian /WriteSet1302(0x8a,(4/10)4)*10 + (ReadValue&0x0F); i=x/10; j=x%10; write_com(0x80+0x4

10、6); write_data(i+0x30);write_com(0x80+0x47); write_data(j+0x30); void DisplayMinute(uchar x) uchar i,j; i=x/10; j=x%10; write_com(0x80+0x43); write_data(i+0x30);write_com(0x80+0x44); write_data(j+0x30);write_com(0x80+0x45); write_data(:); void DisplayHour(uchar x) uchar i,j; i=x/10; j=x%10;write_com

11、(0x80+0x40); write_data(i+0x30);write_com(0x80+0x41); write_data(j+0x30);write_com(0x80+0x42); write_data(:); void DisplayDay(uchar x) uchar i,j; i=x/10; j=x%10; write_com(0x89); write_data(i+0x30);write_com(0x8a); write_data(j+0x30); void DisplayMonth(uchar x) uchar i,j; i=x/10; j=x%10; write_com(0

12、x86); write_data(i+0x30); write_com(0x87); write_data(j+0x30);write_com(0x88); write_data(/); void DisplayYear(uchar x) uchar i,j; i=x/10; j=x%10; write_com(0x81); write_data(2+0x30);write_com(0x82); write_data(0+0x30);write_com(0x83); write_data(i+0x30);write_com(0x84); write_data(j+0x30); write_co

13、m(0x85); write_data(/); void DisplayWeek(uchar x) uchar i; x=x*3;/ write_com(0x8c);write_data(table2x); / write_com(0x8d);write_data(table2x+1); / write_com(0x8e);write_data(table2x+2); write_com(0x8c); for(i=0;i4)*10 + (ReadValue&0x0F); ReadValue = ReadSet1302(0x83); minute=(ReadValue&0x70)4)*10 +

14、(ReadValue&0x0F); ReadValue = ReadSet1302(0x85); hour=(ReadValue&0x70)4)*10 + (ReadValue&0x0F); ReadValue = ReadSet1302(0x87); day=(ReadValue&0x70)4)*10 + (ReadValue&0x0F); ReadValue = ReadSet1302(0x89); month=(ReadValue&0x70)4)*10 + (ReadValue&0x0F); ReadValue = ReadSet1302(0x8d); year=(ReadValue&0

15、x70)4)*10 + (ReadValue&0x0F); ReadValue=ReadSet1302(0x8b); /读星期 week=ReadValue&0x07; DisplayYear(year); DisplayMonth(month); DisplayDay(day); DisplayWeek(week); DisplayHour(hour); DisplayMinute(minute); DisplaySecond(second); dis_temp(get_temp(); /温度显示 key_scan(); /按键检测 void turn_val(char newval,uch

16、ar flag,uchar newaddr,uchar s1num) newval=ReadSet1302(newaddr); /读取当前时间 newval=(newval&0x70)4)*10+(newval&0x0f); /将bcd码转换成十进制 if(flag) /判断是加一还是减一 newval+; switch(s1num) case 1: if(newval99) newval=0; DisplayYear(newval); break; case 2: if(newval12) newval=1; DisplayMonth(newval); break; case 3: if(n

17、ewval31) newval=1; DisplayDay(newval); break; case 4: if(newval6) newval=0; DisplayWeek(newval); break; case 5: if(newval23) newval=0; DisplayHour(newval); break; case 6: if(newval59) newval=0; DisplayMinute(newval); break; case 7: if(newval59) newval=0; DisplaySecond(newval); break; default:break;

18、else newval-;switch(s1num) case 1: if(newval=0) newval=99; DisplayYear(newval); break; case 2: if(newval=0) newval=12; DisplayMonth(newval); break; case 3: if(newval=0) newval=31; DisplayDay(newval); break; case 4: if(newval0) newval=6; DisplayWeek(newval); break; case 5: if(newval0) newval=23; Disp

19、layHour(newval); break; case 6: if(newval0) newval=59; DisplayMinute(newval); break; case 7: if(newval0) newval=59; DisplaySecond(newval); break; default:break; WriteSet1302(newaddr-1),(newval/10)0) i-; ds=1; i=4; while(i0) i-; bit tempreadbit(void) uint i; bit dat; ds=0;i+; ds=1;i+;i+; dat=ds; i=8;

20、 while(i0) i-; return(dat);uchar tempread(void) uchar i,j,dat; dat=0; for(i=1;i=8;i+) j=tempreadbit(); dat=(j1); return(dat);void tempwritebyte(uchar dat) uint i; uchar j; bit testb; for(j=1;j1; if(testb) ds=0; i+;i+; ds=1; i=8; while(i0) i-; else ds=0; i=8; while(i0)i-; ds=1; i+;i+; void tempchange

21、(void) dsreset(); delayms(1); tempwritebyte(0xcc); tempwritebyte(0x44); key_scan(); /按键函数uint get_temp() uchar a,b; tempchange(); /温度函数 dsreset(); delayms(1); tempwritebyte(0xcc); tempwritebyte(0xbe); a=tempread(); b=tempread(); temp=b; tempwarn_l2)&(t=warn_l1) warn(40,0x01); else if(t=warn_l2) warn

22、(10,0x03); else if(t=warn_h1) warn(40,0x04); else if(t=warn_h2) warn(10,0x0c); else i=40;while(i-) dis_temp(get_temp(); DisSecond(second); /void main() init();Init_DS1302();while(1) tempchange(); read_date(); deal(temp); key_scan();/*void key_scan(void)/uchar miao,s1num=0; uchar s1num=0;if(menu=0) d

23、elayms(5); if(menu=0) while(!menu); s1num+;while(1) if(menu=0) delayms(5); if(menu=0) while(!menu); s1num+; /miao=ReadSet1302(0x81);/second=miao;/WriteSet1302(0x80,miao|0x80); write_com(0x0f);/光标闪射if(s1num=1)/year=ReadSet1302(0x8d);write_com(0x80+4);/年光标 if(add=0) delayms(3); if(add=0) while(!add);

24、turn_val(year,1,0x8d,1); if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(year,0,0x8d,1); if(s1num=2) /month=ReadSet1302(0x89);write_com(0x80+7);/月光标 if(add=0) delayms(3); if(add=0) while(!add); turn_val(month,1,0x89,2); if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(month,0,0x89,2); if(

25、s1num=3)/day=ReadSet1302(0x87);write_com(0x80+10);/日光标if(add=0) delayms(3); if(add=0) while(!add); turn_val(day,1,0x87,3); if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(day,0,0x87,3);/写入日寄存器 if(s1num=4) /week=ReadSet1302(0x8b);write_com(0x80+14);/星期光标 if(add=0) delayms(3); if(add=0) while(!a

26、dd); turn_val(week,1,0x8b,4); if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(week,0,0x8b,4); if(s1num=5)/hour=ReadSet1302(0x85)write_com(0x80+0x40+1);/时光标 if(add=0) delayms(3); if(add=0) while(!add); turn_val(hour,1,0x85,5); if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(hour,0,0x85,5)

27、; if(s1num=6)/调时间分 / minute=ReadSet1302(0x83);write_com(0x80+0x40+4);if(add=0) delayms(5); if(add=0) while(!add); turn_val(minute,1,0x83,6);/写入分寄存器 if(dec=0) delayms(3); if(dec=0) while(!dec); turn_val(minute,0,0x83,6);/写入分寄存器 if(s1num=7)/调时间秒/second=ReadSet1302(0x81);write_com(0x80+0x40+7);/秒光标if(add=0) delayms(3); if(add=0) while(!add); if(second=0x60) second=0x00; turn_val(second,1,0