#include<reg51.h>
#include<intrins.h>
#include<math.h>
#define uchar unsigned char
#define uint unsigned int
#define S_RST DS_RST=1
#define C_RST DS_RST=0
#define S_CLK DS_CLK=1
#define C_CLK DS_CLK=0
#define Write_Disable RW_DS1302(0x8e,0x80) //寫保護(hù)
#define Write_Enable RW_DS1302(0x8e,0x00) //允許寫入
sbit SET = P1^5; //設(shè)置按鍵
sbit ADD = P1^4; //調(diào)整加
sbit DEC = P1^6; //調(diào)整減
#define RdefineT1 TH1=0;TL1=0;TR1=0;a=0; //初始化超時(shí)檢測(cè)
//#define Delay2us() _nop_();_nop_(); //延時(shí)2us,每nop 1us
//#define Delay8us() _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
#define ReDetectTime 20 //設(shè)置重復(fù)檢測(cè)次次數(shù),超出次數(shù)則超時(shí)
//ds18b20命令
#define SkipROM 0xCC
#define MatchROM 0x55
#define ReadROM 0x33
#define SearchROM 0xF0
#define AlarmSearch 0xEC
#define Convert 0x44 //啟動(dòng)溫度轉(zhuǎn)換
#define WriteScr 0x4E
#define ReadScr 0xBE
#define CopyScr 0x48
#define RecallEE 0xB8
#define ReadPower 0xB4
#define md collect_time[0]&0x0f
#define mg (collect_time[0]&0x70)/16
#define fd collect_time[1]&0x0f
#define fg (collect_time[1]&0x70)/16
#define sd collect_time[2]&0x0f
#define sg (collect_time[2]&0x30)/16
sbit DS_RST = P1^2; //DS復(fù)位端
sbit DS_CLK = P1^0; //SCLK端
sbit DS_IO = P1^1; //IO端
sbit DS18B20 = P1^3; //溫度傳感器接口
bit keyboard,flash,STA=1;
uchar choose,a;
uchar collect_time[3]={0x45,0x23,0x11};//定義變量秒分時(shí)
uchar collect_temperature[2] = {0};
uchar num[10] = {0x7e,0x48,0x3d,0x6d,0x4b,0x67,0x77,0x4c,0x7f,0x6f};
//七段數(shù)碼管顯示的段碼
uchar display[8] = {0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08};
void delay(uint i)
{
uint k;
while(i--)
{
for(k=0;k<120;k++){;}
}
}
void Dat_Int(void)//數(shù)據(jù)初始化
{
P0=0xff;
P1=0xff;
P2=0xff;
choose=0;
flash=1;
}
void Time01_Int(void)
{
TMOD = 0x12; //定時(shí)器0為8位自動(dòng)重載定時(shí)采樣,定時(shí)器1為16位超時(shí)檢測(cè)處理
TCON = 0x00;
TH0 = 0x60;
TL0 = 0x60;
TR0 = 1;
IE = 0x0a; //允許定時(shí)器0、1中斷
IP = 0x00;
}
/********************************************************
* *
* DS18B20溫度傳感器程序段 *
* *
********************************************************/
/***********11微秒延時(shí)函數(shù)**********/
//
void delayus(uint t)
{
for(;t>0;t--);
}
/***********18B20復(fù)位函數(shù)**********/
void ow_reset(void)
{
char presence=1;
while(presence)
{
while(presence)
{
DS18B20 = 1;_nop_();_nop_();
DS18B20 = 0;
delayus(50); // 550us
DS18B20 = 1;
delayus(6); // 66us
presence=DS18B20; // presence=0繼續(xù)下一步
}
delayus(45); //延時(shí)500us
presence = ~DS18B20;
}
DS18B20 = 1;
}
/**********18B20寫命令函數(shù)*********/
//向 1-WIRE 總線上寫一個(gè)字節(jié)
void write_byte(uchar val)
{
uchar i;
for (i=8; i>0; i--) //
{
DS18B20 = 1;_nop_();_nop_();
DS18B20 = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us
DS18B20 = val&0x01; //最低位移出
delayus(6); //66us
val=val/2; //右移一位
}
DS18B20 = 1;
delayus(1);
}
//
/*********18B20讀1個(gè)字節(jié)函數(shù)********/
//從總線上讀取一個(gè)字節(jié)
uchar read_byte(void)
{
uchar i;
uchar value = 0;
for (i=8;i>0;i--)
{
DS18B20 = 1;_nop_();_nop_();
value>>=1;
DS18B20 = 0; //
_nop_();_nop_();_nop_();_nop_(); //4us
DS18B20 = 1;_nop_();_nop_();_nop_();_nop_(); //4us
if(DS18B20)value|=0x80;
delayus(6); //66us
}
DS18B20 = 1;
return(value);
}
//
/***********讀出溫度函數(shù)**********/
//
void Ds18b20_ReadEE(void)
{
ow_reset();
write_byte(SkipROM); // Skip ROM
write_byte(Convert); // 發(fā)轉(zhuǎn)換命令
ow_reset(); //總線復(fù)位
write_byte(SkipROM); // 發(fā)Skip ROM命令
write_byte(ReadScr); // 發(fā)讀命令
collect_temperature[0]=read_byte(); //溫度低8位
collect_temperature[1]=read_byte(); //溫度高8位
}
/********************************************************
* *
* DS1302時(shí)鐘芯片程序段 *
* *
********************************************************/
void DS1302_InputByte(uchar byte) //往DS1302寫入1Byte數(shù)據(jù)
{
uchar i;
uchar temp;
temp = byte;
for(i=8; i>0; i--)
{
DS_IO = temp&0x01;
S_CLK;
C_CLK;
temp = temp >> 1;
}
}
uchar DS1302_OutputByte(void) //從DS1302讀取1Byte數(shù)據(jù)
{
uchar i;
uchar temp=0;
for(i=0; i<8;i++)
{
C_CLK;
if(DS_IO!=0) temp|=(1<<i);
S_CLK;
}
return(temp);
}
void RW_DS1302(uchar reg, uchar byte)//向DS1302寄存器寫數(shù)據(jù)
{
C_RST;
C_CLK;
S_RST;
DS1302_InputByte(reg);
DS1302_InputByte(byte);
S_CLK;
C_RST;
}
uchar Read_DS1302(uchar reg)//從DS1302寄存器讀數(shù)據(jù)
{
uchar byte;
C_RST;
C_CLK;
S_RST;
DS1302_InputByte(reg);
byte = DS1302_OutputByte();
S_CLK;
C_RST;
return(byte);
}
void GetTime_DS1302(uchar *ucCurtime) //讀取DS1302當(dāng)前時(shí)間
{
ucCurtime[0] = Read_DS1302(0x81);//格式為: 秒 分 時(shí)
ucCurtime[1] = Read_DS1302(0x83);
ucCurtime[2] = Read_DS1302(0x85);
}
void Set_Time(uchar *receive) //寫時(shí)間
{
Write_Enable; //控制命令,允許寫操作
RW_DS1302(0x80,receive[0]);
RW_DS1302(0x82,receive[1]);
RW_DS1302(0x84,receive[2]);
Write_Disable; // 控制命令,寫保護(hù)
}
/********************************************************
* *
* 數(shù)碼管顯示程序段 *
* *
********************************************************/
void deal(void)//送顯前的數(shù)據(jù)處理
{uint timer2;
uint lstemp;
timer2++;
if(STA)
{GetTime_DS1302(collect_time);}
if(flash)//用于閃動(dòng)效果的控制的
{
display[0] = num[sg];
display[1] = num[sd];
display[2] = num[fg];
display[3] = num[fd];
display[4] = num[mg];
display[5] = num[md];
}
else
{switch(choose)
{
case 1:display[0]=0;break;
case 2:display[1]=0;break;
case 3:display[2]=0;break;
case 4:display[3]=0;break;
case 5:display[4]=0;break;
case 6:display[5]=0;break;
}
}
if(timer2==3000)//間斷性獲取溫度
{
timer2=0;
if(STA)
{TR0=0;
Ds18b20_ReadEE();
TR0=1;
}
}
if(collect_temperature[1]>127)
{
collect_temperature[0]=255-collect_temperature[0];
collect_temperature[1]=255-collect_temperature[1];
}
lstemp=((collect_temperature[0])>>4)|((collect_temperature[1])<<4);
display[6] = num[(uchar)((lstemp)/10)];
display[7] = num[(uchar)((lstemp)%10)];
}
/********************************************************
* *
* 按鍵控制程序段 *
* *
********************************************************/
void Scan(void)
{
if(SET==0&&keyboard==1) //檢測(cè)設(shè)置鍵有無按下,并進(jìn)行相應(yīng)操作
{
if(SET==0&&keyboard==1)
{ RdefineT1; //超時(shí)檢測(cè)初始化
choose++;
while(SET==0);
if(choose==7)
{TR0=0;
Set_Time(collect_time);
TR0=1;
STA=1; //設(shè)置完畢,重新開始采集時(shí)間
choose=0;
}
}
}
if(choose) //只有在時(shí)間調(diào)整時(shí),加減按鍵才有作用
{
if(ADD==0&&keyboard==1) //檢測(cè)加調(diào)整鍵有無按下,并進(jìn)行相應(yīng)操作
{
if(ADD==0&&keyboard==1)
{ RdefineT1; //超時(shí)檢測(cè)初始化a=0
TR0=0;
switch (choose)
{
case 1 :if(sg==2)
collect_time[2] = collect_time[2]&0x0f;
else {collect_time[2]+=16;}
break;
case 2 :if((sg<2)&&(sd==9))
collect_time[2] &= 0x30;
if((sg>=2)&&(sd==3))
collect_time[2] &= 0x30;
else {collect_time[2]++;}
break;
case 3: if(fg==5)
collect_time[1] &= 0x0f;
else {collect_time[1]+=16;}
break;
case 4: if(fd==9)
collect_time[1] &= 0xf0;
else {collect_time[1]++;}
break;
case 5: if(mg==5)
collect_time[0] &= 0x0f;
else {collect_time[0]+=16;}
break;
case 6: if(md==9)
collect_time[0] &= 0xf0;
else {collect_time[0]++;}
break;
}
TR0=1;
while(ADD==0);
}
}
if(DEC==0&&keyboard==1) //檢測(cè)減調(diào)整鍵有無按下,并進(jìn)行相應(yīng)操作
{
if(DEC==0&&keyboard==1)
{ RdefineT1; //超時(shí)檢測(cè)初始化
TR0=0;
switch (choose)
{
case 1 :if(sg==0)
collect_time[2]=0x20;
else collect_time[2]-=16;
break;
case 2 :if(sg<2&&sd==0)
collect_time[2] |= 0x09;
if(sg==2&&sd==0)
collect_time[2] |= 0x03;
else collect_time[2]-=1;
break;
case 3 :if(fg==0)
collect_time[1] |= 0x50;
else collect_time[1]-=16;
break;
case 4 :if(fd==0)
collect_time[1] |= 0x09;
else collect_time[1]-=1;
break;
case 5 :if(mg==0)
collect_time[0] |= 0x50;
else collect_time[0]-=16;
break;
case 6 :if(md==0)
collect_time[0] |= 0x09;
else collect_time[0]-=1;
break;
}
TR0=1;
while(DEC==0);
}
}
}
if(choose!=0){TR1=1;STA=0;} //在設(shè)置模式下停止采集時(shí)間
else {TR1=0;STA=1;}
}
/********************************************************
* *
* AT89S51主程序段 *
* *
********************************************************/
void main(void)
{
Time01_Int();
Dat_Int();
EA = 1; //開中斷
ow_reset(); // 開機(jī)先轉(zhuǎn)換一次
write_byte(0xCC); // Skip ROM
write_byte(0x44); // 發(fā)轉(zhuǎn)換命令
delay(100);
Set_Time(collect_time);
delay(10);
while(1)
{
Scan();
deal();
}//while循環(huán)的結(jié)束
}//main函數(shù)的結(jié)束
void Time0_seve() interrupt 1 //定時(shí)器0中斷服務(wù)程序
{
uint timer;
uchar i,ktemp;
if((P1&0x70)<0x70) //防抖控制用
keyboard=1;
else keyboard=0;
timer++;
if(timer==800)//控制數(shù)碼管的閃動(dòng)效果
{
if(choose !=0)
flash=~flash;
else flash = 1;
timer=0;
}
TR0=0;
ktemp=P0;
if(P0==0xfe)i=1;
else if(P0==0xfd)i=2;
else if(P0==0xfb)i=3;
else if(P0==0xf7)i=4;
else if(P0==0xef)i=5;
else if(P0==0xdf)i=6;
else if(P0==0xbf)i=7;
else if(P0==0x7f)i=0;
else i=1;
ktemp=ktemp*2+1;
if(ktemp==0xff)ktemp=0xfe;
P0=ktemp;
P2=display[i];
TR0=1;
}
void Time1_seve() interrupt 3 //定時(shí)器1中斷服務(wù)程序
{
TR1=0;TH1=0;TL1=0;
a++;
if(a>4*ReDetectTime)
{
choose=0;
a=0;
Set_Time(collect_time);
STA=1; //超過按鍵等待時(shí)間,自動(dòng)寫入并開始采集時(shí)間
}
}