標題: AT89S51單片機時鐘（輸出時：分：秒）匯編語言 [打印本頁]
作者: masterli    時間: 2017-6-9 21:33
標題: AT89S51單片機時鐘（輸出時：分：秒）匯編語言
這是單片機時鐘程序
附件包括源程序，不包含proteus仿真
源碼下載：
新建 Microsoft Word 文檔.docx (13.83 KB, 下載次數(shù): 7)

  1. LEDBUF EQU 60H
  2. HOUR EQU 40H
  3. MINTUE EQU 41H
  4. SECOND EQU 42H

  6. ORG 0000H
  7. LJMP MAIN
  8. ORG 000BH
  9. LJMP T0P
  10. LEDMAP:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH

  12. ORG 1000H
  13. MAIN:MOV TMOD,#01H
  14. MOV R5,#10
  15. MOV HOUR,#23
  16. MOV MINTUE,#59
  17. MOV SECOND,#55
  18. SETB ET0
  19. SETB EA
  20. SETB TR0

  22. LOOP:MOV A,HOUR
  23. MOV B,#10
  24. DIV AB
  25. CALL ZH
  26. MOV LEDBUF,A
  27. MOV A,B
  28. CALL ZH
  29. ORL A,#80H
  30. MOV LEDBUF+1,A

  32. MOV A,MINTUE
  33. MOV B,#10
  34. DIV AB
  35. CALL ZH
  36. MOV LEDBUF+2,A
  37. MOV A,B
  38. CALL ZH
  39. ORL A,#80H
  40. MOV LEDBUF+3,A

  42. MOV A,MINTUE
  43. MOV B,#10
  44. DIV AB
  45. CALL ZH
  46. MOV LEDBUF+4,A
  47. MOV A,B
  48. CALL ZH
  49. ORL A,#80H
  50. MOV LEDBUF+5,A
  51. CALL DISPLAY
  52. LJMP LOOP

  54. ZH:MOV DPTR,#LEDMAP
  55. MOVC A,@A+DPTR
  56. RET

  58. DISPLAY:MOV R1,#6
  59. MOV  R0,#LEDBUF
  60. MOV R2,#20H
  61. LOOP1:MOV DPTR,#8002H
  62. MOV A,#00H
  63. MOVX @DPTR,A
  64. MOV DPTR,#8004H
  65. MOV A,@R0
  66. MOVX @DPTR,A
  67. MOV DPTR.#8002H
  68. MOVX A,R2
  69. MOVX @DPTR,A
  70. CALL DELAY
  71. INC R0
  72. MOV A,R2
  73. RRA
  74. MOV R2,A
  75. DJNZ R1,LOOP
  76. MOV DPTR,#8002H
  77. MOV A,#00H
  78. MOVX @DPTR,A
  79. RET

  81. T0P:push PSW
  82. push Acc
  83. mov TL0,#0B0H
  84. mov TH0,#3CH
  85. DJNZ R5,EXIT
  86. mov R5,#10
  87. mov A,#01H
  88. ADD A,SECOND
  89. mov SECOND,A
  90. CJNE A,#60,EXIT
  91. mov SECOND,#00H
  92. mov A,#01H
  93. ADD A,MINUTE
  94. mov MINUTE,A
  95. CJNE A,#60,EXIT
  96. mov MINUTE,#00H
  97. mov A,#01H
  98. ADD A,HOUR
  99. mov HOUR,A
  100. CJNE A,#24,EXIT
  101. mov HOUR,#00H

  103. EXIT:POP PSW
  104. POP ACC
  105. RETI

  107. DELAY:MOV R6,#20
  108. DEL1:MOV R7,#12
  109. DEL2:DJNZ R7,DEL2
  110. DJNZ R6,DEL1
  111. RET  
  112. END
復制代碼






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