分享51單片機(jī)+DS1302+LCD1602萬(wàn)年歷程序，包括星期自動(dòng)計(jì)算功能

ID:541464 · 發(fā)表于 2019-5-18 16:16

一個(gè)基于51單片機(jī)，DS1302，LCD1602的萬(wàn)年歷程序。
設(shè)置日期的時(shí)候，程序基于蔡勒（Zeller）公式會(huì)自動(dòng)計(jì)算星期，包含了BCD碼的處理轉(zhuǎn)換。

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機(jī)源程序如下:

uchar calc_week(uchar y,uchar m,uchar d)
{
uint temp = 0,m_tmp=0;
uchar week_temp;
y = bcd_to_dec(y);
m = bcd_to_dec(m);
d = bcd_to_dec(d);
if(m > 2)
{
m_tmp = m+1;
temp = 26*m_tmp;
temp /= 10;
week_temp = (y+(y/4)+(temp&0xff)+d-36)%7;
}
else
{
m_tmp = m+13;
temp = 26*m_tmp;
temp /= 10;
week_temp = (y - 1+((y - 1)/4)+(temp&0xff)+d-36)%7;
}
return week_temp;
}

復(fù)制代碼

全部資料51hei下載地址：

Calendar.zip (125.7 KB, 下載次數(shù): 673)

ID:120219 · 發(fā)表于 2022-3-20 18:04

18年之前的星期轉(zhuǎn)換都不對(duì)，比如2017-03-01顯示星期日，真實(shí)是星期三

ID:71233 · 發(fā)表于 2021-12-30 18:11

有沒(méi)有帶農(nóng)歷功能？

ID:882946 · 發(fā)表于 2021-12-30 18:02

為什么所有的注釋都是亂碼

ID:619259 · 發(fā)表于 2021-1-23 12:47

有錯(cuò)誤，打不開

ID:870180 · 發(fā)表于 2021-1-5 13:09

樓主，燒錄后顯示器只有第二行有黑格子，也沒(méi)有數(shù)據(jù)

ID:870180 · 發(fā)表于 2021-1-2 14:50

樓主，
為啥源碼打開keil就無(wú)響應(yīng)

ID:849846 · 發(fā)表于 2020-11-26 20:24

yiyuan3085377 發(fā)表于 2020-11-23 20:41
咋加個(gè)鬧鐘呢

同問(wèn)加鬧鐘

ID:88256 · 發(fā)表于 2020-11-24 22:13

阿喀琉斯發(fā)表于 2020-3-8 13:16
報(bào)錯(cuò)了： error C129: missing ';' before 'calc_week'

本來(lái)我是不想下載的，看到有錯(cuò)誤特意下載想看看能不能找出錯(cuò)誤提高自己的閱讀水平，結(jié)果編譯是0錯(cuò)誤0警告。
錯(cuò)誤提示的是“calc_week”之前缺少“；” ，整個(gè)工程搜索calc_week只有兩處，一處在在276行的函數(shù)上，前后的大括號(hào)都是配對(duì)的，符號(hào)也正常；另一處在327行上，也是前后都是正確的，所以出錯(cuò)應(yīng)該是你自己那邊的問(wèn)題，下載的程序是沒(méi)錯(cuò)的。

ID:117930 · 發(fā)表于 2020-11-24 21:22

非常好的例子感謝樓主無(wú)私的分享

ID:846185 · 發(fā)表于 2020-11-23 20:41

咋加個(gè)鬧鐘呢

ID:704511 · 發(fā)表于 2020-3-8 13:16

報(bào)錯(cuò)了： error C129: missing ';' before 'calc_week'

ID:700745 · 發(fā)表于 2020-3-7 13:48

有用，感謝樓主

ID:541464 · 發(fā)表于 2020-2-24 19:52

蠢姐駕到發(fā)表于 2019-12-27 23:56
有錯(cuò)誤啊

哈，哪里出錯(cuò)了？

ID:541464 · 發(fā)表于 2020-2-24 19:50

露西亞想沙發(fā)表于 2019-12-21 18:38
為什么會(huì)報(bào)錯(cuò)呢
電子鐘.c(1): error C129: missing ';' before 'calc_week'

是不是不小心按到鍵盤了，我這里沒(méi)問(wèn)題。

ID:541464 · 發(fā)表于 2020-2-24 19:50

一二一二一發(fā)表于 2020-1-12 19:51
沒(méi)有仿真嗎

有仿真的呀

ID:656060 · 發(fā)表于 2020-1-12 19:51

沒(méi)有仿真嗎

ID:468209 · 發(fā)表于 2020-1-10 00:51

謝謝分享！

ID:653737 · 發(fā)表于 2020-1-6 21:42

謝謝，正需要

ID:675802 · 發(fā)表于 2019-12-27 23:56

有錯(cuò)誤啊

ID:670001 · 發(fā)表于 2019-12-21 18:38

為什么會(huì)報(bào)錯(cuò)呢
電子鐘.c(1): error C129: missing ';' before 'calc_week'

ID:468209 · 發(fā)表于 2019-12-16 09:53

很感謝

ID:97678 · 發(fā)表于 2019-12-8 16:32

值得研究，好好的看看！

ID:517955 · 發(fā)表于 2019-11-7 11:04

代碼寫的真的不錯(cuò)

ID:517955 · 發(fā)表于 2019-11-7 11:03

非常好

ID:84745 · 發(fā)表于 2019-10-20 12:23

感謝分享

ID:568573 · 發(fā)表于 2019-6-21 09:01

謝謝樓主~好資料，51黑有你更精彩!!! 完美運(yùn)行了

ID:546378 · 發(fā)表于 2019-6-16 19:07

真實(shí)有效，完全是對(duì)的，從來(lái)沒(méi)有遇到過(guò)這么良心的帖子，太感謝了

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

分享51單片機(jī)+DS1302+LCD1602萬(wàn)年歷程序，包括星期自動(dòng)計(jì)算功能

評(píng)分

瀏覽過(guò)的版塊