庆贺自已的电子闹钟DIY成功

lin638 · 发表于 2009-3-21 23:32:02

采用m16+ds18b20+ds1302+12864液晶，取本论坛中大虾的程序进行修改。本钟功能有正点报时，奏梁祝十五秒。有两个设置闹钟功能，报警声为蜂鸣声，报警时间十五分钟，可随时关断。自动农历、星期显示。先发上共赏

初始界面 (原文件名:初始界面.jpg)

设定菜单 (原文件名:设定菜单.jpg)

闹钟设定 (原文件名:闹钟设定.jpg)

日期设定 (原文件名:日期设定.jpg)

时间设定 (原文件名:时间设定.jpg)

(原文件名:电路结构1.jpg)

(原文件名:电路结构2.jpg)

(原文件名:电路结构3.jpg)
点击此处下载 ourdev_427013.rar(文件大小:411K) (原文件名:程序.rar)
点击此处下载 ourdev_427014.rar(文件大小:55K) (原文件名:12864lcd_clock.rar)

lin638 · 发表于 2009-3-21 23:36:56

不好意思，漏了个主运行界面。现在补上

运行界面 (原文件名:运行界面.jpg)

ch2003_23 · 发表于 2009-3-21 23:40:39

不错

atommann · 发表于 2009-3-22 00:01:47

做得非常好，装到一个外壳里就更完美了 :)

lin638 · 发表于 2009-3-22 00:03:48

DS1302使用在阿莫网站买的32.768晶振，每天误差是5秒，在程序中作了每天5秒的误差修正，经3天运行，暂时看不出有偏差了。目前正在设计外壳，做好了再上图片。在主运行界面上的一个星是代表一个闹钟功能启动，两个星就是两个闹钟功能启动。

zx962032 · 发表于 2009-3-22 07:29:59

这个晶振的精确度是5ppm，不是每天的误差5秒。
每天误差5秒的晶振还能用呀？晕哦

zx962032 · 发表于 2009-3-22 07:32:12

算下：
5*365=1825秒，30.417分钟了。这是一年的误差，恐怖哦！恐怕，没有人敢用这样的电子表了

lin638 · 发表于 2009-3-22 07:55:07

楼上，我用的哪种光刻的晶振，以前用别的晶振ds1302都不工作，用了这个能工作，但就是24小时真的有快5秒，你有什么好办法吗？再请大虾们帮忙解决这个误差的问题。再送上一个20年前本人DIY的电钟共赏，至今还在使用。采用的是LM8363，时基是采用电网的50Hz信号，时间挺准的。

(原文件名:LM8363电钟.jpg)

(原文件名:LM8363电钟2.jpg)

xiejun · 发表于 2009-3-22 09:28:56

^_^! 20年前，厉害呀，电网频率作时基，时间挺准？不敢相信！！

TYMCU · 发表于 2009-3-22 10:32:59

敢问楼主，农历是怎么做出来的

beggard · 发表于 2009-3-22 10:56:49

不错

lysoft · 发表于 2009-3-22 10:58:11

农历用查表就OK了~
目前有150年的表,够用啦
我20年前也有LM8560的LED数字钟,上一年更改为采用32768Hz的晶振,4060和4040组成的数字分频获得60Hz,远比电网的50Hz准确
电网的50Hz是很不准确的

32768Hz是目前绝大部分RTC所用,精度不是很高,每天几秒,其实满足需求的
手表的都是32768咋

20年前的LM8560 LED (原文件名:IMAGE_00069.jpg)

现在的P89V51的LCD (原文件名:IMG_4742.JPG)

现在的P89V51的LCD带SHT15 (原文件名:IMG_4743.JPG)

mysky · 发表于 2009-3-22 11:41:23

祝贺

TYMCU · 发表于 2009-3-22 13:05:02

【11楼】 lysoft
能否将你的农历查表数据发上来共享一下

lin638 · 发表于 2009-3-22 14:25:40

在我发的程序里面就有的

