|
/*By david QQ:26914190 */
/*此程序的目的是利用51hei提供的實驗板實現(xiàn)一個簡單的電子時鐘功能，其中用到了DS1302和LCD1602，以及獨立按鍵中的IT0和S4，S5，應(yīng)該說我們的胡老師設(shè)計
板子的時候，真是煞費苦心啊，剛剛好留了3個獨立鍵可以用，不多不少啊，哈哈。言歸正傳啊*/
/*此電子鐘能準確的計時,掉電后能繼續(xù)計時（應(yīng)該是要裝電池才行，嘿嘿），能手動調(diào)節(jié)時間（星期是自己加的，1302中沒這個參數(shù)的哦），最主要的是能和我們的實驗班完全兼容啊
燒錄進去就可以用 ~O(∩_∩)0~ 。需要注意的是，這個程序需要初始化一下才能準確計時的，初始化的方法是按住IT0鍵，然后再上電，等待1~3秒鐘之后松手即可*/
/*嘿嘿，俺是新手，寫程序中還有很多不足的地方，希望能和大家多多交流，請各位老師同學(xué)們多多指教*/
#include
#include
#define uchar unsigned char
#define uint unsigned int
sbit sclk=P1^0;//1302
sbit io=P1^1;//1302
sbit rst=P2^0;//1302
sbit lcden=P3^4;//1602
sbit lcdrs=P3^5;//1602
sbit lcdwr=P2^7;//1602
sbit led=P2^6;//控制數(shù)碼管關(guān)斷的，個人覺得可有可無，主要是省電，如果液晶亮度不夠，可以考慮一下。另外還有流水燈的也可以考慮關(guān)掉p14
sbit set=P3^2;//設(shè)置鍵定義,按下后依此設(shè)定年月日 小時分秒等
sbit addkey=P3^6;//設(shè)定時間時加數(shù)據(jù)
sbit deckey=P3^7;//設(shè)定時間時減數(shù)據(jù)
uchar flag,add,dec,check;
uchar sec,min,hr,day,mon,yr,week;
uchar code table[]="SUNMONTUEWEDTHUFRISAT";//星期顯示的字符串
uchar code table2[]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39};//0-9對應(yīng)的ASII碼
/********************************************************************************************************************/
//以下為1302的基本操作
void delayus()//4us的延時，一個nop是1us
{
_nop_();
_nop_();
_nop_();
_nop_();
}
void write(uchar dat)//一個字節(jié)的數(shù)據(jù)
{
uchar i;
sclk=0;
delayus();
for(i=0;i<8;i++)
{
dat=dat>>1;//移位寄存器不管左移或者右移，被移出位都存入溢出位CY;
io=CY;
delayus();
sclk=1;
delayus();
sclk=0;
delayus();
}
}
uchar read()//讀一個字節(jié)的數(shù)據(jù)
{
uchar i,dat=0;
for(i=0;i<8;i++)
{
sclk=1;
delayus();
sclk=0;
delayus();
dat=_cror_(dat,1)|io;//此處采用的是循環(huán)右移指令，把數(shù)據(jù)讀出
}
return dat;
}
uchar read1302(uchar cmd)//從1302的特定位置cmd讀出數(shù)值
{
uchar dat;
rst=1;
write(cmd);
dat=read();
rst=0;
return dat;
}
void write1302(uchar cmd,uchar dat)//把數(shù)據(jù)dat寫到1302的cmd對應(yīng)位置
{
rst=0;
sclk=0;
rst=1;
write(cmd);
write(dat);
}
/****************************************************************************/
void set1302()//1302設(shè)置，把設(shè)定好的時間寫入1302
{
uchar shi,ge;
write1302(0x8E,0x00); //根據(jù)寫狀態(tài)寄存器命令字，寫入不保護指令
shi=sec/10;
ge=sec%10;
sec=(shi<<4)|ge;
write1302(0x80,sec); //根據(jù)寫秒寄存器命令字，寫入秒的初始值
shi=min/10;
ge=min%10;
min=(shi<<4)|ge;
write1302(0x82,min); //根據(jù)寫分寄存器命令字，寫入分的初始值
shi=hr/10;
ge=hr%10;
hr=(shi<<4)|ge;
write1302(0x84,hr); //根據(jù)寫小時寄存器命令字，寫入小時的初始值
shi=day/10;
ge=day%10;
day=(shi<<4)|ge;
write1302(0x86,day); //根據(jù)寫日寄存器命令字，寫入日的初始值
shi=mon/10;
ge=mon%10;
mon=(shi<<4)|ge;
write1302(0x88,mon); //根據(jù)寫月寄存器命令字，寫入月的初始值
shi=yr/10;
ge=yr%10;
yr=(shi<<4)|ge;
write1302(0x8c,yr); //根據(jù)寫年寄存器命令字，寫入年的初始值
write1302(0x8f,0x00);
}
void readtime()//從1302中讀取時間并對星期進行計算
{
uchar shi,ge;
sec=read1302(0x81);
shi=(sec&0xf0)>>4;
ge=sec&0x0f;
sec=10*shi+ge;
min=read1302(0x83);
shi=(min&0xf0)>>4;
ge=min&0x0f;
min=10*shi+ge;
hr=read1302(0x85);
shi=(hr&0xf0)>>4;
ge=hr&0x0f;
hr=10*shi+ge;
day=read1302(0x87);
shi=(day&0xf0)>>4;
ge=day&0x0f;
day=10*shi+ge;
mon=read1302(0x89);
shi=(mon&0xf0)>>4;
ge=mon&0x0f;
mon=10*shi+ge;
yr=read1302(0x8d);
shi=(yr&0xf0)>>4;
ge=yr&0x0f;
yr=10*shi+ge;
if(day!=check)//計算星期值
{
week++;
check=day;
}
}
/****************************************************************************************************/
/*以下是1602的基本操作*/
void delay(uint z)//1mS延時子程序
{
uint a,b;
for(a=z;a>0;a--)
for(b=110;b>0;b--);
}
void write_com(uchar com)//寫控制字LCD
{
lcdrs=0;//控制字
P0=com;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void write_data(uchar date)//寫數(shù)據(jù)LCD
{
lcdrs=1;//數(shù)據(jù)
P0=date;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void write_week(uchar i)//顯示星期的函數(shù)
{
write_data(' ');
write_data(' ');
write_data(table[3*i]);
write_data(table[3*i+1]);
write_data(table[3*i+2]);
}
void write_time(uchar time)//顯示2位數(shù)時間，年月日均是2位數(shù)的格式
{
uchar shi,ge;
shi=time/10;
ge=time%10;
write_data(table2[shi]);
write_data(table2[ge]);
}
void display()//顯示年月日及星期等
{
write_com(0x80);
write_time(yr);
write_data('-');
write_time(mon);
write_data('-');
write_time(day);
write_week(week);
write_com(0x80+0x40);
write_time(hr);
write_data(':');
write_time(min);
write_data(':');
write_time(sec);
write_data(' ');
write_data(' ');
write_data('D');
write_data('a');
write_data('v');
write_data('i');
write_data('d');
}
void initlcd()//LCD顯示初始化。
{
led=0;
lcdwr=0;
lcden=0;
write_com(0x38);//按照1602的設(shè)定順序依此進行設(shè)定、
write_com(0x0c);//不顯示光標和閃爍
write_com(0x06);//每寫一個字符，光標+1
write_com(0x01);//清屏
}
/************************************************************************************/
//以下是鍵盤控制部分
void keyscan()//鍵盤掃描程序，看按下的是哪個鍵
{
if(set==0)
{
delay(30);
if(set==0)
{
while(!set);
delay(30);
while(!set);
flag=1;
}
}
if(addkey==0)
{
delay(30);
if(addkey==0)
{
while(!addkey);
delay(30);
while(!addkey);
add=1;
}
}
if(deckey==0)
{
delay(30);
if(deckey==0)
{
while(!deckey);
delay(30);
while(!deckey);
dec=1;
}
}
}
void timeset()//時間設(shè)定函數(shù)，依此設(shè)置年，月，日（星期），小時，分秒
{
if(flag==1)
{
flag=0;
write_com(0x0f);//開啟光標閃爍
write_com(0x80);//設(shè)置年的起始坐標
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)
{
keyscan();
if(add==1)
{
add=0;
yr++;
write_time(yr);
}
if(dec==1)
{
dec=0;
yr--;
write_time(yr);
}
write_com(0x80);//年光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
write_com(0x80+3);//設(shè)置月坐標起始位
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)//如果有開始判斷按鍵，
{
keyscan();
if(add==1)
{
add=0;
mon++;
if(mon>12)mon=1;
write_time(mon);
}
if(dec==1)
{
dec=0;
mon--;
if(mon>12)mon=1;
write_time(mon);
}
write_com(0x80+3);//月光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
write_com(0x80+6);//設(shè)置天坐標起始位
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)//如果有開始判斷按鍵，
{
keyscan();
if(add==1)
{
add=0;
day++;
week++;
if(week>6)week=0;
if(day==29)
{
if((mon==2)&&(yr%4!=0))day=1;
}
if(day==30)
{
if((mon==2)&&(yr%4==0))day=1;
}
if(day==31)
{
if((mon==4)||(mon==6)||(mon==9)||(mon==11))day=1;
}
if(day>31)day=0;
write_time(day);
write_week(week);
}
if(dec==1)
{
dec=0;
day--;
week--;
if(week>6)week=6;
if(day==0)
{
if((mon==2)&&(yr%4!=0))day=28;
if((mon==2)&&(yr%4==0))day=29;
if((mon==4)||(mon==6)||(mon==9)||(mon==11))day=30;
if((mon==1)||(mon==3)||(mon==5)||(mon==7)||(mon==8)||(mon==10)||(mon==12))day=31;
}
write_time(day);
check=day;
write_week(week);
}
write_com(0x80+6);//天光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
write_com(0x80+0x40);//設(shè)置小時坐標起始位
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)
{
keyscan();
if(add==1)
{
add=0;
hr++;
if(hr>23)hr=0;
write_time(hr);
}
if(dec==1)
{
dec=0;
hr--;
if(hr>23)hr=23;
write_time(hr);
}
write_com(0x80+0x40);//小時光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
write_com(0x80+0x40+3);//設(shè)置分鐘坐標起始位
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)//如果有開始判斷按鍵，
{
keyscan();
if(add==1)
{
add=0;
min++;
if(min>59)min=0;
write_time(min);
}
if(dec==1)
{
dec=0;
min--;
if(min>59)min=59;
write_time(min);
}
write_com(0x80+0x40+3);//小時光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
write_com(0x80+0x40+6);//設(shè)置分鐘坐標起始位
while(!flag&&!add&&!dec)keyscan();//掃描鍵盤，看是否有按鍵按下
while(!flag)//如果有開始判斷按鍵，
{
keyscan();
if(add==1)
{
add=0;
sec++;
if(sec>59)sec=0;
write_time(sec);
}
if(dec==1)
{
dec=0;
sec--;
if(sec>59)sec=59;
write_time(sec);
}
write_com(0x80+0x40+6);//小時光標設(shè)置歸位，等待下一次的設(shè)定
}
flag=0;
set1302();
write_com(0x0c);
}
}
/**********************************************************************/
//主程序
void main()
{
while(set==0)//這里是給系統(tǒng)送初始值的，使用的方法是斷電之后，按住set鍵，然后上電，set鍵按住1~3s,松開即設(shè)置完成
{
sec=11;min=20;hr=13;day=29;mon=2;yr=12;week=3;//初始值設(shè)定，這里要注意，星期的設(shè)定必須正確，不然后續(xù)的走時會出錯。
set1302();
initlcd();
readtime();
display();
}
write1302(0x8f,0x00);//讀取數(shù)據(jù)時，必須把1302設(shè)置為此狀態(tài)，讀數(shù)據(jù)的寫保護打開
initlcd();
while(1)
{
keyscan();//鍵盤掃描
timeset();//如果設(shè)置鍵按下就設(shè)定時間，否則就往下執(zhí)行
readtime();
display();
}
} |
