標(biāo)題: 單片機(jī)匯編語言模擬時(shí)鐘程序(LCD12864顯示)精校時(shí)間(開源) [打印本頁]
作者: xiaoyuxinke    時(shí)間: 2022-5-5 16:41
標(biāo)題: 單片機(jī)匯編語言模擬時(shí)鐘程序(LCD12864顯示)精校時(shí)間(開源)
本帖最后由 xiaoyuxinke 于 2022-5-8 14:11 編輯

本程序無需DS1302,無需定時(shí)器,另本程序使用匯編語言編寫,只要按所使用的晶振修改延時(shí)部分,可以做到一年誤差5秒以內(nèi).
視頻已上傳至優(yōu)酷,需要的可以看一下.https://v.youku.com/v_show/id_XN ... o_XNTg2ODI5MDQ3Mg==
需要精校時(shí)間的可調(diào)整此四個(gè)值,需要更精準(zhǔn)可在延時(shí)部分加NOP修整(可做到年誤差3秒以內(nèi)),此程序雖然不使用DS1302,但可以做到比DS1302更為精準(zhǔn)



下面是單片機(jī)匯編語言程序部分:


  3. ;******************************************************************************
  4. ;* 【LCD12864數(shù)據(jù)接口定義】
  5. ;******************************************************************************
  6.            RS       BIT    P2.7    //高電平數(shù)據(jù)低電平指令
  7.            RW       BIT    P2.6    //高電平讀低電平寫
  8.            E        BIT    P2.5    //LCD12864使能控制端
  9.            DATE     EQU    P0           //八位數(shù)據(jù)送P0口(八位數(shù)據(jù)總線)
  10.            COM      EQU    70H           //LCD12864指令暫存地址
  11.            COOD     EQU    91H           //LCD12864數(shù)據(jù)暫存地址
  12. ;******************************************************************************
  13. ;* 【時(shí)間顯示定義】
  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. ;* 【按鍵功能和標(biāo)志位定義】
  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優(yōu)先權(quán)第1
  41.            SETB  EX0                                                //下降沿觸發(fā)中斷
  42.            SETB  IT0                                                //外部中斷0被允許
  43.            SETB  EA                                                //總中斷位被允許
  44.         MOV   SHI,#17                                                //小時(shí)賦初值
  45.         MOV   FEN,#33                                                //分鐘賦初值
  46.         MOV   MIAO,#00                                                //秒鐘賦初值
  47.         MOV   SHIH,#0                                                //小時(shí)高位賦初值
  48.         MOV   SHIL,#0                                                //小時(shí)低位賦初值
  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計(jì)數(shù)器清零
  80.     LCALL WCOM                          //12864寫入指令
  81.     LCALL DEL10MS                       //延時(shí)4.6毫秒
  82.     MOV   COM,#02H                      // AC清零，游標(biāo)到開頭位置
  83.     LCALL WCOM                          //12864寫入指令
  84.     LCALL DEL10MS                       //延時(shí)4.6毫秒
  85.     MOV   COM,#0CH                      //游標(biāo)開，整體顯示開，游標(biāo)位置開
  86.     LCALL WCOM                          //12864寫入指令
  87.     LCALL DEL10MS                       //延時(shí)4.6毫秒
  88.         RET
  89. ;******************************************************************************
  90. ;* 【時(shí)間計(jì)算部分】
  91. ;******************************************************************************
  92. SJJSBF:                                                                        //時(shí)間計(jì)算部分,秒到60分進(jìn)一,分到60時(shí)進(jìn)一,時(shí)到24全清零
  93.     MOV   A,MIAO                                                //秒鐘數(shù)據(jù)送到累加器
  94.     CJNE  A,#60,FAG                                                //如果不等于60就退出,否則向下執(zhí)行
  95.         MOV   MIAO,#00                                                //秒鐘數(shù)據(jù)清零
  96.         INC   FEN                                                        //分鐘數(shù)據(jù)加一

  98.         MOV   A,FEN                                                        //分鐘數(shù)據(jù)送到累加器
  99.         CJNE  A,#60,FAG                                                //如果不等于60就退出,否則向下熱行
  100.         MOV   FEN,#00                                                //分鐘數(shù)據(jù)清零
  101.         INC   SHI                                                        //小時(shí)數(shù)據(jù)加一

  103.         MOV   A,SHI                                                        //小時(shí)數(shù)據(jù)送到累加器
  104.         CJNE  A,#24,FAG                                                //如果不等于24就退出,否則向下執(zhí)行
  105.         MOV   SHI,#00                                                //小時(shí)數(shù)據(jù)清零
  106.         RET
  107. FAG:
  108.         RET

  110. HZXSCX:
  111.     MOV   COM,#9CH                                                 //從第四行第四個(gè)位置開始寫
  112.     LCALL WCOM                          //12864寫入指令
  113.     LCALL DEL10MS
  114. //*********************************     //時(shí)分秒分配，把時(shí)分秒分別算出高低位
  115.         MOV   A,SHI                                                    //小時(shí)數(shù)據(jù)送到累加器
  116.         MOV   B,#10                                                    //立既數(shù)10送到B
  117.         DIV   AB                                                        //小時(shí)數(shù)除以10
  118.         MOV   SHIH,A                                                //整數(shù)送到小時(shí)高位
  119.         MOV   SHIL,B                                                //余數(shù)送到小時(shí)低位
  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數(shù)據(jù)
  188.      SETB   RS                             ;選擇數(shù)據(jù)
  189.      LCALL  DEL1MS
  190.      CLR    RW                             ;寫模式
  191.      LCALL  DEL1MS
  192.      SETB   E                              ;使能允許
  193.      LCALL  DEL1MS
  194.      MOV    DATE,COOD                      ;數(shù)據(jù)寫入
  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. ;* 【延時(shí)程序】
  220. ;**************************************************************
  221. DEL1MS:                                                           //延時(shí)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:                                                   //延時(shí)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:                                                   //延時(shí)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:                                                           //延時(shí)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
