#include<AT89X52.H>
#include<INTRINS.H>
#define TIME (0X10000-50000)
#define FLAG 0xFC
//0x0E,0x04,0x1F,0x15,0x17,0x11,0x1F,0x00 //鬧鐘標志
//引腳連接圖
sbit rst=P3^5;
sbit clk=P3^4;
sbit dat=P3^3;
sbit rs=P1^5;
sbit rw=P1^6;
sbit e=P1^7;
sbit DQ=P1^4; //溫度輸入口
sbit ACC_7=ACC^7;
//全局變量及常量定義
unsigned char i=20,j,time1[16];
unsigned char alarm[2],time2[16],time[3];
unsigned char code Day[]={31,28,31,30,31,30,31,31,30,31,30,31};//12個月的最大日期(非閏年)
//音律表
unsigned int code table1[]={64260,64400,64524,64580,64684,64777,
64820,64898,64968,65030,65058,65110,65157,65178,65217};
//發聲部分的延時時間
unsigned char code table2[]={0x12,0x12,0x22,0x32,0x31 ,0x22,0x21,0x22,
0x21,0x31,0x51,0x52,0x31,0x52,0x61,0x15,0x14,
0x51,0x52,0x31,0x52,0x62,0x13,0x11,0x13,0x32,0x28,0x08,0x28,
0x31,0x32,0x31, 0x32,0x11,0x21,0x51,0x52,0x51,0x52,
0x51,0x51,0x31,0x32,0x31,0x32,0x81,0x72,0x63,
0x62,0x71,0x81,0x72,0x61,0x61,0x52,0x31,0x21,0x32,0x51,0x54,
0x22,0x12,0x11,0x12,0x11,0x12,0x12,0x14,0x26,0x32,0x26,
0x32,0x61 ,0x51,0x51,0x31,0x31,0x21,0x31,0x51,0x61,0x51 ,0x31,0x51,
0x02,0x32,0x81,0x81,0x81,0x81,0x62,0x52,0x34,
0x31,0x81,0x81,0x81,0x61,0x91,0x82,
0x51,0x51,0x51,0x51,0x31,0x61,0x53,
0x21,0x11,0x21,0x11,0x22,0x11,0x21 ,0x26,
0x32,0x61,0x51,0x51,0x31 ,0x31,0x21 ,0x31,0x51,0x61,0x51,0x31,0x51,0x52,
0x31,0x31,0x81,0x81,0x81,0x61,0x91,0x81,0x61,0x31,0x56,
0x32,0x32,0x81,0x81,0x81,0x81,0x91,0x81,0x61 ,0x81,0x61 ,0x51,0x31 ,0x51,0x34,
0x21,0x31,0x51,0x31,0x21,0x11,0x61,0x21,0x16,0xff
};
//LCD自建字
unsigned char code tab[]={0x18,0x1b,5,4,4,5,3,0,//攝氏度
//0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,//年
//0x0f,0x09,0x0f,0x09,0x0f,0x09,0x11,0x00,//月
0x0e,0x04,0x1f,0x15,0x17,0x11,0x1f,0x00,//鬧鐘
//0x0f,0x09,0x09,0x0f,0x09,0x09,0x0f,0x00,//日
0x00,0x1B,0x1F,0x1F,0x1F,0x0E,0x04,0x00,//愛心
0x00,0x00,0x3F,0xF8,0x21,0x08,0x21,0x08,0x2F,0xE8,0x21,0x08,0x21,0x08,0x3F,0xF8,0x20,0x08,0x27,0xC8,0x24,0x48,0x24,0x48,0x27,0xC8,0x40,0x08,0x40,0x28,0x80,0x10};//周
//*******溫度小數部分用查表法**********//
unsigned char code ditab[16]={0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};
//鬧鐘中用的全局變量
unsigned char th1,tl1;
unsigned char temp_data[2]={0x00,0x00}; // 讀出溫度暫放
bit flag; //18b20存在標志位
/***********11微秒延時函數**********/
delay(unsigned int t)
{
for(;t>0;t--);
}
/***********18B20復位函數**********/
RST18B20(void)
{
unsigned char i;
DQ=1;_nop_();_nop_();
DQ=0; //
delay(50); // 550us
DQ=1; //
delay(6); // 66us
for(i=0;i<0x30;i++)
{
if(!DQ)
goto d1;
}
flag=0; //清標志位,表示ds1820不存在
DQ=1;
return;
d1: delay(45); //延時500us
flag=1;
DQ=1; //置標志位,表示ds1820存在
}
/**********18B20寫命令函數*********/
//向 1-WIRE 總線上寫一個字節
void Write1Byte18B20(unsigned char val)
{
unsigned char i;
for (i=8; i>0; i--) //
{
DQ=1;_nop_();_nop_();
DQ=0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us
DQ=val&0x01; //最低位移出
delay(6); //66us
val=val/2; //右移一位
}
DQ=1;
delay(1);
}
/*********18B20讀1個字節函數********/
//從總線上讀取一個字節
unsigned char Read1Byte18B20(void)
{
unsigned char i;
unsigned char value=0;
for (i=8;i>0;i--)
{
DQ=1;_nop_();_nop_();
value>>=1;
DQ=0; //
_nop_();_nop_();_nop_();_nop_(); //4us
DQ=1;_nop_();_nop_();_nop_();_nop_(); //4us
if(DQ)
value|=0x80;
delay(6); //66us
}
DQ=1;
return(value);
}
/***********讀出溫度函數**********/
Read18B20()
{
RST18B20(); //總線復位
if(!flag) //判斷ds1820是否存在?若ds18b20不存在則返回
return;
//Write1Byte18B20(0xCC); // Skip ROM
//Write1Byte18B20(0x44); // 發轉換命令
//delay(70);
Write1Byte18B20(0xCC); //發Skip ROM命令
Write1Byte18B20(0xBE); //發讀命令
temp_data[0]=Read1Byte18B20(); //溫度低8位
temp_data[1]=Read1Byte18B20(); //溫度高8位
RST18B20();
Write1Byte18B20(0xCC); // Skip ROM
Write1Byte18B20(0x44); // 發轉換命令
}
/***********溫度數據處理函數**********/
DealTempData()
{
unsigned char n=0,m;
if(temp_data[1]>127)//負溫度求補碼
{
temp_data[1]=(256-temp_data[1]);
temp_data[0]=(256-temp_data[0]);
n=1;
}
time2[13]=ditab[temp_data[0]&0x0f]+'0';
time2[12]='.';
m=((temp_data[0]&0xf0)>>4)|((temp_data[1]&0x0f)<<4);//
if(n)
{
m-=16;
}
time2[9]=m/100+'0';
time2[11]=m%100;
time2[10]=time2[11]/10+'0';
time2[11]=time2[11]%10+'0';
if(time2[9]=='0')//最高位為0時都不顯示
{
time2[9]=0x20;
if(n)//負溫度時最高位顯示"-"
{
time2[9]='-';
}
if(time2[10]=='0')
{
if(n)
{
time2[10]='-';
time2[9]=0x20;
}
else
time2[10]=0x20;
if(time2[11]=='0'&&time2[13]=='0')
time2[11]=time2[12]=0x20;
}
}
}
delay1ms(unsigned char time) //延時1ms
{
unsigned char i,j;
for(i=0;i<time;i++)
{
for(j=0;j<250;j++);
}
}
//使能1602
EnableLCD()
{
rs=0;
rw=0;
e=0;
delay1ms(3);
e=1;
}
//寫LCD函數
WriteLCD(unsigned char i)
{
P0=i;
rs=1;
rw=0;
e=0;
delay1ms(2);
e=1;
}
//寫LCD內部地址函數
WriteLCDRAM(unsigned char data *address,m)
{
unsigned char i,j;
for(i=0;i<m;i++,address++)
{
j=*address;
WriteLCD(j);
}
}
//LCD顯示
LCDSHOW()
{
P0=0Xc; //顯示器開、光標關
EnableLCD();
P0=0x80; //寫入顯示起始地址
EnableLCD();
WriteLCDRAM(time1,16);
P0=0xc1; //寫入顯示起始地址
EnableLCD();
WriteLCDRAM(time2,15);
}
//自建字函數庫
DesignHZ()
{
unsigned char i;
P0=0x40;
EnableLCD();
for(i=0;i<32;i++)
{
WriteLCD(tab[i]);
delay1ms(2);
}
}
//寫DS1302子程序
WriteDS1302(unsigned char address)
{
unsigned char i;
clk=0;
_nop_();
rst=1;
_nop_();
for(i=0;i<8;i++)
{
dat=address&1;
_nop_();
clk=1;
address>>=1;
clk=0;
}
}
//讀DS1302子程序
unsigned char ReadDS1302()
{
unsigned char i,j=0;
for(i=0;i<8;i++)
{
j>>=1;
_nop_();
clk=0;
_nop_();
if(dat)
j|=0x80;
_nop_();
clk=1;
}
return(j);
}
//部分顯示數據初始化
TimeInit()
{
time1[1]=time1[4]=time1[5]=time2[8]=time2[9]=time2[10]=0x20,time2[11]=0;
time1[10]='/',time1[13]='/',time1[6]='2',time1[7]='0';
time1[2]='W',time1[5]=2,time2[2]=time2[5]=':';
WriteDS1302(0xc1);
alarm[0]=ReadDS1302();
rst=0;
WriteDS1302(0xc3);
alarm[1]=ReadDS1302();
rst=0;
WriteDS1302(0xc5);
time1[0]=ReadDS1302();
rst=0;
}
//讀取時間
ReadTime()
{
unsigned char i,m,n;
WriteDS1302(0x8d); //讀取年份
m=ReadDS1302();
rst=0;
time1[8]=m/16+0x30;
time1[9]=m%16+0x30;
WriteDS1302(0x8b); //讀取星期
m=ReadDS1302();
rst=0;
time1[3]=m+0x30;
for(i=11,n=0x89;i<15;i+=3,n-=2) //讀取月份和日期
{
WriteDS1302(n);
m=ReadDS1302();
rst=0;
time1[i]=m/16+0x30;
time1[i+1]=m%16+0x30;
}
for(m=0,i=0,n=0x85;i<7;i+=3,n-=2,m++) //讀取時,分,秒
{
WriteDS1302(n);
time[m]=ReadDS1302();
rst=0;
time2[i]=time[m]/16+0x30;
time2[i+1]=time[m]%16+0x30;
}
}
time0() interrupt 1 using 1
{
i--;
if(i==0)
{
if(j!=0)
j--;
i=20;
}
TH0=TIME/256,TL0=TIME%256;
}
//鬧鐘部分
intime1() interrupt 3
{
TH1=th1,TL1=tl1;
P3_2=!P3_2;
}
//顯示鬧鐘設置數據
showalarm()
{
unsigned char i,j,a,b,n;
ET1=1;
for(j=0;j<6;j++)
{
i=0;
while(1)
{
a=table2[i];
if(a==0)
break;
b=a&0xf;
a>>=4;
if(a==0)
{
TR1=0;
goto D1;
}
a=((--a)<<1)/2;
TH1=th1=table1[a]/256,TL1=tl1=table1[a]%256;
TR1=1;
D1: do
{
b--;
for(n=0;n<3;n++)
{
ReadTime();
LCDSHOW();
P2=0xf7;
if(P2==0xe7)
{
delay1ms(100);
if(P2==0xe7)
{
TR1=0;
ET1=0;
return;
}
}
}
}while(b!=0);
i++;
}
TR1=0;
}
ET1=0;
}
//根據日期的變動自動調整星期
unsigned char setweek()
{
unsigned char i=5,j,n;
j=(time1[8]&0xf)*10+(time1[9]&0xf);
n=j/4;
i=i+5*n;
n=j%4;
if(n==1)
i+=2;
else if(n==2)
i+=3;
else if(n==3)
i+=4;
j=(time1[11]&0xf)*10+(time1[12]&0xf);
if(j==2)
i+=3;
else if(j==3)
i+=3;
else if(j==4)
i+=6;
else if(j==5)
i+=1;
else if(j==6)
i+=4;
else if(j==7)
i+=6;
else if(j==8)
i+=2;
else if(j==9)
i+=5;
else if(j==11)
i+=3;
else if(j==12)
i+=5;
if(n==0)
if(j>2)
i++;
j=(time1[14]&0xf)*10+(time1[15]&0xf);
i+=j;
i%=7;
if(i==0)
i=7;
return(i);
}
//設置時間
settime()
{
unsigned char i=0x85,year,month,day,n;
time2[6]=time2[7]=0x30,time1[2]=time1[3]=0x20;
LCDSHOW();
while(1)
{
P0=0xe; //顯示器開、光標開
EnableLCD();
P0=i; //定光標
EnableLCD();
P2=0xf7;
if(P2!=0XF7)
{
delay1ms(100); //延時0.1s去抖動
if(P2!=0XF7)
{
j=7;
if(P2==0X77)
{
i+=3;
if(i==0x8e)
i=0xc2;
else if(i>0xc5)
i=0x85;
}
else if(P2==0xb7)
{
year=(time1[8]&0xf)*10+(time1[9]&0xf);
month=(time1[11]&0xf)*10+(time1[12]&0xf);
day=(time1[14]&0xf)*10+(time1[15]&0xf);
if(i==0x85)
{
year++;
if(year>99)
year=0;
if((year%4)!=0)
if(month==2&&day==29)
day=28;
}
else if(i==0x88)
{
month++;
if(month>12)
month=1;
if(day>Day[month-1])
{
day=Day[month-1];
if(month==2&&(year%4)==0)
day=29;
}
}
else if(i==0x8b)
{
day++;
if(day>Day[month-1])
{
if(month==2&&(year%4)==0)
{
if(day>29)
day=1;
}
if(month!=2)
day=1;
}
}
else if(i==0xc2)
{
n=(time2[0]&0xf)*10+(time2[1]&0xf);
n++;
if(n>23)
n=0;
time2[0]=n/10+0x30;
time2[1]=n%10+0x30;
}
else
{
n=(time2[3]&0xf)*10+(time2[4]&0xf);
n++;
if(n>59)
n=0;
time2[3]=n/10+0x30;
time2[4]=n%10+0x30;
}
time1[8]=year/10+0x30;
time1[9]=year%10+0x30;
time1[11]=month/10+0x30;
time1[12]=month%10+0x30;
time1[14]=day/10+0x30;
time1[15]=day%10+0x30;
LCDSHOW();
}
else if(P2==0xd7)
{
WriteDS1302(0x8c);
WriteDS1302((time1[8]&0xf)*16+(time1[9]&0xf));
rst=0;
WriteDS1302(0x8a);
WriteDS1302(setweek());
rst=0;
for(i=11,n=0x88;i<15;i+=3,n-=2)
{
WriteDS1302(n);
WriteDS1302((time1[i]&0xf)*16+(time1[i+1]&0xf));
rst=0;
}
for(i=0;i<7;i+=3,n-=2)
{
WriteDS1302(n);
WriteDS1302((time2[i]&0xf)*16+(time2[i+1]&0xf));
rst=0;
}
TR0=0;
time1[2]='W';
return;
}
else
{
TR0=0;
time1[2]='W';
return;
}
}
}
if(j==0)
{
TR0=0;
time1[2]='W';
return;
}
}
}
//設置鬧鐘
setalarm()
{
unsigned char i,n;
for(i=1;i<16;i++)
{
time1[i]=0x20;
}
time2[0]=alarm[0]/16+0x30;
time2[1]=(alarm[0]&0xf)+0x30;
time2[3]=alarm[1]/16+0x30;
time2[4]=(alarm[1]&0xf)+0x30;
time2[6]=time2[7]=0x30;
LCDSHOW();
i=0xc2;
while(1)
{
P0=0xe; //顯示器開、光標開
EnableLCD();
P0=i; //定光標
EnableLCD();
P2=0xf7;
if(P2!=0XF7)
{
delay1ms(100); //延時0.1s去抖動
if(P2!=0XF7)
{
j=7;
if(P2==0X77)
{
i+=3;
if(i>0xc5)
i=0xc2;
}
else if(P2==0xb7)
{
if(i==0xc2)
{
n=(time2[0]&0xf)*10+(time2[1]&0xf);
n++;
if(n>23)
n=0;
time2[0]=n/10+0x30;
time2[1]=n%10+0x30;
}
else
{
n=(time2[3]&0xf)*10+(time2[4]&0xf);
n++;
if(n>59)
n=0;
time2[3]=n/10+0x30;
time2[4]=n%10+0x30;
}
LCDSHOW();
}
else if(P2==0xd7)
{
WriteDS1302(0xc0);
WriteDS1302((time2[0]&0xf)*16+(time2[1]&0xf));
rst=0;
WriteDS1302(0xc2);
WriteDS1302((time2[3]&0xf)*16+(time2[4]&0xf));
rst=0;
time1[0]=FLAG;
WriteDS1302(0xc4);
WriteDS1302(time1[0]);
rst=0;
TR0=0;
TimeInit();
return;
}
else
{
TR0=0;
TimeInit();
return;
}
}
}
if(j==0)
{
TR0=0;
TimeInit();
return;
}
}
}
main()
{
IE=0X82;
TMOD=0x11;
WriteDS1302(0x8E); //禁止寫保護
WriteDS1302(0);
rst=0;
P0=1; //清屏并光標復位
EnableLCD();
P0=0X38; //設置顯示模式:8位2行5x7點陣
EnableLCD();
P0=6; //文字不動,光標自動右移
EnableLCD();
DesignHZ(); //自建字
TimeInit();
while(1)
{
ReadTime(); //讀取時間
Read18B20(); //讀出18B20溫度數據
DealTempData(); //處理溫度數據
LCDSHOW(); //顯示時間
if(time1[0]!=0x20)
if(time[0]==alarm[0])
if(time[1]==alarm[1])
if(time[2]==0)
showalarm();
P2=0xf7;
if((P2&0XF0)!=0XF0)
{
delay1ms(100); //延時0.1s去抖動
if((P2&0XF0)!=0XF0)
{
j=7;
TH0=TIME/256,TL0=TIME%256;
TR0=1;
if(P2==0x77)
{
settime();
}
else if(P2==0XB7)
{
setalarm();
}
else if(P2==0XD7)
{
TR0=0;
if(time1[0]==FLAG)
time1[0]=0x20;
else
time1[0]=FLAG;
WriteDS1302(0xc4);
WriteDS1302(time1[0]);
rst=0;
}
}
}
delay1ms(100);
}
}
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