tyblly · 发表于 2009-3-22 14:42:27

顶一个

lin638 · 发表于 2009-3-23 19:49:52

很想多点人来看！

xieguangye · 发表于 2009-3-24 09:54:25

MARK

jinqiuw · 发表于 2009-4-23 07:49:37

程序注释就好了

tianwen · 发表于 2009-5-23 22:50:20

cvcode,build出现下面error
Error: \温度闹钟.c(494): function argument #3 of type 'flash unsigned char [64][16]' is incompatible with required parameter of type 'flash unsigned char *'

这是为什么？

tianwen · 发表于 2009-5-23 23:20:28

晕倒，原来是盗版软件有问题

xiaoyuanlu · 发表于 2009-5-23 23:35:22

不错！

tianwen · 发表于 2009-5-30 16:40:50

为什么一定要把JTAGEN 关闭掉程序才能跑起来？

jchqxl · 发表于 2009-5-30 17:23:32

不关好像那几个口就不能作为普通I/O用了

jacobson · 发表于 2009-5-30 17:30:09

有时间也做一个，学习了，

youxitun1 · 发表于 2009-5-30 18:04:27

不错！

tianwen · 发表于 2009-5-30 18:04:39

是这样的啊？那为什么ISP 使能位为什么不用关断都可以用？

lv998127 · 发表于 2009-5-30 23:27:30

进来学习下...

jinqiuw · 发表于 2009-5-31 07:03:34

我也编译了出现了
cvcode,build出现下面error
Error: \温度闹钟.c(494): function argument #3 of type 'flash unsigned char [64][16]' is incompatible with required parameter of type 'flash unsigned char *'
那怎么下步弄好啦

mcu5i51 · 发表于 2009-5-31 07:40:19

电路板布局简洁漂亮；
每天的0时的时候进行以秒为单位的校准就可以解决走时误差了

youth007 · 发表于 2009-5-31 16:43:45

20年前的DIY在以前看来很前沿哦！！！

river_ucan · 发表于 2009-5-31 19:22:07

楼主好厉害撒~

wjb444 · 发表于 2009-5-31 19:36:43

时钟过快的话有两种原因造成,一:晶震虽然标称+-5PPM,但还有一个参数是厂家筛选参数,如+5PPM指的是这批晶震都是+5PPM的;二:震荡电容不匹配,一般晶震的匹配电容有6PF,12.5PF等,而原装DS1302的匹配电容是6PF,如果晶震是12.5PF的,外面需并上6PF的电容两个.

还有一个办法是找晶震厂家要-PPM的32.768晶震,也能修正时钟.

tianwen · 发表于 2009-6-9 21:06:51

这个闹钟功耗太厉害了，而且一直在刷显示器

elecfun · 发表于 2009-6-9 21:15:45

漂亮啊

lv998127 · 发表于 2009-6-10 13:02:23

学习菜单的做法！

tianwen · 发表于 2009-7-1 21:06:00

不知怎么回事，这个闹钟的声音部分程序总有问题

tianwen · 发表于 2009-7-1 21:06:28

看来只能自己改了

oldfang · 发表于 2009-7-1 21:57:17

好东西

armek · 发表于 2009-7-2 08:43:28

mark

ftyszyx · 发表于 2009-7-2 09:20:56

漂亮，精美!

HYLG · 发表于 2009-7-2 11:14:00

那个晶振我也用了，差不多就是一天快5秒。半年就快15分钟了。

fy024 · 发表于 2009-7-2 12:10:28

不错

dayong · 发表于 2009-7-2 14:24:30

为什么不用PCB板呢，那样功能可能更稳定，外观效果也会比较好

eguy · 发表于 2009-7-2 15:44:05

不错很不错

sange · 发表于 2009-7-2 16:26:12

好东西顶一下

K52368 · 发表于 2009-7-8 06:44:05

好东东呀，牛气。

guangan854214 · 发表于 2009-7-10 16:19:16

学习了

