电子万年历(数码管显示)

程序

#include

#include

#define uchar unsigned char

#define uint unsigned int

#define jump_ROM 0xCC

#define start 0x44

#define readdata 0xBE

sbit dq=P1^7;

sbit w1=P0^6;

sbit w2=P0^5;

sbit w3=P0^4;

sbit w4=P0^7;

sbit wela=P0^3;

sbit A=P0^0;

sbit b=P0^1;

sbit C=P0^2;

sbit SCLK=P1^0; //DS1302通讯线定义sbit DIO=P1^1;

sbit RST=P1^2;

sbit k1=P1^6;

sbit k2=P1^5;

sbit add=P1^4;

sbit sub=P1^3;

uchar code smgw[]={0,1,2,3,4,5,6,7};

uchar code smgd[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x00};

//uchar code tab[]={0x077,0x12,0x0c7,0x0d3,0x0b2,0x0f1,0x0f4,0x13,0x0f7,0x0b3,0x00}; uchar temperature[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};

uchar code xingqi[] ={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x7f};

uchar tab1[9];

uchar tab2[9];

uchar nian,yue,ri,zhou,shi,fen,miao,a,shan,tt,shan;

uchar knum;

uchar q,j,tempp;

void display();

void delay(uint z)

{

uint x,y;

for(x=z;x>0;x--)

for(y=55;y>0;y--);

}

void delay1(int useconds)

{int s;

for(s=0;s

}

uchar resetds(void)

{

uchar presencesignal;

dq=0;

delay1(30);

dq=1;

delay1(3);

presencesignal=dq;

delay1(30);

return presencesignal;

}

void writebit(char val)

{ dq=0;

if(val==1)

dq=1;

else

dq=0;

delay1(5);

dq=1;

}

void writebyte(char val) {

uchar i;

uchar temp;

for(i=0;i<8;i++)

{

temp=val>>i;

temp&=0x01;

writebit(temp);

}

delay1(5);

}

uchar readbit(void) {

uchar i;

dq=0;

dq=1;

for(i=0;i<3;i++)

return dq;

}

uchar readbyte(void) {

uchar i;

uchar value=0;

for(i=0;i<8;i++) {

if(readbit())

value|=0x01<

delay1(7);

}

return (value);

}

void temper()

{

uchar get[9];

uchar k,lsb,msb,n;

int m;

float t;

m=0;

resetds();

writebyte(jump_ROM);

writebyte(start);

delay1(5);

resetds();

writebyte(jump_ROM);

writebyte(readdata);

display();

for(k=0;k<9;k++)

{

get[k]=readbyte();

}

msb=get[1];

lsb=get[0];

if((msb&0x80)!=0) // /取补码/ {

m=1;

msb=~msb;

lsb=( ~lsb)+1;

if(lsb==0)

{msb++;}

}

display();

n=lsb;

msb=msb<<4;

lsb=lsb>>4;

tempp=msb|lsb;

n=n&0x0f;

t=(float )(n);

t=t*0.0625;

j=(int)(t*100);

P2=temperature[j%10];

w4=1;

w1=0;

delay(2);

P2= temperature[j/10];

w1=1;

w2=0;

delay(2);

P2=temperature[tempp%10]+0x80;

w2=1;

w3=0;

delay(2);

P2= temperature[tempp/10];

w3=1;

w4=0;

delay(2);

w4=1;

}

void write(uchar date) //写入DS1302一个字节

{

uchar temp,i;

RST=1;

SCLK=0;

temp=date;

for(i=0;i<8;i++)

{

SCLK=0;

if(temp&0x01)

DIO=1;

else

DIO=0;

SCLK=1;

temp>>=1;

}

}

uchar read() //读出DS1302一个字节

{

uchar a,temp;

RST=1;

for(a=8;a>0;a--)

{

temp>>=1;

SCLK=1;

_nop_(); _nop_(); _nop_(); _nop_(); _nop_(); _nop_(); _nop_();

SCLK=0;

if(DIO)

{

temp=temp|0x80;

}

else

{

temp=temp|0x00;

}

}

return (temp);

}

void write_1302(uchar add,uchar dat) //写DS1302数据

{

RST=0;

SCLK=0;

RST=1;

write(add);

write(dat);

SCLK=1;

RST=0;

}

uchar read_1302(uchar add) //读DS1302数据

{

uchar dat1,dat2;

RST=0;

SCLK=0;

RST=1;

write(add);

dat1=read();

SCLK=1;

RST=0;

dat2=dat1/16; //数据进制转换

dat1=dat1%16;

dat1=dat1+dat2*10; //十六进制转十进制return(dat1);

}

void ds1302_init() //1302初始化

