标题: 单片机汇编语言模拟时钟程序(LCD12864显示)精校时间(开源) [打印本页]
作者: xiaoyuxinke    时间: 2022-5-5 16:41
标题: 单片机汇编语言模拟时钟程序(LCD12864显示)精校时间(开源)
本帖最后由 xiaoyuxinke 于 2022-5-8 14:11 编辑

本程序无需DS1302,无需定时器,另本程序使用汇编语言编写,只要按所使用的晶振修改延时部分,可以做到一年误差5秒以内.
视频已上传至优酷,需要的可以看一下.https://v.youku.com/v_show/id_XN ... o_XNTg2ODI5MDQ3Mg==
需要精校时间的可调整此四个值,需要更精准可在延时部分加NOP修整(可做到年误差3秒以内),此程序虽然不使用DS1302,但可以做到比DS1302更为精准



下面是单片机汇编语言程序部分:


  3. ;******************************************************************************
  4. ;* 【LCD12864数据接口定义】
  5. ;******************************************************************************
  6.            RS       BIT    P2.7    //高电平数据低电平指令
  7.            RW       BIT    P2.6    //高电平读低电平写
  8.            E        BIT    P2.5    //LCD12864使能控制端
  9.            DATE     EQU    P0           //八位数据送P0口(八位数据总线)
  10.            COM      EQU    70H           //LCD12864指令暂存地址
  11.            COOD     EQU    91H           //LCD12864数据暂存地址
  12. ;******************************************************************************
  13. ;* 【时间显示定义】
  14. ;******************************************************************************
  15.            SHI      EQU    40H
  16.            FEN      EQU    41H
  17.            MIAO     EQU    42H
  18.            SHIH     EQU    43H
  19.            SHIL     EQU    44H
  20.            FENH     EQU    45H
  21.            FENL     EQU    46H
  22.            MIAOH    EQU    47H
  23.            MIAOL    EQU    48H
  24. ;******************************************************************************
  25. ;* 【按键功能和标志位定义】
  26. ;******************************************************************************
  27.            KEY1     EQU    P1.1
  28.            KEY2     BIT    P1.4
  29.            KEY3     BIT    P1.5
  30.            KEY4     BIT    P1.6
  31.            BUZZ     BIT    P3.7

  33.            ORG   0000H
  34.            AJMP  SDATA
  35.            ORG   0030H
  36.            AJMP  INTT0
  37.            ORG   0060H

  39.            SDATA:
  40.            SETB  PX0                                                //外部中断0优先权第1
  41.            SETB  EX0                                                //下降沿触发中断
  42.            SETB  IT0                                                //外部中断0被允许
  43.            SETB  EA                                                //总中断位被允许
  44.         MOV   SHI,#17                                                //小时赋初值
  45.         MOV   FEN,#33                                                //分钟赋初值
  46.         MOV   MIAO,#00                                                //秒钟赋初值
  47.         MOV   SHIH,#0                                                //小时高位赋初值
  48.         MOV   SHIL,#0                                                //小时低位赋初值
  49.         MOV   FENH,#0                                                //分钟高位赋初值
  50.         MOV   FENL,#0                                                //分钟低位赋初值
  51.         MOV   MIAOH,#0                                                //秒钟高位赋初值
  52.         MOV   MIAOL,#0                                                //秒钟低位赋初值
  53.         LCALL LCDCSH                                                //LCD12864初始化
  54.         LCALL FMQ                                                //蜂鸣器响一声
  55.         JMP   MAIN                                                //

  57. MAIN:
  58.         LCALL HZXSCX                                                //
  59.         JMP   MAIN
  60. INTT0:                                                                //
  61.         JNB   KEY1,DISP1                                        //
  62.         JNB   KEY2,DISP2
  63.         JNB   KEY3,DISP3                                        //
  64.         JNB   KEY4,DISP4
  65.         RETI                                                        //
  66. DISP1:
  67.         LCALL FMQ
  68.         CLR   P3.2                                                //
  69.         INC   SHI
  70. RET                                                                //
  71. DISP2:
  72. RET                                                                //
  73. DISP3:                                                                //
  74. RET
  75. DISP4:                                                                //
  76. RET
  77.                                                                 //
  78. LCDCSH:
  79.     MOV   COM,#01H                      //DDRAM写入20H，DDRAM的AC计数器清零
  80.     LCALL WCOM                          //12864写入指令
  81.     LCALL DEL10MS                       //延时4.6毫秒
  82.     MOV   COM,#02H                      // AC清零，游标到开头位置
  83.     LCALL WCOM                          //12864写入指令
  84.     LCALL DEL10MS                       //延时4.6毫秒
  85.     MOV   COM,#0CH                      //游标开，整体显示开，游标位置开
  86.     LCALL WCOM                          //12864写入指令
  87.     LCALL DEL10MS                       //延时4.6毫秒
  88.         RET
  89. ;******************************************************************************
  90. ;* 【时间计算部分】
  91. ;******************************************************************************
  92. SJJSBF:                                                                        //时间计算部分,秒到60分进一,分到60时进一,时到24全清零
  93.     MOV   A,MIAO                                                //秒钟数据送到累加器
  94.     CJNE  A,#60,FAG                                                //如果不等于60就退出,否则向下执行
  95.         MOV   MIAO,#00                                                //秒钟数据清零
  96.         INC   FEN                                                        //分钟数据加一

  98.         MOV   A,FEN                                                        //分钟数据送到累加器
  99.         CJNE  A,#60,FAG                                                //如果不等于60就退出,否则向下热行
  100.         MOV   FEN,#00                                                //分钟数据清零
  101.         INC   SHI                                                        //小时数据加一

  103.         MOV   A,SHI                                                        //小时数据送到累加器
  104.         CJNE  A,#24,FAG                                                //如果不等于24就退出,否则向下执行
  105.         MOV   SHI,#00                                                //小时数据清零
  106.         RET
  107. FAG:
  108.         RET

  110. HZXSCX:
  111.     MOV   COM,#9CH                                                 //从第四行第四个位置开始写
  112.     LCALL WCOM                          //12864写入指令
  113.     LCALL DEL10MS
  114. //*********************************     //时分秒分配，把时分秒分别算出高低位
  115.         MOV   A,SHI                                                    //小时数据送到累加器
  116.         MOV   B,#10                                                    //立既数10送到B
  117.         DIV   AB                                                        //小时数除以10
  118.         MOV   SHIH,A                                                //整数送到小时高位
  119.         MOV   SHIL,B                                                //余数送到小时低位
  120.         MOV   A,FEN
  121.         MOV   B,#10
  122.         DIV   AB
  123.         MOV   FENH,A
  124.         MOV   FENL,B
  125.         MOV   A,MIAO
  126.         MOV   B,#10
  127.         DIV   AB
  128.         MOV   MIAOH,A
  129.         MOV   MIAOL,B
  130. //*********************************
  131.         MOV   A,SHIH
  132.         MOV   DPTR,#TAB
  133.         MOVC  A,@A+DPTR
  134.     MOV   COOD,A
  135.     LCALL WCOD
  136.     LCALL DEL1MS
  137.         
  138.         MOV   A,SHIL
  139.         MOV   DPTR,#TAB
  140.         MOVC  A,@A+DPTR                        
  141.     MOV   COOD,A
  142.     LCALL WCOD                          
  143.     LCALL DEL1MS
  144.     //****************************
  145.         MOV   COOD,#":"
  146.     LCALL WCOD                          
  147.     LCALL DEL1MS
  148.         //****************************
  149.     MOV   A,FENH
  150.         MOV   DPTR,#TAB
  151.         MOVC  A,@A+DPTR
  152.     MOV   COOD,A
  153.     LCALL WCOD
  154.     LCALL DEL1MS
  155.         
  156.         MOV   A,FENL
  157.         MOV   DPTR,#TAB
  158.         MOVC  A,@A+DPTR                        
  159.     MOV   COOD,A
  160.     LCALL WCOD                          
  161.     LCALL DEL1MS
  162.         //****************************
  163.         MOV   COOD,#":"
  164.     LCALL WCOD                          
  165.     LCALL DEL1MS
  166.         //****************************
  167.     MOV   A,MIAOH
  168.         MOV   DPTR,#TAB
  169.         MOVC  A,@A+DPTR
  170.     MOV   COOD,A
  171.     LCALL WCOD
  172.     LCALL DEL1MS
  173.         
  174.         MOV   A,MIAOL
  175.         MOV   DPTR,#TAB
  176.         MOVC  A,@A+DPTR                        
  177.     MOV   COOD,A
  178.     LCALL WCOD                          
  179.     LCALL DEL1MS

  181.         INC   MIAO
  182.         LCALL DEL1S
  183.         LCALL SJJSBF
  184.         RET

  186.   
  187. WCOD:                                      ;写12864数据
  188.      SETB   RS                             ;选择数据
  189.      LCALL  DEL1MS
  190.      CLR    RW                             ;写模式
  191.      LCALL  DEL1MS
  192.      SETB   E                              ;使能允许
  193.      LCALL  DEL1MS
  194.      MOV    DATE,COOD                      ;数据写入
  195.      LCALL  DEL10MS
  196.      CLR E
  197.      LCALL  DEL10MS
  198.      RET
  199.       
  200. WCOM:                                      ;写12864指令
  201.      CLR   RS                               ;选择指令
  202.      LCALL DEL1MS
  203.      CLR   RW                                ;写模式
  204.      LCALL DEL1MS
  205.      SETB  E                                ;使能允许
  206.      LCALL DEL1MS
  207.      MOV   DATE,COM                          ;指令写入
  208.      LCALL DEL10MS
  209.      CLR   E
  210.      LCALL DEL10MS
  211.      RET

  213. FMQ:
  214.      CLR   BUZZ
  215.          LCALL DEL80MS
  216.          SETB  BUZZ
  217.          RET
  218. ;**************************************************************
  219. ;* 【延时程序】
  220. ;**************************************************************
  221. DEL1MS:                                                           //延时1毫秒子程序
  222. MOV R7,#01H                                                   //
  223. DL1:                                                           //
  224. MOV R6,#8EH                                                   //
  225. DL0:                                                           //
  226. MOV R5,#02H                                                   //
  227. DJNZ R5,[        DISCUZ_CODE_1        ]nbsp;                                                  //
  228. DJNZ R6,DL0                                                   //
  229. DJNZ R7,DL1                                                   //
  230. RET                                                                   //子程序退出

  232. DEL10MS:                                                   //延时10毫秒子程序
  233. MOV R3,#02H                                                   //
  234. DEL41:                                                           //
  235. MOV R4,#20                                                   //
  236. E11:                                                           //
  237. MOV R5,#25                                                   //
  238. DJNZ R5,[        DISCUZ_CODE_1        ]nbsp;                                                  //
  239. DJNZ R4,E11                                                   //
  240. DJNZ R3,DEL41                                                   //
  241. RET                                                           //子程序退出
  242.                                                                   
  243. DEL80MS:                                                   //延时80毫秒子程序
  244. MOV R3,#20                                                   //
  245. DEL40:                                                           //
  246. MOV R4,#250                                                   //
  247. E1:                                                           //
  248. MOV R5,#150                                                   //
  249. DJNZ R5,[        DISCUZ_CODE_1        ]nbsp;                                                  //
  250. DJNZ R4,E1                                                   //
  251. DJNZ R3,DEL40                                                   //
  252. RET                                                           //子程序退出


  255. DEL1S:                                                           //延时1秒子程序
  256. MOV R3,#05H                                                   //
  257. E21:                                                           //
  258. MOV R4,#255                                                   //
  259. E31:                                                           //
  260. MOV R5,#20                                                   //
  261. E41:                                                           //
  262. MOV R6,#248                                                   //
  263. DJNZ R6,[        DISCUZ_CODE_1        ]nbsp;                                                  //
  264. DJNZ R5,E41                                                   //
  265. DJNZ R4,E31                                                   //
  266. DJNZ R3,E21                                                   //
  267. RET                                                                   //子程序退出


  270. TAB:  
  271.     DB  "0","1","2","3","4","5","6","7","8","9",":"  
  272.     END
