標題: TLC548+51單片機電壓表 proteus仿真及匯編源程序 [打印本頁]
作者: xiaopangzi    時間: 2016-12-1 18:14
標題: TLC548+51單片機電壓表 proteus仿真及匯編源程序
TLC548電路原理圖：


TLC548匯編單片機程序：
  1. BCD_100   EQU 30H
  2. BCD_10    EQU 31H
  3. BCD_1     EQU 32H

  5. T050MS_NUM EQU 33H
  6. DLYMS_NUM EQU 34H

  8. TLC_DATA EQU 35H
  9. ND_ADC BIT 00H

  11. DIS_ON BIT P3.4
  12. TLC_CLR BIT P1.0
  13. TLC_CS  BIT P1.1
  14. TLC_DAT  BIT P1.2

  16. ORG 0000H
  17. LJMP MAIN
  18. ORG 000BH
  19. LJMP T0_ISR

  21. ORG 0100H
  22. MAIN:
  23. MOV SP,#6FH
  24. MOV BCD_100,#0
  25. MOV BCD_10,#0
  26. MOV BCD_1,#0

  28. CLR DIS_ON
  29. MOV T050MS_NUM,#5

  31. CLR ND_ADC

  33. MOV TMOD,#01H
  34. MOV TH0,#3CH
  35. MOV TL0,#0B0H
  36. CLR TF0
  37. SETB ET0
  38. SETB EA
  39. SETB TR0

  41. MAIN_LOOP:
  42. LCALL LED_DIS_3BIT
  43. JNB ND_ADC,MAIN_LOOP
  44. LCALL TLC_ADC
  45. CLR ND_ADC
  46. LJMP MAIN_LOOP

  48. LED_DIS_3BIT:
  49. MOV DPTR,#LED_TAB
  50. CLR DIS_ON
  51. MOV A,BCD_100
  52. MOVC A,@A+DPTR
  53. ANL A,#07FH
  54. MOV P0,A
  55. ANL P3,#1FH
  56. ORL P3,#5FH
  57. SETB DIS_ON

  59. MOV DLYMS_NUM,#2
  60. LCALL DELAYMS
  61. CLR DIS_ON
  62. MOV A,BCD_10
  63. MOVC A,@A+DPTR
  64. MOV P0,A
  65. ANL P3,#1FH
  66. ORL P3,#3FH
  67. SETB DIS_ON
  68. MOV DLYMS_NUM,#2
  69. LCALL DELAYMS
  70. CLR DIS_ON
  71. MOV A,BCD_1
  72. MOVC A,@A+DPTR
  73. MOV P0,A
  74. ANL P3,#1FH
  75. ORL P3,#1FH
  76. SETB DIS_ON
  77. MOV DLYMS_NUM,#2
  78. LCALL DELAYMS
  79. RET

  81. TLC_ADC:

  83. SETB TLC_DAT
  84. CLR  TLC_CLR
  85. CLR  TLC_CS
  86. MOV  R6,#8

  88. TLC_LOOP1:
  89. SETB TLC_CLR
  90. NOP
  91. NOP
  92. MOV C,TLC_DAT
  93. RLC A
  94. CLR TLC_CLR
  95. NOP
  96. DJNZ R6,TLC_LOOP1
  97. SETB TLC_CS
  98. SETB TLC_CLR
  99. MOV TLC_DATA,A
  100. MOV DLYMS_NUM,#1
  101. LCALL DELAYMS


  104. SETB TLC_DAT
  105. CLR  TLC_CLR
  106. CLR  TLC_CS
  107. MOV  R6,#8




  112. TLC_LOOP2:
  113. SETB TLC_CLR
  114. NOP
  115. NOP
  116. MOV C,TLC_DAT
  117. RLC A
  118. CLR TLC_CLR
  119. NOP
  120. DJNZ R6,TLC_LOOP2
  121. SETB TLC_CS
  122. SETB TLC_CLR

  124. MOV TLC_DATA,A

  126. MOV DLYMS_NUM,#1
  127. LCALL DELAYMS

  129. MOV A,TLC_DATA
  130. MOV B,#51
  131. DIV AB
  132. MOV BCD_100,A

  134. MOV A,B
  135. CJNE A,#50,CAL_10
  136. DEC A

  138. CAL_10:
  139. MOV B,#5
  140. DIV AB
  141. MOV BCD_10,A

  143. MOV BCD_1,B
  144. RET

  146. DELAYMS:
  147. MOV R4,#250
  148. DJNZ R4,$
  149. MOV R4,#250
  150. DJNZ R4,$
  151. DJNZ DLYMS_NUM,DELAYMS
  152. RET

  154. T0_ISR:
  155. MOV TH0,#3CH
  156. MOV TL0,#0B0H
  157. DJNZ T050MS_NUM,EXIT_T0
  158. MOV T050MS_NUM,#5
  159. SETB ND_ADC

  161. EXIT_T0:
  162. RETI


  165. LED_TAB:
  166. DB  0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
  167. DB  88H,83H,0C6H,0A1H,86H,8EH
  168. END
復制代碼

TLC548電壓表所有資料打包下載含仿真工程文件：
電壓表.zip (23.48 KB, 下載次數(shù): 25)

作者: admin    時間: 2016-12-3 23:06
51黑有你更精彩�。。�



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