{

RST=0;

SCLK=0;

write_1302(0x8e,0x00); //允许写入

write_1302(0x80,0x00);//设置初始值SEC

write_1302(0x82,0x59);//设置初始值MIN

write_1302(0x84,0x23);//设置初始值HR

write_1302(0x86,0x20);//设置初始值DA TE

write_1302(0x88,0x4);//设置初始值MONTH write_1302(0x8A,0x03);//设置初始值DAY

write_1302(0x8C,0x12);//设置初始值YEAR

write_1302(0x8e,0x80);

}

void display()

{ P2=temperature[j%10];

w4=1;

w1=0;

delay(2);

P2= temperature[j/10];

w1=1;

w2=0;

delay(2);

P2=temperature[tempp%10]+0x80;

w2=1;

w3=0;

delay(2);

P2= temperature[tempp/10];

w3=1;

w4=0;

delay(2);

w4=1;

miao=read_1302(0x81); //读秒

fen=read_1302(0x83); //读分

shi=read_1302(0x85);//&0x3f; //读时

ri=read_1302(0x87); //读日

yue=read_1302(0x89); //读月

nian=read_1302(0x8d); //读年

zhou=read_1302(0x8B); //读星期

if(knum==7)

{

wela=0; //年

A=0;b=1;C=1;

P2=0x5b&shan;

delay(2);

A=1;b=1;C=1;

P2=0x3f&shan;

delay(2);

wela=1;

A=0;b=0;C=0;

P2=smgd[nian/10]&shan;

delay(2);

A=1;b=0;C=0;

P2=smgd[nian%10]&shan;

delay(2);

}

else

{

wela=0; //年

A=0;b=1;C=1;

P2=0x5b;

delay(2);

A=1;b=1;C=1;

P2=0x3f;

delay(2);

wela=1;

A=0;b=0;C=0;

P2=smgd[nian/10];

delay(2);

A=1;b=0;C=0;

P2=smgd[nian%10];

delay(2);

}

if(knum==6)

{ wela=1;

A=0;b=1;C=0; // 月

P2= smgd [yue/10]&shan;

delay(2);

A=1;b=1;C=0;

P2= smgd [yue%10]&shan;

delay(2);

}

else

{ wela=1;

A=0;b=1;C=0; // 月

P2=smgd [yue/10];

delay(2);

A=1;b=1;C=0;

P2= smgd [yue%10];

delay(2);

}

if(knum==4)

{ wela=1;

A=0;b=1;C=1; // 星期

P2=xingqi[zhou%10]&shan;

delay(2);

}

else

{

A=0;b=1;C=1; // 星期

P2=xingqi[zhou%10];

delay(2);

}

if(knum==5)

{

wela=1;

A=0;b=0;C=1; // 日

P2= smgd [ri/10]&shan;

delay(2);

A=1;b=0;C=1;

P2= smgd [ri%10]&shan;

delay(2);

}

else

{ wela=1;

A=0;b=0;C=1; // 日

P2= smgd [ri/10];

delay(2);

A=1;b=0;C=1;

P2= smgd [ri%10];

delay(2);

}

if(knum==3)

{ wela=0;

A=0;b=0;C=0; // 时

P2= smgd [shi/10]&shan;

delay(2);

A=1;b=0;C=0;

P2= smgd [shi%10]&shan;

delay(2);

}

else

{ wela=0;

A=0;b=0;C=0; // 时

P2= smgd [shi/10];

delay(2);

A=1;b=0;C=0;

P2= smgd [shi%10];

delay(2);

}

if(knum==2)

{ wela=0;

A=0;b=1;C=0; // 分

P2= smgd [fen/10]&shan;

delay(2);

A=1;b=1;C=0;

P2= smgd [fen%10]&shan;

delay(2);

}

else

{ wela=0;

A=0;b=1;C=0; // 分

P2= smgd [fen/10];

delay(2);

A=1;b=1;C=0;

P2= smgd [fen%10];

delay(2);

}

if(knum==1)

{ wela=0;

A=0;b=0;C=1; // 秒

P2= smgd [miao/10]&shan;

delay(2);

A=1;b=0;C=1;

P2= smgd [miao%10]&shan;

delay(2);

wela=1;

A=1;b=1;C=1;

}

else

{ wela=0;

A=0;b=0;C=1; //秒

P2= smgd [miao/10];

delay(2);

A=1;b=0;C=1;

P2= smgd [miao%10];

delay(2);

wela=1;

A=1;b=1;C=1;

}

}

void key()

