开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > 单片机开发 > 查看源码
LED4-8.ASM
资源名称：3.rar　[点击查看]
上传用户：dai0755
上传日期：2020-11-29
资源大小：1k
文件大小：3k
源码类别：

单片机开发

开发平台：

HTML/CSS

LED4-8.ASM：源码内容
  1. BAUD_REG EQU 0EH
  2. SPTEMP EQU 28H
  3. TXBUF EQU 30H
  4. RXBUF EQU 32H
  5. NUM EQU 34H
  6. FLAG EQU 36H
  7. AD_LOW EQU 02H
  8. AD_HIGH EQU 03H
  9. CSEG AT 200CH
  10. DCW SP_INT
  11. CSEG AT 2080H
  12. LDB IOPORT1,#0
  13. MEAN:LDB AD_COMMAND,#00001000B
  14. NOP
  15. NOP
  16. ADBUSY1:JBS AD_LOW,3,ADBUSY1
  17. LDB AH,AD_HIGH
  18. LDB AL,AD_LOW
  19. SHR AX,#6
  20. ST AX,4004H
  21. LDB AD_COMMAND,#00001000B
  22. NOP
  23. NOP
  24. ADBUSY2:JBS AD_LOW,3,ADBUSY2
  25. LDB CH,AD_HIGH
  26. LDB CL,AD_LOW
  27. SHR CX,#6
  28. ST CX,4006H
  29. ADD AX,CX
  30. LDB AD_COMMAND,#00001000B
  31. NOP
  32. NOP
  33. ADBUSY3:JBS AD_LOW,3,ADBUSY3
  34. LDB CH,AD_HIGH
  35. LDB CL,AD_LOW
  36. SHR CX,#6
  37. ST CX,4008H
  38. ADD AX,CX
  39. LDB AD_COMMAND,#00001000B
  40. NOP
  41. NOP
  42. ADBUSY4:JBS AD_LOW,3,ADBUSY4
  43. LDB CH,AD_HIGH
  44. LDB CL,AD_LOW
  45. SHR CX,#6
  46. ST CX,400AH
  47. ADD AX,CX
  48. SHR AX,#2
  49. ST AX,4002H
  50. MULU AX,#500
  51. DIVU AX,#1023
  52. ST AX,4000H
  54. CUM: LD SP,#0E0H
  55. LD IOC1,#00100000B             
  56. LDB BAUD_RATE,#26H              
  57. LDB BAUD_RATE,#80H
  58. LDB SP_CON,#00001001B         
  59. STB SBUF,AL
  60. CLRB FLAG
  61. LD TXBUF,#4000H                 
  62. LD RXBUF,#4010H
  63. LDB NUM,#13
  64. LDB INT_MASK,#01000000B        
  65. EI
  66. LDB SBUF,[TXBUF]+
  67.         
  68. WAIT: LJMP WAIT
  70. SP_INT:
  71. PUSHF
  72. LDB SPTEMP,SP_STAT
  73. JBS SPTEMP,5,TX                 
  74. JBS SPTEMP,6,RX                  
  75. RETURN:
  76. CLRB SPTEMP
  77. POPF
  78. RET
  80. TX: JBS FLAG,0,RETURN
  81. DECB NUM
  82. JE MEAN2
  83. LDB FLAG,#1
  84. LDB SBUF,[TXBUF]+
  85. SJMP RETURN
  87. RX: JBC FLAG,0,RETURN
  88. LdB FLAG,#0
  89. LDB AL,SBUF
  90. STB AL,[RXBUF]+
  91. SJMP RETURN
  93. MEAN2:LDB AD_COMMAND,#00001010B
  94. NOP
  95. NOP
  96. ADBUSY5:JBS AD_LOW,3,ADBUSY5
  97. LDB AH,AD_HIGH
  98. LDB AL,AD_LOW
  99. SHR AX,#6
  100. ST AX,4024H
  101. LDB AD_COMMAND,#00001000B
  102. NOP
  103. NOP
  104. ADBUSY6:JBS AD_LOW,3,ADBUSY6
  105. LDB CH,AD_HIGH
  106. LDB CL,AD_LOW
  107. SHR CX,#6
  108. ST CX,4026H
  109. ADD AX,CX
  110. LDB AD_COMMAND,#00001000B
  111. NOP
  112. NOP
  113. ADBUSY7:JBS AD_LOW,3,ADBUSY7
  114. LDB CH,AD_HIGH
  115. LDB CL,AD_LOW
  116. SHR CX,#6
  117. ST CX,4028H
  118. ADD AX,CX
  119. LDB AD_COMMAND,#00001000B
  120. NOP
  121. NOP
  122. ADBUSY8:JBS AD_LOW,3,ADBUSY8
  123. LDB CH,AD_HIGH
  124. LDB CL,AD_LOW
  125. SHR CX,#6
  126. ST CX,402AH
  127. ADD AX,CX
  128. SHR AX,#2
  129. ST AX,4022H
  130. MULU AX,#500
  131. DIVU AX,#1023
  132. ST AX,4020H
  134. CUM2: LD SP,#0E0H
  135. LD IOC1,#00100000B             
  136. LDB BAUD_RATE,#26H              
  137. LDB BAUD_RATE,#80H
  138. LDB SP_CON,#00001001B         
  139. STB SBUF,AL
  140. CLRB FLAG
  141. LD TXBUF,#4020H                 
  142. LD RXBUF,#4030H
  143. LDB NUM,#13
  144. LDB INT_MASK,#01000000B        
  145. EI
  146. LDB SBUF,[TXBUF]+
  147.         
  148. WAIT2: LJMP WAIT2
  150. SP_INT2:
  151. PUSHF
  152. LDB SPTEMP,SP_STAT
  153. JBS SPTEMP,5,TX2                 
  154. JBS SPTEMP,6,RX2                  
  155. RETURN2:
  156. CLRB SPTEMP
  157. POPF
  158. RET
  160. TX2: JBS FLAG,0,RETURN2
  161. DECB NUM
  162. JE LIGHT
  163. LDB FLAG,#1
  164. LDB SBUF,[TXBUF]+
  165. SJMP RETURN2
  167. RX2: JBC FLAG,0,RETURN2
  168. LdB FLAG,#0
  169. LDB AL,SBUF
  170. STB AL,[RXBUF]+
  171. SJMP RETURN2
  173. LIGHT: LDB IOPORT1,#1
  174.        SJMP RETURN2