复制代码


作者: heicad    时间: 2022-5-6 16:13
一般来说 是不可能达到一年几秒误差的精度的,楼主测试过吗?
作者: xiaoyuxinke    时间: 2022-5-6 16:21
heicad 发表于 2022-5-6 16:13
一般来说 是不可能达到一年几秒误差的精度的,楼主测试过吗?

去理解一下C和汇编的差别,你会懂,一个汇编NOP指令,最多2-3微秒的时间,一个24M的晶振,几微秒,一年误差不会超过5秒种.
在C语言中,延时只是个模糊概念,不管你写延时多少都不一定,要看编译器怎么去做,但汇编语言你写延时多少就是多少,可以做到很精准.
作者: xiaoyuxinke    时间: 2022-5-6 16:26
如果加上年累积误差校正,一年走时误差控制在1秒以内是做的到的(这里只计论走时误差,晶振的热稳定误差不讨论,那个是元件性能决定的)
作者: madell    时间: 2022-5-6 18:53
厉害，汇编做的延时是很精确的，直击底层，是C无法比拟的。
作者: axiongzhang    时间: 2022-5-6 20:03
看不懂汇编程序，失败
作者: xiaoyuxinke    时间: 2022-5-8 14:05
本人不会C,所以只好汇编充大头了,各位见笑/
作者: 风云101    时间: 2022-5-9 23:53
就喜欢汇编的可操作性，就好比开车一样，我自己握方向盘总比使唤别人握方向盘爽的多，当然使唤别人握方向盘肯定轻松多(类似C语言)，但缺少那份激情，我喜欢汇编也是这原因，别跟我算法，我就编个时钟或者一个手电筒控制程序，你跟我谈算法
作者: xiaoyuxinke    时间: 2022-5-25 22:37
axiongzhang 发表于 2022-5-6 20:03
看不懂汇编程序，失败