復(fù)制代碼


作者: heicad    時(shí)間: 2022-5-6 16:13
一般來說 是不可能達(dá)到一年幾秒誤差的精度的,樓主測試過嗎?
作者: xiaoyuxinke    時(shí)間: 2022-5-6 16:21
heicad 發(fā)表于 2022-5-6 16:13
一般來說 是不可能達(dá)到一年幾秒誤差的精度的,樓主測試過嗎?

去理解一下C和匯編的差別,你會懂,一個(gè)匯編NOP指令,最多2-3微秒的時(shí)間,一個(gè)24M的晶振,幾微秒,一年誤差不會超過5秒種.
在C語言中,延時(shí)只是個(gè)模糊概念,不管你寫延時(shí)多少都不一定,要看編譯器怎么去做,但匯編語言你寫延時(shí)多少就是多少,可以做到很精準(zhǔn).
作者: xiaoyuxinke    時(shí)間: 2022-5-6 16:26
如果加上年累積誤差校正,一年走時(shí)誤差控制在1秒以內(nèi)是做的到的(這里只計(jì)論走時(shí)誤差,晶振的熱穩(wěn)定誤差不討論,那個(gè)是元件性能決定的)
作者: madell    時(shí)間: 2022-5-6 18:53
厲害，匯編做的延時(shí)是很精確的，直擊底層，是C無法比擬的。
作者: axiongzhang    時(shí)間: 2022-5-6 20:03
看不懂匯編程序，失敗
作者: xiaoyuxinke    時(shí)間: 2022-5-8 14:05
本人不會C,所以只好匯編充大頭了,各位見笑/
作者: 風(fēng)云101    時(shí)間: 2022-5-9 23:53
就喜歡匯編的可操作性，就好比開車一樣，我自己握方向盤總比使喚別人握方向盤爽的多，當(dāng)然使喚別人握方向盤肯定輕松多(類似C語言)，但缺少那份激情，我喜歡匯編也是這原因，別跟我算法，我就編個(gè)時(shí)鐘或者一個(gè)手電筒控制程序，你跟我談算法
作者: xiaoyuxinke    時(shí)間: 2022-5-25 22:37
axiongzhang 發(fā)表于 2022-5-6 20:03
看不懂匯編程序，失敗

匯編并不是很難的,有人教就可以
作者: xiaoyuxinke    時(shí)間: 2022-5-25 22:37
madell 發(fā)表于 2022-5-6 18:53
厲害，匯編做的延時(shí)是很精確的，直擊底層，是C無法比擬的。

說的對,這是匯編的優(yōu)點(diǎn),C和匯編各有優(yōu)缺點(diǎn).
作者: xiaoyuxinke    時(shí)間: 2022-5-25 22:38
風(fēng)云101 發(fā)表于 2022-5-9 23:53
就喜歡匯編的可操作性，就好比開車一樣，我自己握方向盤總比使喚別人握方向盤爽的多，當(dāng)然使喚別人握方向盤 ...

喜歡就好,喜歡的才是適合自己的.
作者: ufo1    時(shí)間: 2022-5-26 14:58
不錯(cuò)，我也是喜歡匯編！�。�
作者: fsj5098    時(shí)間: 2022-5-26 17:40
不管是c還是匯編，中斷操作肯定影響計(jì)時(shí)
作者: xiaoyuxinke    時(shí)間: 2022-5-30 18:04
fsj5098 發(fā)表于 2022-5-26 17:40
不管是c還是匯編，中斷操作肯定影響計(jì)時(shí)