{

uchar temp;

display();

if(k1==0)

{

delay1(20);

if(k1==0)

{

while(!k1);

knum++;

if(knum==8)

{

knum=1;

}

}

}

if(k2==0)

{

delay1(20);

if(k2==0)

{

while(!k2);

knum--;

if(knum==0)

{

knum=7;

}

}

}

if(knum!=0)

{

if(add==0)

{

delay1(20);

if(add==0)

{

while(!add);

switch(knum)

{

case 1: miao++;

if(miao==60)

{miao=0;}

temp=(miao)/10*16+(miao)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x80,temp);

write_1302(0x8e,0x80); //打开写保护

break;

case 2:fen++;

if(fen==60)

fen=0;

temp=(fen)/10*16+(fen)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x82,temp);

write_1302(0x8e,0x80); //打开写保护}

break;

case 3: shi++;

if(shi==24)

{shi=0;}

temp=(shi)/10*16+(shi)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x84,temp);

write_1302(0x8e,0x80); //打开写保护

break;

case 5:ri++;

switch(yue)

{

case 1:case 3:case 5:case 7:case 8:case 10:case 12:

if(ri==32)

ri=1;

break;

case 4:case 6:case 9:case 11:

if(ri==31)

ri=1;

break;

case 2:

if(nian%4==0||nian%400==0)

{

if(ri==30)

ri=1;

}

else

if(ri==29)

ri=1;

}

break;

}

temp=(ri)/10*16+(ri)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x86,temp);

write_1302(0x8e,0x80); //打开写保护

break;

case 4:zhou++;

if(zhou==8)

zhou=1;

temp=(zhou)/10*16+(zhou)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x8a,temp); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 6: yue++;

if(yue==13)

yue=1;

temp=(yue)/10*16+(yue)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x88,temp);

write_1302(0x8e,0x80); //打开写保护

break;

case 7:nian=(((nian>>4)&0x0f)*10+(nian&0x0f))+1;

if(nian==99)

nian=0;

//temp=(nian)/10*16+(nian)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x8c,((nian/10)<<4)+((nian%10)&0x0f)); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

}

}

if(sub==0)

{

delay1(20);

if(sub==0)

{

while(!sub);

switch(knum)

{

case 1: miao--;

if(miao==-1)

miao=59;

temp=(miao)/10*16+(miao)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x80,temp);

//write_1302(0x80,((miao/10)<<4)+((miao%10)&0x0f)); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 2:fen--;

if(fen==-1)

fen=59;

temp=(fen)/10*16+(fen)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x82,temp);

//write_1302(0x82,((fen/10)<<4)+((fen%10)&0x0f)); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护}

break;

case 3:shi--;

if(shi==-1)

shi=23;

temp=(shi)/10*16+(shi)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x84,temp);

//write_1302(0x84,((shi/10)<<4)+((fen%10)&0x0f)); //向

DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 5:ri--;

switch(yue)

{

case 1:case 3:case 5:case 7:case 8:case 10:case 12:

if(ri==0)

ri=31;

break;

case 4:case 6:case 9:case 11:

if(ri==0)

ri=30;

break;

case 2:

if(nian%4==0||nian%400==0)

{

if(ri==0)

ri=29;

}

else

{

if(ri==0)

ri=28;

}

break;

}

temp=(ri)/10*16+(ri)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x86,temp);

//write_1302(0x86,((ri/10)<<4)+((ri%10)&0x0f)); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 4:zhou--;

if(zhou==0)

zhou=7;

temp=(zhou)/10*16+(zhou)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x8a,temp); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 6: yue--;

//yue=(((yue>>4)&0x01)*10+(yue&0x0f))-1;

if(yue==0)

yue=12;

temp=(yue)/10*16+(yue)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x88,temp); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

case 7:nian=(((nian>>4)&0x0f)*10+(nian&0x0f))-1;

if(nian==-1)

nian=99;

//temp=(nian)/10*16+(nian)%10;//十进制转换成DS1302要求的DCB码

write_1302(0x8e,0x00); //允许写，禁止写保护

write_1302(0x8c,((nian/10)<<4)+((nian%10)&0x0f)); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码

write_1302(0x8e,0x80); //打开写保护

break;

}

}

}

}

}

void main()

{

ds1302_init();

IT0=1;

EX0=1;

TMOD=1;

TH0=(65536-50000)/256;

TL0=(65536-50000)%256;

EA=1;

ET0=1;

TR0=1;

shan=0x00;

temper();

while(1)

{

temper();

for(q=0;q<230;q++)

key();

display();

}

}

void int0() interrupt 0

{

TR0=~TR0;

knum=0;

shan=0x0ff;}

void time0() interrupt 1

{

TH0=(65536-50000)/256;

TL0=(65536-50000)%256;

tt++;

if(tt==9)

{

tt=0;

shan=~shan;

}

}