xpstudio2003 发表于 2009-5-26 10:39:20

51做的万年历,,,

收拾资料,发现它还躺在某盘内的角落里,,,

前年的东西了都,,做出的万年历也在家里用了两个多年头了,,,

http://cache.amobbs.com/bbs_upload782111/files_15/ourdev_447948.jpg
(原文件名:万年历 程序 照片.jpg)


点击此处下载源程序 ourdev_447944.rar(文件大小:157K) (原文件名:万年历 程序C51.rar) C51写的,,万年历的算法是一个网友的,但也记不得名字了.../emotion/em016.gif

点击此处下载原理图PCB,SCH ourdev_447949.rar(文件大小:667K) (原文件名:万年历 程序 电路图PCB,SCH.rar)

seawind319 发表于 2009-5-26 11:06:48

看了楼主的原理图，也是用DS1302做的啊
偶自己也做了个，不过跑个24小时就要快几秒，难道就是因为6PF电容，没加啊
不过软件没补偿过，呵呵，自己做着玩的

mcu8051 发表于 2009-5-26 11:44:50

板凳

hyz_avr 发表于 2009-5-26 11:50:39

大哥...用了两年多...时间都走到哪去了啊...

xpstudio2003 发表于 2009-5-27 12:23:56

这也不是现在就拍的照片啊,,,,,,我觉得这点不用解释吧,,,

oberon 发表于 2009-6-2 17:15:35

mark

shuichunfeng 发表于 2009-6-11 11:03:14

CH451好像有点贵啊...

lffpga 发表于 2009-8-27 00:00:35

好

lwjws 发表于 2009-8-27 19:55:58

不错不错！！楼主强！！

yuxuan 发表于 2010-3-17 13:34:38

回复【楼主位】xpstudio2003 曹香鹏
-----------------------------------------------------------------------
你就用了四个数码管 上面那些年月日星期你怎么显示的呀 想请教一下

user22901 发表于 2010-3-17 13:41:52

想做好东西DS1302有点苛刻

usrusr22 发表于 2010-3-28 19:48:41

下载来,学习一下,呵呵

qufo 发表于 2010-5-18 10:55:44

我用 DS12CR887 做，这个自带温度补偿电路　。

之前被叫傻大个，不知道现在么样。

feixuehanyi 发表于 2010-6-17 02:25:13

顶

xiaomage_2000 发表于 2010-6-18 14:43:38

我还有个12C887呢，都忘了从哪拆的了，据说这东西现在也挺贵的？不过1302体积小啊，哎~

chag123 发表于 2010-7-9 11:15:07

回复【15楼】xiaomage_2000
-----------------------------------------------------------------------

我这有好多12C887，但我不会写程序，可以把原理图和原程序上传参考一下吗

WDEQJ 发表于 2010-7-22 20:47:01

走时准吗？

happywolf999 发表于 2010-10-23 10:03:34

mark

csboy8888 发表于 2013-7-27 21:10:45

*子函数,用于读取数据表中农历月的大月或小月,如果该月为大返回1,为小返回0*/
bit get_moon_day(uchar month_p,uint table_addr)
{
        uchar temp;
    switch(month_p)
        {
      case 1 :temp=year_code&0x08;break;
      case 2 :temp=year_code&0x04;break;
      case 3 :temp=year_code&0x02;break;
      case 4 :temp=year_code&0x01;break;
      case 5 :temp=year_code&0x80;break;
      case 6 :temp=year_code&0x40;break;
      case 7 :temp=year_code&0x20;break;
      case 8 :temp=year_code&0x10;break;
      case 9 :temp=year_code&0x08;break;
      case 10:temp=year_code&0x04;break;
      case 11:temp=year_code&0x02;break;
      case 12:temp=year_code&0x01;break;
      case 13:temp=year_code&0x80;break;
            
    }
        if(temp==0)
                return 0;
        else
                return 1;
}
为什么table_addre有的加1有的加2有的又不加呢，哪位大虾给我解释下，万分感谢！

csboy8888 发表于 2013-7-27 21:27:24

哦，搞清楚了，原来是这三个数据中包含的农历闰月位置的变化

xiaofeng87 发表于 2013-7-28 22:02:59

家用随便点好了 是不是校时下就ok了

yhsy1002 发表于 2013-11-6 16:27:11

这个厉害{:smile:}{:smile:}{:smile:}

soniclidi 发表于 2013-11-6 19:27:26

帮顶了，哈哈
页: [1]
查看完整版本: 51做的万年历,,,