#include<reg51.h>
#include"DS18B20_3.H"
#define uint unsigned int
#define uchar unsigned char
#define LCD1602_DATAPINS P0
uchar a,miao,shi,fen,ri,yue,nian,week,flag,key1n,temp;
//flag用于讀取頭文件中的溫度值,和顯示溫度值
#define yh 0x80 //LCD 第一行的初始位置,因為LCD1602 字符地址首位D7恒定為1(100000000=80)
#define er 0x80+0x40 //LCD第二行初始位置(因為第二行第一個字符位置地址是0x40)
sbit rs=P2^6;
sbit en=P2^7;
sbit rw=P2^5; //如果硬件.上rw接地,就不用寫這句和后面的rw=0了
sbit DSPORT=P3^7;
//DS1302時鐘芯片與C51之間的引腳連接定義
sbit IO=P3^4;
sbit SCLK =P3^6;
sbit RST =P3^5;
sbit ACC0= ACC^0;
sbit ACC7= ACC^7;
//校時按鍵與C51的引腳連接定義
sbit key1=P1^3; //設置鍵
sbit key2= P1^6; //加鍵
sbit key3=P1^7; //減鍵
sbit buzzer=P1^5;//蜂鳴器,通過三極管9012驅動,端口低電平響
uchar code tab1[]={"20 - - "};
uchar code tab2[]={" : : "};//時 間顯示的固定字符
//---DS1302時鐘初始化2013年1月1日星期二12點00分00秒。---//
//---存儲順序是秒分時日月周年,存儲格式是用BCD碼---//
uchar TIME[7] = {0, 0, 0x12, 0x01, 0x01, 0x02, 0x13};
//延時函數,后面經常調用
void delay(uint xms)//延時函數,有參函數
{
uint x,y;
for(x=xms;x>0;x--)
for(y=110;y>0;y--);
}
/******液晶寫入指令函數與寫入數據函數,以后可調用************/
/*在這個程序中,液晶寫入有關函數會在DS 1302的函數中調用,所以液晶程序要放在前面*/
write_1602com(uchar com)//****液晶寫入指令函數****
{
rs=0;//數據/指令選擇置為指令
rw=0; //讀寫選擇置為寫
LCD1602_DATAPINS=com;//送入數據:
delay(1);
en=1;//拉高使能端,為制造有效的下降沿做準備
delay(5);
en=0;
}//en由高變低,產生下降沿,液晶執(zhí)行命令
write_1602dat(uchar dat)//***液晶寫入數據函數****.
{rs=1;//數據/指令選擇置為數據
rw=0;
LCD1602_DATAPINS=dat;//送入數據
delay(1);
en=1;//en置高電平,為制造下降沿做準備.
delay(5);
en=0; //en由高變低,產生下降沿,液晶執(zhí)行命令
}
lcd_init()//*** 液晶初始化函數
{
write_1602com(0x38);//設 置液晶工作模式,意思: 16*2 行顯示,5*7 點陣,8位數據
write_1602com(0x0c);//開 顯示不顯示光標
write_1602com(0x06);//整屏不移動, 光標自動右移
write_1602com(0x01);//清 顯示
write_1602com(yh+1);//日歷顯示固定符號從第一-行第1個位置之后開始顯示
for(a=0;a<14;a++)
{
write_1602dat(tab1[a]);// 向液晶屏寫日歷顯示的固定符號部分
delay(3);
}
write_1602com(er+2);//時 間顯示固定符號寫入位置,從第2個位置后開始顯示
for(a=0;a<8;a++)
{
write_1602dat(tab2[a]);//寫 顯示時間固定符號,兩個冒號
delay(3);
}
}
void write_byte(uchar dat)//
{
ACC=dat;
RST=1;
for(a=8;a>0;a--)
{
IO=ACC0;
SCLK=0;
SCLK=1;
ACC= ACC>>1;
}
}
uchar read_byte()//讀- -個字 節(jié)
{RST=1;
for(a=8;a>0;a--)
{
ACC7=IO;
SCLK=1;
SCLK=0;
ACC= ACC>>1;
}
return (ACC);
}
void write_1302(uchar add,uchar dat)//向1302 芯片寫函數,指定寫入地址,數據
{RST=0;
SCLK=0;
RST=1;
write_byte(add);
write_byte(dat);
SCLK=1;
RST=0;
}
uchar read_1302(uchar add)//從1302讀數據函數,指定讀取數據來源地址
{
uchar temp;
RST=0;
SCLK=0;
RST=1;
write_byte(add);
temp=read_byte();
SCLK=1;
RST=0;
return(temp);
}
uchar BCD_Decimal(uchar bcd)//BCD碼轉十進制函數,輸入BCD,返回十進制
{uchar Decimal;
Decimal=bcd>>4;
return( Decimal=Decimal*10+(bcd&=0x0F));
}
void ds1302_init() //1302芯片初始化子函數(2010-01-07,12:00:00,week4)
{
uchar n;
write_1302(0x8e,0x00); //允許寫,禁止寫保護
write_1302(0x80,0x00); //響DS 1302內寫秒寄存器80H寫入初始秒數據00
write_1302(0x82,0x00);//向 DS1302 內寫分寄存器82H寫入初始分數據00
write_1302(0x84,0x12);//向 DS1302內寫小時寄存器84H寫入初始小時數據12
write_1302(0x8a,0x04);//向 DS1302內寫周寄存器8aH寫入初始周數據4
write_1302(0x86,0x07);//向 DS1302內寫日期寄存器86H寫入初始日期數據07
write_1302(0x88,0x01);//向 DS1302 內寫月份寄存器88H寫入初始月份數據01
write_1302(0x8c,0x10);//向 DS1302內寫年份寄存器8cH寫入初始年份數據10
write_1302(0x8e,0x80);//打開寫保護
}
uchar Ds18b20Init()
{
uchar i;
DSPORT = 0; //將總線拉低480us~960us
i = 70;
while(i--);//延時642us
DSPORT = 1; //然后拉高總線,如果DS18B20做出反應會將在15us~60us后總線拉低
i = 0;
while(DSPORT) //等待DS18B20拉低總線
{
i++;
if(i>5)//等待>5MS
{
return 0;//初始化失敗
}
delay(1);
}
return 1;//初始化成功
}
uchar Ds18b20ReadByte()
{
uchar byte, bi;
uint i, j;
for(j=8; j>0; j--)
{
DSPORT = 0;//先將總線拉低1us
i++;
DSPORT = 1;//然后釋放總線
i++;
i++;//延時6us等待數據穩(wěn)定
bi = DSPORT; //讀取數據,從最低位開始讀取
/*將byte左移一位,然后與上右移7位后的bi,注意移動之后移掉那位補0。*/
byte = (byte >> 1) | (bi << 7);
i = 4; //讀取完之后等待48us再接著讀取下一個數
while(i--);
}
return byte;
}
void Ds18b20ChangTemp()
{
Ds18b20Init();
delay(1);
write_1602dat(0xcc); //跳過ROM操作命令
write_1602dat(0x44); //溫度轉換命令
delay(100); //等待轉換成功,而如果你是一直刷著的話,就不用這個延時了
}
void Ds18b20ReadTempCom()
{
Ds18b20Init();
delay(1);
write_1602dat(0xcc); //跳過ROM操作命令
write_1602dat(0xbe); //發(fā)送讀取溫度命令
}
int Ds18b20ReadTemp()
{
int temp = 0;
uchar tmh, tml;
Ds18b20ChangTemp(); //先寫入轉換命令
Ds18b20ReadTempCom(); //然后等待轉換完后發(fā)送讀取溫度命令
tml = Ds18b20ReadByte(); //讀取溫度值共16位,先讀低字節(jié)
tmh = Ds18b20ReadByte(); //再讀高字節(jié)
temp = tmh;
temp <<= 8;
temp |= tml;
return temp;
}
void write_temp(uchar add,uchar dat)//向LCD寫溫度數據,并指定顯示位置
{
uchar gw,sw;
gw=dat%10;//取得個位數字
sw=dat/10;//取得十位數字
write_1602com(er+add);//er 是頭文件規(guī)定的值0x80+0x40
write_1602dat(0x30+sw);//數字+30 得到該數字的LCD1602顯示碼
write_1602dat(0x30+gw);//數字+30得到該數字的LCD1602顯示碼
write_1602dat(0xdf);// 顯示溫度的小圓圈符號,0xdf 是液晶屏字符庫的該符號地址碼
write_1602dat(0x43); //顯示"C"符號, 0x43 是液晶屏字符庫里大寫C的地址碼
}
void write_sfm(uchar add,uchar dat)//向LCD寫時分秒,有顯示位置加、現示數據,兩個參數
{uchar gw,sw;
gw=dat%10;//取得個位數字
sw=dat/10;//取得十位數字
write_1602com(er+add);//er是頭文件規(guī)定的值0x80+0x40
write_1602dat(0x30+sw );//數字+30得到該數字的LCD1602顯示碼
write_1602dat(0x30+gw);//數字+30得到該數字的LCD1602顯示碼士
}
void write_nyr(uchar add,uchar dat)//向LCD寫年月日,有顯示位置加數、顯示數據,兩個參數
{uchar gw,sw;
gw=dat%10;//取得個位數字
sw=dat/10;//取得十位數字
write_1602com( yh+add);//設定顯示位置為第一個位置+add
write_1602dat(0x30+sw);//數字+30得到該數字的LCD1602顯示碼
write_1602dat(0x30+gw);//數字+30 得到該數字的LCD1602顯示碼
}
void write_week(uchar week)//寫星期函數
{
write_1602com(yh+0x0c);//星期字符的顯示位置
switch(week)
{
case 1:write_1602dat('M');//星期數為 1時,顯示
write_1602dat('O');
write_1602dat('N');
break;
case 2:write_1602dat('T');//星 期數據為2時顯示
write_1602dat('U');
write_1602dat('E');
break;
case 3:write_1602dat('W');//星 期數據為3時顯示
write_1602dat('E');
write_1602dat('D');
break;
case 4:write_1602dat('T');//星期數據為4 是顯示
write_1602dat('H');
write_1602dat('U');
break;
case 5:write_1602dat('F');//星期數據為5時顯示
write_1602dat('R');
write_1602dat('I');
break;
case 6:write_1602dat('S');//星 期數據為6時顯示
write_1602dat('T');
write_1602dat('A');
break;
case 7:write_1602dat('S');//星期數據為7時顯示
write_1602dat('U');
write_1602dat('N');
break;
}
}
//**************鍵盤掃描有關函數*********** ** *******
void keyscan()
{
if(key1==0)//--------keyl為功能鍵(設置鍵) -
{
delay(9);//延時,用于消抖動
if(key1==0)//延時后再次確認按鍵按下
{
buzzer=0;//蜂鳴器短響一次
delay(20);
buzzer=1;
while(!key1);
key1n++;
if(key1n==9)
key1n=1;//設置按鍵共有秒、分、時、星期、日、月、年、返回,8個功能循環(huán)
switch(key1n)
{
case 1:TR0=0;//關閉定時器
//TR1=0;
write_1602com(er+0x09);//設置按鍵按動一 次, 秒位置顯示光標
write_1602com(0x0f);// 設置光標為閃爍
temp=(miao)/10*16+(miao)%10;//秒數據寫入DS 1302
write_1302(0x8e,0x00);
write_1302(0x80,0x80|temp);//miao
write_1302(0x8e,0x80);
break;
case 2: write_1602com(er+6);//按 2次fen位置顯示光標
//write_1602com(0x0f);
break;
case 3: write_1602com(er+3);//按動 3次,shi
//write_1602com( 0x0f);
break;
case 4: write_1602com(yh+0x0e);//按動4 次,week
//write_1602com(0x0f);
break;
case 5: write_1602com(yh+0x0a);//按動5 次,ri
//write_1602com(0x0f);
break;
case 6: write_1602com(yh+0x07);//按動6次,yue
//write_1602com( 0x0f);
break;
case 7: write_1602com(yh+0x04);//按動 7次,nian
//write_1602com(0x0f);
break;
case 8:write_1602com(0x0c);//按動到第8次,設置光標不閃爍
TR0=1;//打開定時器
temp=(miao)/10*16+(miao)%10;
write_1302(0x8e,0x00);
write_1302(0x80,0x00|temp);//miao 數據寫入DS1302
write_1302(0x8e,0x80);
break;
}
}
}
//-------------_加鍵key2-
if(key1n!=0)//當key1按下以下。再按以下鍵才有效(按鍵次數不等于零)
{
if(key2==0)
{ //. 上調鍵,
delay( 10);
if(key2==0)
{
buzzer=0;//蜂鳴器短響一次
delay(20);
buzzer=1;
while(!key2);
switch(key1n)
{
case 1:miao++;//設置鍵按動1次,調秒
if(miao== 60)
miao=0;//秒超過59,再加1,就歸零
write_sfm(0x08,miao);//令 LCD在正確位置顯示"加"設定好的秒數
temp=(miao)/10*16+(miao)%10;//十進制轉換成DS 1302要求的DCB碼
write_1302(0x8e,0x00); //允許寫,禁止寫保護
write_1302(0x80,temp); //向DS 1302內寫秒寄存器80H寫入調整后的秒數據BCD碼
write_1302(0x8e,0x80); //打開寫保護
write_1602com(er+0x09);//
//write_1602com( 0x0b);
break;
case 2:fen++;
if(fen==60)
fen=0;
write_sfm(0x05,fen);//令 LCD在正確位置顯示"加"設定好的分數據
temp=(fen)/10*16+(fen)%10;//+進制轉換成DS 1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x82,temp);//向 DS 1302內寫分寄存器82H寫入調整后的分數據BCD碼
write_1302(0x8e,0x80);//打 開寫保護
write_1602com(er+6);//
break;
case 3:shi++;
if(shi==24)
shi=0;
write_sfm(2,shi);//令 LCD在正確的位置顯示"加"設定好的小時數據
temp=(shi)/10*16+(shi)% 10;//十進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00);// 允許寫,禁止寫保護
write_1302(0x84,temp);//向 DS1302內寫小時寄存器84H寫入調整后的小時數據BCD碼
write_1302(0x8e,0x80);//打 開寫保護
write_1602com( er+3);//
break;
case 4:week++;
if(week==8)
week=1;
write_1602com(yh+0x0C);//指定加后 的周數據顯示位置
write_week(week);//指定 周數據顯示內容
temp=(week)/10* 16+(week)% 10;//+進制轉換成DS 1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x8a,temp);//向DS1302內寫周寄存器8aH寫入調整后的周數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(yh+0x0e);//
break;
case 5:ri++;
if(ri==32)
ri=1;
write_nyr(9,ri);//令 LCD在正確的位置顯示"加"設定好的日期數據
temp=(ri)/10*16+(ri)%10;//十進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x86,temp);//向 DS1302內寫日期寄存器86H寫入調整后的日期數據BCD
write_1302(0x8e,0x80);//打 開寫保護
write_1602com(yh+10);//
break;
case 6:yue++;
if(yue==13)
yue=1;
write_nyr(6,yue);//令 LCD在正確的位置顯示"加"設定好的月份數據
temp=(yue)/10* 16+(yue)%10;//十進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x88,temp);//向 DS1302 內寫月份寄存器88H寫入調整后的月份數據BCD碼
write_1302(0x8e,0x80);//打 開寫保護
write_1602com(yh+7);//
break;
case 7:nian++;
if(nian==100)
nian=0;
write_nyr(3,nian);//令 LCD在正確的位置顯示"加"設定好的年份數據
temp=(nian)/10*16+(nian)%10;//十進制轉換成DS1302要求的DCB碼
write_1302(0x8,0x00);//允許寫, 禁止寫保護
write_1302(0x8c,temp);//向 DS1302內寫年份寄存器8cH寫入調整后的年份數據BCD碼
write_1302(0x8e,0x80);//打 開寫保護
write_1602com(yh+4);//
break;
}
}
}
if(key3==0)
{
delay(10);
if(key3==0)
{
buzzer=0;//蜂鳴器短響一次
delay(20);
buzzer=1;
while(!key3);
switch(key1n)
{
case 1:miao--;
if(miao==-1)
miao=59;//秒數據減到-1時自動變成59
write_sfm(0x08,miao);//在LCD的正確位置顯示改變后新的秒數
temp=(miao)/10*16+(miao)%10;//十進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00); //允許寫,禁止寫保護
write_1302(0x80,temp); //向DS 1302內寫秒寄存器80H寫入調整后的秒數據BCD碼
write_1302(0x8e,0x80); //打開寫保護
write_1602com(er+0x09);//
//write_1602com(0x0b);
break;
case 2:fen--;
if(fen==-1)
fen=59;
write_sfm(5,fen);
temp=(fen)/10*16+(fen)%10;//+進制轉換成DS1302要求的DCB碼.
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x82,temp);//向 DS1302內寫分寄存器82H寫入調整后的分數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(er+6);//
break;
case 3:shi--;
if(shi==-1)
shi=23;
write_sfm(2,shi);
temp=(shi)/10*16+(shi)%10;// +進制轉換成DS1302要求的DCB碼.
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x84,temp);//向 DS1302 內寫小時寄存器84H寫入調整后的小時數據BCD碼
write_1302(0x8e,0x80);//打 開寫保護
write_1602com(er+3);//
break;
case 4:week--;
if(week==0)
week=7;
write_1602com(yh+0x0C);//指定加后的周數據顯示位置
write_week(week);//指定 周數據顯示內容
temp=(week)/10*16+(week)%10;//+進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護白局消尤水」
write_1302(0x8a,temp);//向 DS 1302內寫周寄存器8aH寫入調整后的周數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(yh+0x0e);//
break;
case 5:ri--;
if(ri==0)
ri=31;
write_nyr(9,ri);
temp=(ri)/10* 16+(ri)%10;// t進制轉換成DS 1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x86,temp);//向 DS1302內寫日期寄存器86H寫入調整后的日期數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(yh+ 10);//
break;
case 6:yue--;
if(yue==0)
yue=12;
write_nyr(6,yue);
temp=(yue)/10*16+(yue)%10;//+進制轉換成DS1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x88,temp);//向 DS1302內寫月份寄存器88H寫入調整后的月份數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(yh+7);//
break;
case 7:nian--;
if(nian==-1)
nian=99;
write_nyr(3,nian);
temp=(nian)/10*16+(nian)%10;//十進制轉換成DS 1302要求的DCB碼
write_1302(0x8e,0x00);//允許寫, 禁止寫保護
write_1302(0x8c,temp);//向 DS1302 內寫年份寄存器8cH寫入調整后的年份數據BCD碼
write_1302(0x8e,0x80);//打開寫 保護
write_1602com(yh+4);//
break;
}
}
}
}
}
void init() //定時器、計數器設置函數
{
TMOD=0x11; //指定定時/計數器的工作方式為3
TH0=0; //定時 器T0的高四位=0
TL0=0;
//定時器T0的低四位=0
EA=1; //系統(tǒng)允許有 開放的中斷
ET0=1; //允許T0中斷
TR0=1; //開啟中斷,啟動定時器
}
//*******************主函數********* ** ** ** * * * * * * * * * **
//************ *** * **** **** *** **** **** **** **** **** ****
void main()
{
lcd_init(); //調用液晶屏初始化子函數
ds1302_init(); //調用 DS 1302時鐘的初始化子函數
init();//調用定時計數器的設置子函數
buzzer=0;//蜂鳴器長響一 次
delay(80);
buzzer= 1;
while(1) //無限循環(huán) 下面的語句:
{
keyscan();
//調用鍵盤掃描子函數
}
}
void timer0() interrupt 1 //取得 并顯示日歷和時間
{
Ds18b20Init;//溫度傳感器DS18b2初始化子函數,在頭文件中.
flag=Ds18b20ReadTemp();//將18b2頭文件運行返回的函數結果送到變量FLAG中,用于顯示
//讀取秒時分周日月年七個數據(DS1302 的讀寄存器與寫寄存器不一樣):
miao=BCD_Decimal(read_1302(0x81));
fen=BCD_Decimal(read_1302(0x83));
shi=BCD_Decimal(read_1302(0x85));
ri=BCD_Decimal(read_1302(0x87));
yue=BCD_Decimal(read_1302(0x89));
nian=BCD_Decimal(read_1302(0x8d));
week=BCD_Decimal(read_1302(0x8b));
//顯示溫度、秒、時、分數據:
write_temp(12,flag);//顯示溫度,從第二行第12 個字符后開始顯示
write_sfm(8,miao);//秒, 從第二行第8個字后開始顯示(調用時分秒顯示子函數)
write_sfm(5,fen);//分, 從第二行第5個字符后開始顯示.
write_sfm(2,shi);//小時, 從第二行第2個字符后開始顯示.
//顯示日、月、年數據:
write_nyr(9,ri);//舊期, 從第二行第9個字符后開始顯示
write_nyr(6,yue);//月份, 從第二行第6個字符后開始顯示
write_nyr(3,nian);//年, 從第二行第3個字符后開始顯示.
write_week(week);
}
|