整個(gè)程序沒用到中斷,為什么要用中斷呢
作者: songxia8013    時(shí)間: 2023-2-10 15:49
請教一下，這個(gè)DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？
作者: xiaoyuxinke    時(shí)間: 2023-2-12 12:36
songxia8013 發(fā)表于 2023-2-10 15:49
請教一下，這個(gè)DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

DJNZ R6,[        DISCUZ_CODE_1        ]nbsp;
這個(gè)原來是DJNZ R6,$
壇子里發(fā)不了$,所以自動轉(zhuǎn)成那樣了
作者: xiaoyuxinke    時(shí)間: 2023-2-12 12:37
songxia8013 發(fā)表于 2023-2-10 15:49
請教一下，這個(gè)DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

看我前面發(fā)的圖片上面就知道了
作者: Dream匯編男孩    時(shí)間: 2023-4-25 16:55
您好，我想問你點(diǎn)關(guān)于單片機(jī)匯編的問題可以嗎？我是個(gè)新手小白，在做設(shè)計(jì)遇到了一些問題不知道咋解決想找您幫個(gè)忙。如果不方便的話就算了，叨嘮您了，不好意思啊
作者: xiaoyuxinke    時(shí)間: 2023-10-21 20:24
Dream匯編男孩 發(fā)表于 2023-4-25 16:55
您好，我想問你點(diǎn)關(guān)于單片機(jī)匯編的問題可以嗎？我是個(gè)新手小白，在做設(shè)計(jì)遇到了一些問題不知道咋解決想找您 ...

什么問題，工只是業(yè)余來一下這里，平時(shí)工作較忙。
作者: fsj5098    時(shí)間: 2023-10-21 22:49
如果環(huán)境溫度不變更的情況下，時(shí)鐘可以做得很準(zhǔn)（不管是匯編還是C）
作者: 鵜鶘    時(shí)間: 2023-10-22 09:42
xiaoyuxinke 發(fā)表于 2023-2-12 12:37
看我前面發(fā)的圖片上面就知道了

是啊，就是這個(gè)DJNZ R6,$是什么意思呢？
遍觀整個(gè)程序中并沒有這個(gè)標(biāo)號，跳到哪里去呢？
作者: 宏達(dá)工控    時(shí)間: 2023-10-22 10:00
xiaoyuxinke 發(fā)表于 2022-5-8 14:05
本人不會C,所以只好匯編充大頭了,各位見笑/

樓主既然對匯編熟系，對OD跟蹤 WINhex這些一定也不陌生吧，能不能出個(gè)教程，工業(yè)控制上經(jīng)常用
作者: 鵜鶘    時(shí)間: 2023-10-22 10:58
剛試了下，可以編譯，結(jié)果是-2，這樣就省了個(gè)標(biāo)號，這在Keil中行得通，在其他的匯編環(huán)境中不知怎樣，這不是個(gè)標(biāo)準(zhǔn)用法，第一次看到。
作者: xiaoyuxinke    時(shí)間: 2023-10-22 22:51
鵜鶘 發(fā)表于 2023-10-22 09:42
是啊，就是這個(gè)DJNZ R6,$是什么意思呢？
遍觀整個(gè)程序中并沒有這個(gè)標(biāo)號，跳到哪里去呢？

R6中的數(shù)減一，如果不為0原地執(zhí)行，
就是說R6中的數(shù)不為0就重復(fù)執(zhí)行這句，
直到R6等于0，才跳到下一句。
作者: xiaoyuxinke    時(shí)間: 2023-10-22 22:54
songxia8013 發(fā)表于 2023-2-10 15:49
請教一下，這個(gè)DJNZ R6,[        DISCUZ_CODE_1        ]nbsp; 是什么意思？

原程序中是：
DJNZ R6，$
但是壇子里不讓發(fā)$這個(gè)符號，所以變成這樣了
作者: xiaoyuxinke    時(shí)間: 2023-10-22 22:56
宏達(dá)工控 發(fā)表于 2023-10-22 10:00
樓主既然對匯編熟系，對OD跟蹤 WINhex這些一定也不陌生吧，能不能出個(gè)教程，工業(yè)控制上經(jīng)常用

我還要工作，沒太多時(shí)間來這里，只是偶然過來看看，所以實(shí)在報(bào)歉
作者: xiaoyuxinke    時(shí)間: 2023-10-22 22:57
鵜鶘 發(fā)表于 2023-10-22 10:58
剛試了下，可以編譯，結(jié)果是-2，這樣就省了個(gè)標(biāo)號，這在Keil中行得通，在其他的匯編環(huán)境中不知怎樣，這不是 ...

匯編的移植性本來就不太友好，這是公認(rèn)的缺點(diǎn)，所以這個(gè)我只能呵呵了



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1