fu2008 · 发表于 2009-7-11 11:56:03

记下.

eydj2008 · 发表于 2009-7-11 13:27:44

楼主这是用什么软件编译的

lin638 · 发表于 2009-7-11 22:28:14

回楼上，用CVAVR

liubinghui · 发表于 2009-7-11 22:43:41

每天差5S的电子表也差得太快了点。一年是多长时间了。

xuwenjie · 发表于 2009-7-23 21:41:27

厉害

lizhihuanok · 发表于 2009-7-29 17:24:19

很好很强大，MARK。

Pyrrho · 发表于 2009-8-1 12:38:11

Mark

a13736925316 · 发表于 2009-8-1 12:56:01

用液晶做时钟有点太奢侈了吧，强烈建议用数码管，（金融危机啊！）

chiangky · 发表于 2009-9-24 10:30:19

很漂亮，我仿制了一下。保留了JTAG功能，将LCD的引脚定义改为：RS(CS)=====>PC7； RW(SID)====>PC6；EN(SCLK)===>PC1
； D0-D7========>PA。可是我联机调试LCD没有任何显示，请问哪儿有问题？LCD没有问题。请解答，谢谢！
电路图和程序的部分引脚定义有出入，如1302的PORTD.2为DS1302使能控制引脚;PORTD.3为DS1302时钟控制引脚;PORTD.4为DS1302数据控制引脚，而在电路图中为PB口的0、1、2。不知是否正确？

forever37 · 发表于 2010-2-1 16:12:07

longwu03272009 · 发表于 2010-2-1 22:08:32

mark

mslei · 发表于 2010-2-2 08:42:34

标记下，以后研究

kenva · 发表于 2010-2-2 09:23:04

mark

leafstamen · 发表于 2010-2-2 10:55:56

楼主还可以接着加
还可以添加游戏之类的东西
贪吃蛇
俄罗斯方块
生理期……

kinoko · 发表于 2010-2-2 11:19:06

偷菜提醒…
时钟误差温度也很大影响。

lzllong · 发表于 2010-2-2 11:21:05

楼主，我的是彩色的模拟时钟，农历的算法有没有可以自动计算的啊？

(原文件名:clock.JPG)

maomaofu · 发表于 2010-2-2 14:42:44

好啊，标记一下

zhupingheng · 发表于 2010-2-2 21:27:06

如果程序没问题，那可能跟晶振匹配电容有关了，还有就是DS1302好像内部有个匹配电容。。。

lsxiaoma · 发表于 2010-3-4 10:09:31

mark

moon0213 · 发表于 2010-3-4 11:38:53

mark

terrorist · 发表于 2010-3-4 13:18:28

mark!

fshunj · 发表于 2010-3-4 14:41:48

mark

qindehai · 发表于 2010-3-5 12:24:36

不错~~~

yunhuisong · 发表于 2010-3-5 12:54:08

收下

xianzai · 发表于 2010-3-5 14:20:43

MARK

zlj2008 · 发表于 2010-3-5 20:43:07

晶振用废电脑主板拆下的32768,你会有惊奇的发现.

zlj2008 · 发表于 2010-3-5 20:47:35

晶振用废电脑主板拆下的32768,你会有惊奇的发现.

howmoney · 发表于 2010-3-5 23:36:18

mark

suyinghong88 · 发表于 2010-3-31 15:39:53

非常强悍

Sniperrabbit · 发表于 2010-3-31 16:07:18

樓主的液晶模塊漂亮,在哪買的?

final9 · 发表于 2010-3-31 16:16:29

首次发帖，学习楼主中......

deiwgah · 发表于 2010-3-31 16:58:06

楼主可否把20年前的那个时钟电路公布一下，想研究一下vfd的驱动电路，手里有几个vfd，但总是漏光

gpzdc986 · 发表于 2010-4-1 01:09:39

mark

AAVVRR · 发表于 2010-4-1 15:13:19

回复【63楼】lzllong
-----------------------------------------------------------------------
这个好！

AAVVRR · 发表于 2010-4-1 15:16:44

回复【8楼】xiejun 业余程序员
^_^! 20年前，厉害呀，电网频率作时基，时间挺准？不敢相信！！
-----------------------------------------------------------------------

现在电网频率很准的，误差在1赫兹以内，而且不会累积

jerrych · 发表于 2010-4-1 15:55:13

用gps时钟

154083025 · 发表于 2010-8-16 09:22:05

楼主的文件太复杂,我学习后再研究

songtao0728 · 发表于 2010-8-16 09:45:37

太强了，手里没有元器件，要不非要玩玩

gsl8828 · 发表于 2010-8-16 16:27:41

好啊

yaojinhao · 发表于 2010-8-16 17:07:34

记号

xtaens · 发表于 2010-9-9 21:24:22

mark，不错

allenjwb · 发表于 2010-9-9 22:11:20

mark

zhao_jian_xin · 发表于 2010-10-29 15:40:45

楼主是不是缺了一个bcd.h？

XA144F · 发表于 2010-10-29 15:52:01

回复【6楼】zx962032 都市狗尾草
算下：
5*365=1825秒，30.417分钟了。这是一年的误差，恐怖哦！恐怕，没有人敢用这样的电子表了
-----------------------------------------------------------------------

看来你对误差修正是毫无办法呢。

pingguo2012 · 发表于 2010-10-31 00:12:33

我用M16做的，一晚上就差了半个多小时呢。

ds444 · 发表于 2010-10-31 01:09:21

送谁谁翻脸

heanhua · 发表于 2010-10-31 16:16:13

挺好值得鼓励

zhao_jian_xin · 发表于 2010-11-5 15:44:54

楼上的各位都能成功运行吗？...请问rtc_set_time、rtc_get_time...还有关于set_run值的写入在哪里定义了

lisj2003 · 发表于 2010-11-7 08:43:36

mark

smallstone · 发表于 2010-11-7 09:58:19

回复【楼主位】lin638
-----------------------------------------------------------------------

也来凑个热闹，DIY的闹钟，自己一直用着。
核心板是感光板做的，用的是LPC2103,红外接收，RTC芯片PCF8563。

(原文件名:IMGP2224.JPG)

(原文件名:IMGP2250.JPG)

(原文件名:IMGP2244.JPG)

(原文件名:IMGP2257.JPG)

//************************************************************************************************
//                                  红外解码程序
//************************************************************************************************

#define No_Edge    0x00
#define Rising_Edge  0x01
#define Falling_Edge 0x02
#define Both_Edge 0x03

u8  Capture_State = 0;  // 捕获状态
u8  Count=0;          // 捕获码个数
u8  Capture_Data[50]; // 捕获数值缓存区

u8  User_Code = 0;    // 厂商自定义代码
u8  Key_Value_Last;    // 上一次的键值

volatile u8 Key_Value = 0xFF;  // 键值 0xFF 没有按键

/******************************************************************************
* 函数名称: void IRKEY_Init( u16 TimeoutMs )
* 函数功能: 初始化。
* 参数: TimeoutMs
* 返回值: 无
* 备注: 无
******************************************************************************/
void IRKEY_Init(u16 TimeoutMs)
{

PINSEL0 &= ~(BIT20|BIT21); // p10 timer1 cap0
PINSEL0 |= BIT21;

T1TCR = 0x02; //计数器复位关闭计数
T1IR  = 0xFF; //中断寄存器复位

Set_T1Cap0_Capture_Edge(Falling_Edge); //下降沿捕捉
T1CCR |= 0x04;                      //打开中断

T1PR  = Fpclk/1000000 - 1; // 设置预分频寄存器使T1TC每1us加一次
T1MR0 = TimeoutMs*1000;    // TimeoutMs 毫秒匹配一次
T1MCR = 0x00;             // 暂时关闭匹配时产生中断并复位TC 当有事件打开

VICIntSelect  |= 1 << VIC_TIMER1;  // 设置TIMER1为FIQ中断
VICIntEnable  |= 1 << VIC_TIMER1;  // 使能TIMER1中断

T1TCR  = 0x01;  //使能timer1
}

/*******************************************************************************
* 函数名称:  void Set_T1Cap0_Capture_Edge(u8 edge)
* 函数功能: 设置Timer0的上升沿、下降沿捕捉功能,并且在捕捉时产生中断。
* 参数: EdgeMode
* 返回值: 无
* 注意: 只针对于timer1 cap0
*
******************************************************************************/
void Set_T1Cap0_Capture_Edge(u8 EdgeMode)
{
T1CCR &= ~0x0003;
if(EdgeMode == Rising_Edge)       T1CCR |= 0x01;
else if(EdgeMode ==  Falling_Edge) T1CCR |= 0x02;
else if(EdgeMode ==  Both_Edge) T1CCR |= 0x03;
else{}
}

/******************************************************************************
* 函数名称: void IRKEY_ISR_Handler(void)
* 函数功能: 红外定时器中断服务程序。
* 参数: 无
* 返回值: 无
* 备注:
******************************************************************************/
__fiq __arm void fiq_handler(void)
{
  u32 temp = 0;
  u8  i,Data[4],ITFlage;
  ITFlage = T1IR;
  //-------------- 超时处理 ----------------------------------------------------
  if(ITFlage& BIT0)
  {
   T1MCR = 0x00;                //关闭匹配中断
   if(Capture_Data[0] == 'W')  {} // 错误舍去
   else if(Capture_Data[0] == 'Q')//前导码
   {
      for(i=1;i<33;i++)       //转化为32数据
      {
         temp <<= 1;
         if(Capture_Data) temp |= 0x01;
      }
      for(i=0;i<4;i++)
      {
         Data = (u8)temp;
         temp >>= 8;
      }
      if((Data[3]+Data[2] == 0xFF) && (Data[1]+Data[0] == 0xFF))//检验是否争取
      {
         Key_Value = Data[1];
         User_Code = Data[3];
         Key_Value_Last = Key_Value;
      }
      else Key_Value = 0xFF;
   }
   else if((Capture_Data[0] == 'L')&&(Capture_Data[1] == 'L')&&(Capture_Data[2] == 'L'))
   {
      Key_Value = Key_Value_Last; // 连续按键
   }
   else{}                         // 错误舍去
   Capture_State = 0;
  }
  //----------- 捕获代码 -------------------------------------------------------
  if(ITFlage & BIT4)
  {
   if(Capture_State == 0)
   {
      Capture_State = 1;
      T1MCR = 0x03; //匹配时产生中断并复位TC
      Count = 0;
      T1TC  = 0; // 清零计数器
      for(i=0;i<33;i++)
      {
         Capture_Data = 0x00;
      }
   }
   else if(Capture_State == 1)
   {
      volatile u16 temp = T1CR0;
      if(temp>15000)    Capture_Data[Count++] = 'W'; //错误码
      else if(temp>12000) Capture_Data[Count++] = 'Q'; //前导码
      else if(temp>10000) Capture_Data[Count++] = 'L'; //连续按键
      else if(temp>2000)  Capture_Data[Count++] =  1 ; //码 1
      else if(temp>1000)  Capture_Data[Count++] =  0 ; //码 0
      else             Capture_Data[Count++] = 'W'; //错误码
      if(Count >= 33)    Capture_State = 2;          //码长最大33
      else             T1TC  = 0;                //清零计数器
   }
   else {}
  }
  T1IR  = 0xff;       //复位中断标记
}

lin638 · 发表于 2010-11-11 17:17:09

楼上做得比我的好多了，向你学习！

0331631 · 发表于 2010-11-11 20:37:34

smallstone
你的屏幕表格是如何做出来的？

庆贺自已的电子闹钟DIY成功

阿莫论坛20周年了！感谢大家的支持与爱护！！