仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
單片機源程序如下:
- #include<reg51.h>
- #define uint unsigned int
- #define uchar unsigned char
- uint miao,fen,fen1,shi,shi1,flag1,flag2,flag3,aa,K1num,K2num,K3num,K4num,N;
- uchar code table[]=" TIMING CLOCK";
-
- sbit K1=P1^0;
- sbit K2=P1^1;
- sbit K3=P1^2;
- sbit K4=P1^3;
- sbit rs=P2^0;
- sbit lcden=P2^2;
- sbit led=P2^3;
- sbit beep=P2^4;
- sbit relay=P2^5;
- void delay(uint z)
- {
- uint x,y;
- for(x=z;x>0;x--)
- for(y=110;y>0;y--);
- }
- void write_date(uchar date)
- {
- rs=1;
- lcden=0;
- P0=date;
- delay(5);
- lcden=1;
- delay(5);
- lcden=0;
- }
- void write_com(uchar com)
- {
- rs=0;
- lcden=0;
- P0=com;
- delay(5);
- lcden=1;
- delay(5);
- lcden=0;
- }
- void write_sfm(uchar add,uchar date)
- {
- uchar shi,ge;
- shi=date/10;
- ge=date%10;
- write_com(0x80+0x40+add);
- write_date(0x30+shi);
- write_date(0x30+ge);
- }
- void init()
- {
- uint num;
- aa=0;
- K1num=0;
- K2num=0;
- K3num=0;
- K4num=0;
- flag1=1;
- flag2=1;
- flag3=1;
- led=1;
- relay=0;
- N=100;
- miao=0;
- fen=10;
- shi=5;
- fen1=12;
- shi1=5;
- beep=0;
- lcden=0;
- write_com(0x38);
- write_com(0x0c);
- write_com(0x06);
- write_com(0x01);
- write_com(0x80);
- for(num=0;num<15;num++)
- {
- write_date(table[num]);
- delay(10);
- }
- write_com(0x80+0x40+7);
- write_date(':');
- write_sfm(8,fen);
- write_sfm(5,shi);
- TMOD=0x01;
- TH0=(65536-50000)/256;
- TL0=(65536-50000)%256;
- EA=1;
- ET0=1;
- TR0=1;
- }
- void keyscan()
- {
- if(K1==0&&K3num==0)
- {
- delay(5);
- if(K1==0&&K1num==0)
- {
-
- K1num=1;
- while(!K1)
- if(K1num==1)
- {
- TR0=0;
- write_com(0x80+0x40+9);
- write_com(0x0f);
- }
- }
- }
- if(K3==0&&K3num==0&&K1num==0)
- {
- delay(5);
- if(K3==0)
- {
- flag1=0;
- write_com(0x80+0x40+9);
- while(!K3);
- K3num=1;
- write_sfm(8,fen1);
- write_sfm(5,shi1);
- write_com(0x0f);
- write_com(0x80+0x40+9);
- }
- }
- if(K1==0&&K1num==1)
- {
- delay(5);
- if(K1==0)
- {
- write_com(0x80+0x40+6);
- K1num=1;
- while(!K1);
- shi++;
- if(shi==24) shi=0;
- write_sfm(5,shi);
- write_com(0x80+0x40+6);
- }
-
- }
-
-
- if(K2==0&&K1num==1)
- {
- delay(5);
- if(K2==0)
- {
- write_com(0x80+0x40+9);
- K1num=1;
- while(!K2);
- fen++;
- if(fen==60) fen=0;
- write_sfm(8,fen);
- write_com(0x80+0x40+9);
- }
- }
- if(K1num==1||K3num==1)
- {
- if(K3==0)
- {
- delay(5);
- if(K3==0)
- {
- K1num=0;
- K3num=0;
- while(!K3);
- write_com(0x0c);
- TR0=1;
- flag1=1;
- write_sfm(8,fen);
- write_sfm(5,shi);
- }
- }
- }
- if(K2==0&&K1num==0&&K3num==0)
- {
- delay(5);
- if(K2==0)
- {
- write_sfm(8,fen1);
- write_sfm(5,shi1);
- while(!K2);
- write_sfm(8,fen);
- write_sfm(5,shi);
- }
- }
- if(K1==0&&K3num==1)
- {
- delay(5);
- if(K1==0)
- {
- write_com(0x80+0x40+6);
- K3num=1;
- while(!K1);
- shi1++;
- if(shi1==24)
- shi1=0;
- write_sfm(5,shi1);
- write_com(0x80+0x40+6);
- }
- }
-
- if(K2==0&&K3num==1)
- {
- delay(5);
- if(K2==0)
- {
- write_com(0x80+0x40+9);
- K3num=1;
- while(!K2);
- fen1++;
- if(fen1==60)
- fen1=0;
- write_sfm(8,fen1);
- write_com(0x80+0x40+9);
- }
- }
-
- if(K4==0&&flag3==0)
- {
- delay(5);
- if(K4==0)
- {
- flag2=0;
- flag3=1;
- }
- }
- if(K4==0&&flag3==1&&K4num==0)
- {
- delay(5);
- {
- K4num=1;
- }
- }
- if(K4==0&&flag3==1&&K4num==1)
- {
- delay(5);
- {
- K4num=0;
- }
- }
- }
- void clock()
- {
- if((fen==fen1)&&(shi==shi1)&&(flag2==1)&&(K4num==0))
- {
- beep=1;
- relay=1;
- flag3=0;
- delay(100);
- beep=0;
- delay(100);
- beep=1;
- delay(100);
- beep=0;
- delay(100);
- beep=1;
- delay(100);
- beep=0;
- delay(300);
- }
- else if((fen==fen1)&&(shi==shi1)&&(flag2==1)&&(K4num==1))
- {
- beep=1;
- relay=1;
- flag3=0;
- }
- else
- {
- beep=0;
- relay=0;
- }
- }
- void main()
- {
-
- init();
- while(1)
- {
- keyscan();
- clock();
- }
- }
- void time0() interrupt 1
- {
- TH0=(65536-50000)/256;
- TL0=(65536-50000)%256;
- aa++;
- if(aa==20)
- {
- aa=0;
- miao++;
- led=~led;
- if(miao==60)
- {
- miao=0;
- fen++;
- flag2=1;
- if(fen==60)
- {
- fen=0;
- shi++;
- if(shi==24)
- {
- shi=0;
- }
- if(flag1==1)
- {write_sfm(5,shi);}
- }
- if(flag1==1)
- {write_sfm(8,fen);}
- }
- }
- }
復制代碼
所有資料51hei提供下載:
單片機多功能鬧鐘.zip
(341.91 KB, 下載次數: 76)
2018-11-23 12:28 上傳
點擊文件名下載附件
程序論文原理圖
|