汇编并不是很难的,有人教就可以
作者: xiaoyuxinke    时间: 2022-5-25 22:37
madell 发表于 2022-5-6 18:53
厉害，汇编做的延时是很精确的，直击底层，是C无法比拟的。

说的对,这是汇编的优点,C和汇编各有优缺点.
作者: xiaoyuxinke    时间: 2022-5-25 22:38
风云101 发表于 2022-5-9 23:53
就喜欢汇编的可操作性，就好比开车一样，我自己握方向盘总比使唤别人握方向盘爽的多，当然使唤别人握方向盘 ...

喜欢就好,喜欢的才是适合自己的.
作者: ufo1    时间: 2022-5-26 14:58
不错，我也是喜欢汇编！！！
作者: fsj5098    时间: 2022-5-26 17:40
不管是c还是汇编，中断操作肯定影响计时
作者: xiaoyuxinke    时间: 2022-5-30 18:04
fsj5098 发表于 2022-5-26 17:40
不管是c还是汇编，中断操作肯定影响计时

整个程序没用到中断,为什么要用中断呢
作者: songxia8013    时间: 2023-2-10 15:49
请教一下，这个DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？
作者: xiaoyuxinke    时间: 2023-2-12 12:36
songxia8013 发表于 2023-2-10 15:49
请教一下，这个DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

