?? 6416+1302電子鐘.c
字號:
/*****************************************************
4字LED點陣屏+DS1302萬年歷電子鐘 C 程序
******************************************************
聲明：
本程序中DS1302讀寫部分是直接引用網上網友提供的共享程序，
本程序供大家學習之用，用勿用于商業用途。尊重作者版權。
編寫：鄧椿薪
時間：2006年6月9日 晚
郵箱：love2151@xinhuanet.com
網址：www.89s51diy.com
*******************************************************
DS1302 接線圖
Vcc2 CLK I/O /RST
| | | |
-------------------
| 8 7 6 5 |
| DS1302 |
| |
| 1 2 3 4 |
-------------------
| | | |
VCC1 GND
1 腳接+5V 2，3腳32768HZ晶振 4腳接地 5腳接S51的P02 6腳接S51的P01 7接S51的P00
8腳接后備電源，可以接老計算機主板上的3.6V電池，也可以通過二級管隔離接一個大容量電解電容
電壓在2.5V以上即可維持
595連級輸出數據，138行驅動。*/
#include <AT89x52.H>
#define uchar unsigned char
#define uint unsigned int
uchar code hanzi[]; //漢字字模
uchar code timer[11][16]; //0~9數字
uchar code sw[]; //138驅動數據
void Show_word(); //待機顯示按三秒間隔分別顯示年、月日、星期、時分秒。
void Show_pass(); //不顯示一個字
void Send_data(unsigned char *d); /*串口發送一行*/
/******************************************/
sbit resget=P0^7; //時鐘復位
sbit key_moda=P0^6; //模式轉換
sbit key_up=P0^5; //時鐘加
sbit key_Down=P0^4; //時鐘減
sbit T_CLK=P0^2; //DS1302引腳連接
sbit T_IO =P0^1;
sbit T_RST=P0^0;
sbit ACC0=ACC^0; //1bit數據存儲位
sbit ACC7=ACC^7;
uchar starts_time[7]={0x00,0x10,0x22,0x11,0x06,0x07,0x06}; //初始化后設置
uchar Move,Speed,Flicker,line,Sec,Cent,Hour,Year,Month,Day,Week; //時間變量
uchar a,b,f,h,msec,id,x; //標志計數器 a為自動轉換顯示時間，b為手動與自動標志
uint zimuo; //字模計數器
uchar BUFF[10]; //緩存
void RTInputByte(uchar); /* 輸入 1Byte */
uchar RTOutputByte(void); /* 輸出 1Byte */
void W1302(uchar, uchar); // 向DS1302寫入一個字節
uchar R1302(uchar); // 從DS1302讀出一個字節
void Set1302(uchar *); // 寫DS1302時間
void du1302(); // 讀時間
void DelayMs(void); // 延時
void Set(uchar,uchar ); // 變量調整
void in_data(); // 調整移動數據
void rxd_data(); // 串口發送移動數據
/*主函數*/
void main()
{
Move=0;
zimuo=0;
TMOD=0x01; //16位定時
TH0=0x3c; //25ms晶振為24M
TL0=0xb0;
EA=1;
TR0=1;
ET0=1;
SCON=0; //初始化串口為工作方式0（同步通信方式，TxD輸出同步脈沖）
while(zimuo<512)
{
while(Move<16) //數據移位。
{
for(Speed=0;Speed<10;Speed++) //移動速度
{
for(line=0;line<16;line++)
{
in_data(); //調整移動數據
rxd_data();
P2_4=1; //關閉顯示
DelayMs();
P2_7=1; //鎖存為高，595鎖存信號
P2=sw[line]; //輸出行信號
DelayMs(); //延時，等待一段時間，讓這列顯示的內容在人眼內產生“視覺暫留”現象。*/
}
}
Move++; //移動一步
}
Move=0;
zimuo=zimuo+32;
}
zimuo=0;
while(1) //重復循環顯示
{
if(resget==0)
{ DelayMs();
if(resget==0)
Set1302(starts_time); //初始化
W1302(0x8e,0x00); //控制命令,WP=0,寫操作
W1302(0x90,0xa5); //打開充電二級管 一個二級管串聯一個2K電阻
}
du1302(); //讀取 秒 分 時 日 月 星期 年
if (key_moda==0) //設置和選擇項目鍵
{ DelayMs();
if(key_moda==0)
{
if(id++==9) {id=0;}
h=0;msec=0; //清閃爍標志
while(key_moda==0){ Show_word();}
}
}
if(id!=0)
{
if (key_up==0) //增加
{
DelayMs();
if(key_up==0)
{
while(key_up==0)
{Show_word();} //調用顯示
h=0;msec=0; //清閃爍標志
Set(id,0); //調用時間調調整
}
}
if (key_Down==0) //減少
{
DelayMs();
if(key_Down==0)
{
while(key_Down==0)
{Show_word();} //調用顯示
h=0;msec=0; //清閃爍標志
Set(id,1); //調用時間調調整
}
}
}
else
{
if (key_up==0) //增加
{
DelayMs();
if(key_up==0)
{
while(key_up==0)
{Show_word();} //調用顯示
h=0;msec=0; //清閃爍標志
if(b!=0) //手動調整顯示的內容
{
if(f++==3) //f為顯示轉換標志
f=0;
}
}
}
}
Show_word(); //待機顯示按三秒間隔分別顯示年、月日、星期、時分秒。
}
}
/************************************************/
void Show_word() //串行輸出顯示
{ uchar h;
for(h=0;h<16;h++)
{
if((id==0)&(f==0)|(id==1)) //f為三秒轉換顯示
{
Send_data(&timer[0][0]); //不顯示
if((Flicker==1)&(id==1)) //閃爍標志為1時不亮，為零時亮
{ Show_pass(); //不顯示一個字
Show_pass();
}
else
{
Send_data(&timer[2][h]); //20年
Send_data(&timer[0][h]);
Send_data(&timer[Year/16][h]); //年值
Send_data(&timer[Year%16][h]);
}
Send_data(&hanzi[h*2+641]); //年字符
Send_data(&hanzi[h*2+640]);
Send_data(&timer[0]); //不顯示
}
if((id==0)&(f==1)|(id==2)|(id==3))
{
if((Flicker==1)&(id==2)) //閃爍標志為1時不亮，為零時亮
{ Show_pass(); //不顯示一個字
}
else
{
if(Month/16<1)
Send_data(&timer[0]); //月十位為零時不顯示
else
Send_data(&timer[Month/16][h]); //月值
Send_data(&timer[Month%16][h]);
}
Send_data(&hanzi[h*2+673]); //月字符
Send_data(&hanzi[h*2+672]);
if((Flicker==1)&(id==3)) //閃爍標志為1時不亮，為零時亮
{ Show_pass(); //不顯示一個字
}
else
{
Send_data(&timer[Day/16][h]); //日值
Send_data(&timer[Day%16][h]);
}
Send_data(&hanzi[h*2+961]); //日字符
Send_data(&hanzi[h*2+960]);
}
if((id==0)&(f==2)|(id==4)) //f為三秒轉換顯示
{
Send_data(&timer[0]); //不顯示
Send_data(&hanzi[h*2+705]); //星字符
Send_data(&hanzi[h*2+704]);
Send_data(&hanzi[h*2+737]); //期字符
Send_data(&hanzi[h*2+736]);
if((Flicker==1)&(id==4)) //閃爍標志為1時不亮，為零時亮
{ Show_pass(); //不顯示一個字
}
else
{
Send_data(&hanzi[Week%16*32+h*2+737]); //星期值
Send_data(&hanzi[Week%16*32+h*2+736]);
}
Send_data(&timer[0][0]); //不顯示
}
if((id==0)&(f==3)|(id>4)) //f為三秒轉換顯示
{
if((Flicker==1)&(id==5)) //閃爍標志為1時不亮，為零時亮
{
Show_pass(); //不顯示一個字
}
else
{
if(Hour/16<1)
Send_data(&timer[0][0]); //時十位小于1時不顯示
else
Send_data(&timer[Hour/16][h]); //時值
Send_data(&timer[Hour%16][h]);
}
Send_data(&timer[10][h]); //兩個點
if((Flicker==1)&(id==6)) //閃爍標志為1時不亮，為零時亮
{
Show_pass(); //不顯示一個字
}
else
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -