单片机万年历带继电器控制功能设计，挺简单的小东西分享一下 -

#include <STC12C5A60S2.h>
#define uchar unsigned char
#define uint unsigned int
sbit DQ=P2^7;
sbit RS=P2^2;
sbit RW=P2^1;
sbit EN=P2^0;
sbit led =P2^3;
sbit led1=P2^4;
sbit led2=P2^5;
sbit led3=P2^6;
sbit led4=P3^7;
sbit key1=P3^2;
sbit S1=P3^3;
sbit S2=P3^4;
sbit S3=P3^5;
sbit S4=P3^6;
sbit keys1=P1^6;
sbit keys2=P1^7;
uchar code str1[]={" Intelligence "};
uchar code str2[]={" Aquarium "};
uchar code str3[]={"2014-08-13 WED "};
uchar code str4[]={"00:00:00 "};
uchar code str5[]={"TH: TL: "};
uchar code str6[]={" TEM: "};
uchar code str7[]={" Concentrations "};
uchar code str8[]={" Oxygen: % "};
uchar code str9[]={" Zi Dong Wei Shi "};
uchar code str10[]={"ShiJian:06 12 18 "};
uchar code str11[]={" Measurement "};
uchar code str12[]={"ZhuoDu: NTU " };
uchar code xingqi[][3]={"MON","TUE","WED","THU","FRI","SAT","SUN"};
uchar data disdata[5];
uchar data up[2];
uchar data down[2];
uchar data yy[4];
uint tvalue;
uchar tflag;
uchar aaa=30;
uchar bbb=18;
uint ccc;
uchar fff=0;
uchar ddd=0;
uchar result;
uint hzs;
uchar status;
uchar a,b,count,S1num,xqnum,S1numm;
char yue,ri,shi,fen,miao;
int nian;
char shi1=6,shi2=2,shi3=8,shi4=0,shi5=1,shi6=1;
char d1=6,d2=12,d3=18;
void delay1ms(uint ms)
{
unsigned int i,j;
for(i=0;i<ms;i++)
for(j=0;j<110;j++);
}
void delay(uint z)
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void wr_com(uchar com)
{
delay1ms(1);
RS=0;
RW=0;
EN=0;
P0=com;
delay1ms(1);
EN=1;
delay1ms(1);
EN=0;
}
void wr_dat(uchar dat)
{
delay1ms(1);
RS=1;
RW=0;
EN=0;
P0=dat;
delay1ms(1);
EN=1;
delay1ms(1);
EN=0;
}
void lcd_init()
{
delay1ms(15);
wr_com(0x38);
delay1ms(5);
wr_com(0x08);
delay1ms(5);
wr_com(0x01);
delay1ms(5);
wr_com(0x06);
delay1ms(5);
wr_com(0x0c);
delay1ms(5);
}
void display(uchar *p)
{
while(*p!='\0')
{
wr_dat(*p);
p++;
delay1ms(1);
}
}
/********************************************
年月日写入1602函数
********************************************/
void write_sfm(uchar add,uchar dat) //写时分秒函数
{
uchar shi,ge;
shi=dat/10;
ge=dat%10;
wr_com(0x80+0x40+add);
wr_dat(0x30+shi);
wr_dat(0x30+ge);
}
void write_yr(uchar add,uchar dat) //写月日函数
{
uchar shi,ge;
shi=dat/10;
ge=dat%10;
wr_com(0x80+add);
wr_dat(0x30+shi);
wr_dat(0x30+ge);
}
void write_nian(uchar add,uint dat) //写年函数
{
uint qian,bai,shi,ge;
qian=dat/1000;
bai=dat%1000/100;
shi=dat%100/10;
ge=dat%10;
wr_com(0x80+add);
wr_dat(0x30+qian);
wr_dat(0x30+bai);
wr_dat(0x30+shi);
wr_dat(0x30+ge);
}
/*
fff判断在这里
*/
void init_play()//gszbfdxfbxdzfbzbfzbz
{
if(fff==1)
{
wr_com(0x80);
display(str3);
wr_com(0x80+0x40);
display(str4);
write_nian(0,nian);
write_sfm(6,miao); //???shi?fen?miao??????
write_sfm(3,fen);
write_sfm(0,shi);
write_yr(5,yue);
write_yr(8,ri);wr_com(0x80+0x0b);
for(b=0;b<3;b++)
{
wr_dat(xingqi[xqnum][b]);
delay(5);
}
ddd=1;
fff=2;
}else if(fff==3)
{
wr_com(0x80);
display(str5);
wr_com(0x80+0x40);
display(str6);
ddd=2;
fff=4;
}else if(fff==5)
{
wr_com(0x80);
display(str7);
wr_com(0x80+0x40);
display(str8);
ADC_CONTR=0xE0;
ddd=3;
fff=6;
}else if(fff==7)
{
wr_com(0x80);
display(str9);
wr_com(0x80+0x40);
display(str10);
wr_com(0xc9);
wr_dat(shi1+0x30);
wr_com(0xc8);
wr_dat(shi4+0x30);
wr_com(0xc9+3);
wr_dat(shi2+0x30);
wr_com(0xc8+3);
wr_dat(shi5+0x30);
wr_com(0xc9+6);
wr_dat(shi3+0x30);
wr_com(0xc8+6);
wr_dat(shi6+0x30);
d1=shi1+shi4*10;
d2=shi2+shi5*10;
d3=shi3+shi6*10;
ddd=5;
fff=8;
}else if(fff==9)
{
wr_com(0x80);
display(str11);
wr_com(0x80+0x40);
display(str12);
ADC_CONTR=0xE1;
ddd=6;
fff=0;
}
}
void delay_18b20(uint i)
{
while(i--);
}
void ds18b20rst()
{
uchar x=0;
DQ = 1;
delay_18b20(48);
DQ = 0;
delay_18b20(1200);
DQ = 1;
delay_18b20(480);
}
void ds18b20wr(uchar wdata)
{
uchar i=0;
for (i=8; i>0; i--)
{
DQ = 0;
DQ = wdata&0x01;
delay_18b20(120);
DQ = 1;
wdata>>=1;
}
}
uchar ds18b20rd()
{
uchar i=0;
uchar dat = 0;
for (i=8;i>0;i--)
{
DQ = 0;
dat>>=1;
DQ = 1;
if(DQ)
dat|=0x80;
delay_18b20(120);
}
return(dat);
}
read_temp()
{
uchar a,b;
ds18b20rst();
ds18b20wr(0xcc);
ds18b20wr(0x44);
ds18b20rst();
ds18b20wr(0xcc);
ds18b20wr(0xbe);
a=ds18b20rd();
b=ds18b20rd();
tvalue=b;
tvalue<<=8;
tvalue=tvalue|a;
if(tvalue<0x0fff)
tflag=0;
else
{
tvalue=~tvalue+1;
tflag=1;
}
tvalue=tvalue*(0.625);
return(tvalue);
}
void ds18b20disp()
{
uchar flagdat;
disdata[0]=tvalue/1000+0x30;
disdata[1]=tvalue%1000/100+0x30;
disdata[2]=tvalue%100/10+0x30;
disdata[3]=tvalue%10+0x30;
ccc=(tvalue/1000)*100+(tvalue%1000/100)*10+(tvalue%100/10);
if(tflag==0)
flagdat=0x2b;
else
flagdat=0x2d;
if(disdata[0]==0x30)
{
disdata[0]=0x20;
if(disdata[1]==0x30)
{
disdata[1]=0x20;
}
}
if(ddd==2)
{
wr_com(0x80+0x46);
wr_dat(flagdat);
wr_com(0x80+0x47);
wr_dat(disdata[0]);
wr_com(0x80+0x48);
wr_dat(disdata[1]);
wr_com(0x80+0x49);
wr_dat(disdata[2]);
wr_com(0x80+0x4a);
wr_dat(0x2e);
wr_com(0x80+0x4b);
wr_dat(disdata[3]);
up[0]=aaa/10+0x30;
up[1]=aaa%10+0x30;
down[0]=bbb/10+0x30;
down[1]=bbb%10+0x30;
wr_com(0x80+0x04);
wr_dat(up[0]);
wr_com(0x80+0x05);
wr_dat(up[1]);
wr_com(0x80+0x0d);
wr_dat(down[0]);
wr_com(0x80+0x0e);
wr_dat(down[1]);
if(!S1)
{
delay1ms(5);
if(!S1)
{
aaa++;
while(!S1);
}
}
if(!S2)
{
delay1ms(5);
if(!S2)
{
if(aaa <= bbb)
{aaa=bbb;}else
{aaa--;}
while(!S2);
}
}
if(!S3)
{
delay1ms(5);
if(!S3)
{
if(bbb >= aaa)
{bbb=aaa;}else
{bbb++;}
while(!S3);
}
}
if(!S4)
{
delay1ms(5);
if(!S4)
{
bbb--;
while(!S4);
}
}
}
}
void key()
{
if(!key1)
{
delay1ms(5);
if(!key1)
{
fff++;
while(!key1);
}
}
}
void panduan()
{
if(ccc>=aaa)
{
led=0;
}else if
(ccc<=bbb-1)
{
led=1;
}
}
void panduan1()
{
if(result<50)
{
led1=1;
}else
{
led1=0;
}
}
void panduan2()
{
if(shi==d1||shi==d2||shi==d3)
{
if(fen==0)
{
led4=0;
}else {led4=1;}
}else {led4=1;}
}
void panduan3()
{
{
if(hzs>2000)
{
led3=1;
led2=0;
}else
{
if(keys1==1&&keys2==1)
{
led2=1;
led3=0;
}else if(keys1==0&&keys2==0)
{
led2=0;
led3=1;
}
else{led2=led3=0;}
}
}
}
//void panduan4()
//{
// if(ttt==0)
// {
// if(keys1==0&&keys2==0)
// {
// led2=1;
// }else if(keys1==1&&keys2==1)
// {
// led3=1;
// }
// else
// {
// led2=0;
// led3=0;
// }
// }else
// {
// led2=0;
// }
//}
void keyscan()
{
if(ddd==1){
if(S1==0)
{
delay(5);
if(S1==0)
{
S1num++;
while(!S1);
if(S1num==1)
{
TR0=0;
wr_com(0xc0+7);
wr_com(0x0f);
}
if(S1num==2)
{
wr_com(0xc0+4);
}
if(S1num==3)
{
wr_com(0xc0+1);
}
if(S1num==4)
{
wr_com(0x80+13);
}
if(S1num==5)
{
wr_com(0x80+9);
}
if(S1num==6)
{
wr_com(0x80+6);
}
if(S1num==7)
{
wr_com(0x80+3);
}
if(S1num==8)
{
S1num=0;
TR0=1;
wr_com(0x0c);
}
}
}
if(S1num!=0)
{
if(S2==0)
{
delay(5);
if(S2==0)
{
while(!S2);
if(S1num==1)
{
miao++;
if(miao==60)
miao=0;
write_sfm(6,miao);
wr_com(0x80+0x40+6);
}
if(S1num==2)
{
fen++;
if(fen==60)
fen=0;
write_sfm(3,fen);
wr_com(0x80+0x40+3);
}
if(S1num==3)
{
shi++;
if(shi==24)
shi=0;
wr_com(0x80+0x40);
write_sfm(0,shi);
}
if(S1num==4)
{
xqnum++;
if(xqnum==7)
xqnum=0;
wr_com(0x80+0x0b);
for(a=0;a<3;a++)
{
wr_dat(xingqi[xqnum][a]);
delay(5);
}
}
if(S1num==5)
{
ri++;
if(yue==2)
{
if(nian%400==0)
{
if(ri==30)
{
ri=1;
}
}
if(nian%400!=0)
{
if(ri==29)
{
ri=1;
}
}
}
else if(yue<=7)
{
if(yue%2==0&yue!=2)
{
if(ri==31)
{
ri=1;
}
}
else if(yue%2!=0&yue!=2)
{
if(ri==32)
{
ri=1;
}
}
}
else if(yue>=8)
{
if(yue%2==0)
{
if(ri==32)
{
ri=1;
}
}
else if(yue%2!=0)
{
if(ri==31)
{
ri=1;
}
}
}
write_yr(8,ri);
}
if(S1num==6) //月加调整
{
yue++;
if(yue==13)
yue=1;
write_yr(5,yue);
}
if(S1num==7) //年加调整
{
nian++;
if(nian==2100)
nian=2000;
write_nian(0,nian);
}
}
}
if(S3==0)
{
delay(5);
if(S3==0) //确认按键被按下
{
while(!S3);
if(S1num==1)
{
miao--; //调整秒减1
if(miao==-1) //减到00后再减重新设置为59
miao=59;
write_sfm(6,miao);
wr_com(0x80+0x40+6);
}
if(S1num==2)
{
fen--; //调整分减1
if(fen==-1)
fen=59;
write_sfm(3,fen);
wr_com(0x80+0x40+3);
}
if(S1num==3)
{
shi--; //调整时减1
if(shi==-1)
shi=23;
write_sfm(0,shi);
wr_com(0x80+0x40);
}
if(S1num==4)
{
xqnum--; //调整星期减一
if(xqnum==-1)
xqnum=6;
wr_com(0x80+0x0b);
for(a=0;a<3;a++)
{
wr_dat(xingqi[xqnum][a]);
delay(5);
}
}
if(S1num==5) //调整日
{
ri--;
if(yue==2)
{
if(nian%400==0)
{
if(ri==0)
{
ri=29;
}
}
if(nian%400!=0)
{
if(ri==0)
{
ri=28;
}
}
}
else if(yue<=7)
{
if(yue%2==0&yue!=2)
{
if(ri==0)
{
ri=30;
}
}
else if(yue%2!=0&yue!=2)
{
if(ri==0)
{
ri=31;
}
}
}
else if(yue>=8)
{
if(yue%2==0)
{
if(ri==0)
{
ri=31;
}
}
else if(yue%2!=0)
{
if(ri==0)
{
ri=30;
}
}
}
write_yr(8,ri);
}
if(S1num==6) //调整月
{
yue--;
if(yue==0)
yue=12;
write_yr(5,yue);
}
if(S1num==7) //调整年
{
nian--;
if(nian==2000)
nian=2100;
write_nian(0,nian);
}
}
}
if(S4==0|key1==0) //退出设置、开启中断
{
delay(5);
if(S4==0|key1==0)
{
S1num=0;
TR0=1;
wr_com(0x0c);
}
}
}
}}
void timer0() interrupt 1 //定时器0中断服务程序
{
TH0=(65535-50000)/256; //重装定时器初始值
TL0=(65535-50000)%256;
count++; //中断次数累加
if(count==20) //20次50毫秒即一秒
{
count=0;
miao++;
if(miao==60) //秒加到60时分进位
{
miao=0;
fen++;
if(fen==60) //分加到60时时进位
{
fen=0;
shi++;
if(shi==24) //时加到24时清0
{
shi=0;
//xqnum++;
ri++;
if(yue==2) //如果是二月
{
if(nian%400==0) //闰年判断
{
if(ri==30)
{
ri=1;
yue++;
write_yr(5,yue);
}
}
if(nian%400!=0) //平年判断
{
if(ri==29)
{
ri=1;
yue++;
write_yr(5,yue);
}
}
}
else if(yue<=7&yue!=2) //一月到七月
{
if(yue%2==0) //偶数月（除二月）
{
if(ri==31)
{
ri=1;
yue++;
}
}
else if(yue%2!=0) //奇数月
{
if(ri==32)
{
ri=1;
yue++;
}
}
write_yr(5,yue);
}
else if(yue>=8) //八月到12月
{
if(yue%2==0) //偶数月（除二月）
{
if(ri==32)
{
ri=1;
yue++;
if(yue==13) //如果判断月份为12月，则加一后重新定义月份为1
{
yue=1;
nian++;
write_nian(0,nian);
}
write_yr(5,yue);
}
}
else if(yue%2!=0) //奇数月
{
if(ri==31)
{
ri=1;
yue++;
write_yr(5,yue);
}
}
}
if(ddd==1) {write_yr(8,ri);}
}
if(ddd==1) { write_sfm(0,shi); } //重新写入数据
}
if(ddd==1) {write_sfm(3,fen); } //重新写入数据
}
if(ddd==1) { write_sfm(6,miao); } //重新写入数据
}
}
void adcc()
{
ADC_CONTR|=0x08; //?? A/D ??
status=0;
while(status==0) //??A/D????
{
status=ADC_CONTR&0x10;
}
ADC_CONTR&=0xE7; //?ADC_FLAG?0
result=ADC_RES; //??A/D????
yy[0]=(result*100/255)/100+0x30;
yy[1]=(result*100/255)/10%10+0x30;
yy[2]=(result*100/255)%10+0x30;
if(ddd==3)
{
wr_com(0x80+0x4a);
wr_dat(yy[0]);
wr_com(0x80+0x4b);
wr_dat(yy[1]);
wr_com(0x80+0x4c);
wr_dat(yy[2]);
}
}
void adbb()
{
ADC_CONTR|=0x08; //?? A/D ??
status=0;
while(status==0) //??A/D????
{
status=ADC_CONTR&0x10;
}
ADC_CONTR&=0xE7; //?ADC_FLAG?0
hzs=ADC_RES*18; //??A/D????
yy[0]=hzs/1000+0x30;
yy[1]=hzs%1000/100+0x30;
yy[2]=hzs%100/10+0x30;
yy[3]=hzs%10+0x30;
if(ddd==6)
{
wr_com(0x80+0x48);
wr_dat(yy[0]);
wr_com(0x80+0x49);
wr_dat(yy[1]);
wr_com(0x80+0x4a);
wr_dat(yy[2]);
wr_com(0x80+0x4b);
wr_dat(yy[3]);
}
}
void init1()
{
lcd_init();
wr_com(0x80);
display(str1);
wr_com(0x80+0x40);
display(str2);
nian=2014;
yue=8;
ri=13;
shi=0; //初始shi、fen、miao
fen=0;
miao=0;
count=0;
xqnum=0;
S1num=0; //初始化全局变量count
TMOD=0x01; //设置定时器0工作模式1
TH0=(65535-50000)/256; //定时器装初始值
TL0=(65535-50000)%256;
EA=1; //开总中断
ET0=1; //开定时器0中断
TR0=1;
}
void init2()
{
uint i;
ADC_CONTR|=0x80;
for (i=0;i<10000;i++);
P1ASF=0x03;
for (i=0;i<10000;i++);
}
void zdws()
{if(ddd==5){
if(S1==0)
{
delay(5); //确认定义键被按下
if(S1==0)
{
S1numm++; //定义键S1按下次数记录
while(!S1); //释放按键确认
if(S1numm==1) //S1按下一次时
{
wr_com(0xc9); //光标定位到秒位置
wr_com(0x0f); //光标闪?
}
if(S1numm==2) //S1按下两次时
{
wr_com(0xc9+3); //光标定位到分位置
}
if(S1numm==3) //S1按下三次时
{
wr_com(0xc9+6); //光标定位到时位置
}
if(S1numm==4) //S1按下四次时
{
S1numm=0; //S1记录按键次数清零
wr_com(0x0c); //取消光标闪烁
}
}
}
if(S4==0|key1==0) //退出设置、开启中断
{
delay(5);
if(S4==0|key1==0)
{
S1numm=0;
wr_com(0x0c);
}
}
if(S1!=0) //????????S2?S3?S4???
{
if(!S2)
{
delay1ms(5);
if(!S2)
{
if(S1numm==1)
{
shi1++;
if(shi1==10)
{
shi1=0;
shi4++;
}if(shi4==2&&shi1==4){shi4=shi1=0;}
wr_com(0xc9);
wr_dat(shi1+0x30);
wr_com(0xc8);
wr_dat(shi4+0x30);
}
if(S1numm==2)
{
shi2++;
if(shi2==10)
{
shi2=0;
shi5++;
}if(shi5==2&&shi2==4){shi5=shi2=0;}
wr_com(0xc9+3);
wr_dat(shi2+0x30);
wr_com(0xc8+3);
wr_dat(shi5+0x30);
}
if(S1numm==3)
{
shi3++;
if(shi3==10)
{
shi3=0;
shi6++;
}if(shi6==2&&shi3==4){shi6=shi3=0;}
wr_com(0xc9+6);
wr_dat(shi3+0x30);
wr_com(0xc8+6);
wr_dat(shi6+0x30);
}
while(!S2);
}
}
if(!S3)
{
delay1ms(5);
if(!S3)
{
if(S1numm==1)
{
shi1--;
if(shi1==-1)
{
shi1=9;
shi4--;
if(shi4==-1)
{
shi4=2;
shi1=3;
}
}
wr_com(0xc9);
wr_dat(shi1+0x30);
wr_com(0xc8);
wr_dat(shi4+0x30);
}
if(S1numm==2)
{
shi2--;
if(shi2==-1)
{
shi2=9;
shi5--;
if(shi5==-1)
{
shi5=2;
shi2=3;
}
}
wr_com(0xc9+3);
wr_dat(shi2+0x30);
wr_com(0xc8+3);
wr_dat(shi5+0x30);
}
if(S1numm==3)
{
shi3--;
if(shi3==-1)
{
shi3=9;
shi6--;
if(shi6==-1)
{
shi6=2;
shi3=3;
}
}
wr_com(0xc9+6);
wr_dat(shi3+0x30);
wr_com(0xc8+6);
wr_dat(shi6+0x30);
}
while(!S3);
}
}
}
}}
void main()
{
init1();
init2();
led1=0;
led2=0;
led3=0;
led4=1;
led=0;
keys1=1;
keys2=1;
while(1)
{ zdws();
init_play();
key();
read_temp();
ds18b20disp();
keyscan() ;
adcc();
adbb();
panduan();
panduan1();
panduan2();
panduan3();
}
}

复制代码