DJNZ R6,[        DISCUZ_CODE_1        ]nbsp;
这个原来是DJNZ R6,$
坛子里发不了$,所以自动转成那样了
作者: xiaoyuxinke    时间: 2023-2-12 12:37
songxia8013 发表于 2023-2-10 15:49
请教一下，这个DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

看我前面发的图片上面就知道了
作者: Dream汇编男孩    时间: 2023-4-25 16:55
您好，我想问你点关于单片机汇编的问题可以吗？我是个新手小白，在做设计遇到了一些问题不知道咋解决想找您帮个忙。如果不方便的话就算了，叨唠您了，不好意思啊
作者: xiaoyuxinke    时间: 2023-10-21 20:24
Dream汇编男孩 发表于 2023-4-25 16:55
您好，我想问你点关于单片机汇编的问题可以吗？我是个新手小白，在做设计遇到了一些问题不知道咋解决想找您 ...

什么问题，工只是业余来一下这里，平时工作较忙。
作者: fsj5098    时间: 2023-10-21 22:49
如果环境温度不变更的情况下，时钟可以做得很准（不管是汇编还是C）
作者: 鹈鹕    时间: 2023-10-22 09:42
xiaoyuxinke 发表于 2023-2-12 12:37
看我前面发的图片上面就知道了

是啊，就是这个DJNZ R6,$是什么意思呢？
遍观整个程序中并没有这个标号，跳到哪里去呢？
作者: 宏达工控    时间: 2023-10-22 10:00
xiaoyuxinke 发表于 2022-5-8 14:05
本人不会C,所以只好汇编充大头了,各位见笑/

楼主既然对汇编熟系，对OD跟踪 WINhex这些一定也不陌生吧，能不能出个教程，工业控制上经常用
作者: 鹈鹕    时间: 2023-10-22 10:58
刚试了下，可以编译，结果是-2，这样就省了个标号，这在Keil中行得通，在其他的汇编环境中不知怎样，这不是个标准用法，第一次看到。
作者: xiaoyuxinke    时间: 2023-10-22 22:51
鹈鹕 发表于 2023-10-22 09:42
是啊，就是这个DJNZ R6,$是什么意思呢？
遍观整个程序中并没有这个标号，跳到哪里去呢？

R6中的数减一，如果不为0原地执行，
就是说R6中的数不为0就重复执行这句，
直到R6等于0，才跳到下一句。
作者: xiaoyuxinke    时间: 2023-10-22 22:54
songxia8013 发表于 2023-2-10 15:49
请教一下，这个DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

原程序中是：
DJNZ R6，$
但是坛子里不让发$这个符号，所以变成这样了
作者: xiaoyuxinke    时间: 2023-10-22 22:56
宏达工控 发表于 2023-10-22 10:00
楼主既然对汇编熟系，对OD跟踪 WINhex这些一定也不陌生吧，能不能出个教程，工业控制上经常用

我还要工作，没太多时间来这里，只是偶然过来看看，所以实在报歉
作者: xiaoyuxinke    时间: 2023-10-22 22:57
鹈鹕 发表于 2023-10-22 10:58
刚试了下，可以编译，结果是-2，这样就省了个标号，这在Keil中行得通，在其他的汇编环境中不知怎样，这不是 ...

汇编的移植性本来就不太友好，这是公认的缺点，所以这个我只能呵呵了



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1