标题: 51单片机双机通信+LCD1602汇编语言程序 [打印本页]
作者: oops64    时间: 2022-6-7 13:09
标题: 51单片机双机通信+LCD1602汇编语言程序
在主机显示学号姓名，利用通信功能，在从机也显示同样的内容。
  1. ;发送端
  2. ;/通用寄存器R5用于录入lcd1602的8位指令和数据
  3. ORG 000H
  4. LCD_PORT EQU P1
  5. COUNT EQU 30H
  6. RS EQU P2.5
  7. RW EQU P2.6
  8. EN  EQU P2.7

  10. AJMP START

  12. ORG 00BH
  13. LJMP TIME0

  15. ORG 100H
  16. START:
  17. ;将自定义的八个字符写入CGRAM
  18. ACALL ENABLE
  19. MOV P1,#40H
  20.         ACALL ENABLE
  21.         MOV DPTR,#SELF1
  22.         CALL WSELF
  23.         MOV P1,#48H
  24.         ACALL ENABLE
  25.         MOV DPTR,#SELF2
  26.         CALL WSELF
  27.         MOV P1,#50H
  28.         ACALL ENABLE
  29.         MOV DPTR,#SELF3
  30.         CALL WSELF
  31.         MOV P1,#58H
  32.         ACALL ENABLE
  33.         MOV DPTR,#SELF4
  34.         CALL WSELF
  35.         MOV P1,#60H
  36.         ACALL ENABLE
  37.         MOV DPTR,#SELF5
  38.         CALL WSELF
  39.         MOV P1,#68H
  40.         ACALL ENABLE
  41.         MOV DPTR,#SELF6
  42.         CALL WSELF
  43.         MOV P1,#70H
  44.         ACALL ENABLE
  45.         MOV DPTR,#SELF7
  46.         CALL WSELF
  47.         MOV P1,#78H
  48.         ACALL ENABLE
  49.         MOV DPTR,#SELF8
  50.         CALL WSELF
  51. //定时器设置
  52.         MOV TMOD,#00100001B
  53.         SETB EA;总开关
  54.         MOV PCON,#80H
  55.         MOV TH1,#0FDH
  56. //初始化串口//方式1发送接收均初始化
  57.         MOV SCON,#01010000B
  58.         SETB TR1;定时器1开始运行

  60. ACALL LCD1602_init;初始化lcd1602

  62. ACALL PRINT0

  64. MAIN:
  65. MOV DPTR,#NUM_TAB
  66. MOV R0,#16

  68. ACALL DELAY5
  69. ACALL SEND_DATA
  70. NEXT:AJMP NEXT


  73. //发送数据，表地址放入dptr，发送数量放入R0
  74. SEND_DATA:
  75. INC R0
  76. MOV A,#00H;从首位开始
  77. SEND_DATA_0:
  78. DJNZ R0,SEND_DATA_1
  79. ret
  80. SEND_DATA_1:
  81. ACALL D5MS
  82. ACALL D5MS
  83. PUSH ACC
  84. MOVC A,@A+DPTR
  85. MOV SBUF,A
  86. ACALL D5MS
  87. POP ACC
  88. INC A
  89. WAIT:JBC TI,SEND_DATA_0//等待发送完成
  90. AJMP WAIT
  91. //写指令，指令放入R5
  92. WRITE_COM:
  93. CLR  RS                                                                 ;(130)RS,RW,EN均置0，写指令
  94. CLR  RW
  95. CLR  EN
  96. MOV LCD_PORT ,R5                                     ;(131)指令一律写入R5，在移入P2
  97. SETB  EN      
  98. ACALL D5MS
  99. ACALL D5MS
  100. CLR  EN                                                                 ;(132)EN跳变，允许数据交换
  101. RET                                                                         ;(134)返回原处

  103. //写数据，数据放入R5
  104. WRITE_DATA:
  105. SETB  RS                                                                 ;(130)RS置1,RW,EN均置0，写数据
  106. CLR  RW
  107. CLR  EN
  108. MOV LCD_PORT ,R5                                                         ;(131)数据一律写入R5，在移入P2
  109. //ACALL D5MS
  110. SETB  EN      
  111. ACALL D5MS
  112. ACALL D5MS
  113. CLR  EN                                                                 ;(132)EN跳变，允许数据交换
  114. RET                                                                         ;(134)返回原处

  116. //初始化LCD1602
  117. LCD1602_init:
  118. MOV R5,#06H                                                        ;(144)8位数据，5*7点阵，2行显示
  119. ACALL WRITE_COM                       
  120. MOV R5,#0CH                                                        ;(148)写一个数据后，光标右移，屏幕不移动
  121. ACALL WRITE_COM
  122. MOV R5,#38H                                                        ;(146)显示开，关光标，光标不闪烁
  123. ACALL WRITE_COM
  124. MOV R5,#01H                                                        ;(150)清屏
  125. ACALL WRITE_COM
  126. RET

  128. PRINT0:
  129. PUSH ACC;对A做保护
  130. PUSH 06
  131. PUSH 05
  132. MOV A,#00H
  133. MOV R3,#16
  134. MOV DPTR,#NUM_TAB

  136. PRINT0_0:
  137. PUSH ACC
  138. MOVC A,@A+DPTR
  139. MOV R5,#00H                ;(49)命令载入R5
  140. ACALL WRITE_COM                        ;(50)写命令
  141. MOV R5,A
  142. ACALL WRITE_DATA
  143. POP ACC
  144. INC A
  145. DJNZ R3,PRINT0_0
  146. POP 05
  147. POP 06
  148. POP ACC
  149. RET

  151. ENABLE:
  152.         CLR RS
  153.         CLR RW
  154.         CLR EN
  155.         ACALL D5MS
  156.         ACALL D5MS
  157.         SETB EN
  158.         RET
  159.       
  160. WSELF:
  161.         MOV R7,#00H
  162. W1:
  163.         MOV A,R7
  164.         MOVC A,@A+DPTR
  165.         CALL WRITE1
  166.         INC R7
  167.         CJNE R7,#08H,W1
  168.         RET
  169. WRITE1:
  170.         CLR EN
  171.         SETB RS
  172.         CLR RW
  173.         SETB EN
  174.         MOV P1,A
  175.         CLR EN
  176.         CALL D5MS
  177.     CALL D5MS
  178.         RET
  179. //计数器0中断服务函数
  180. TIME0:
  181. PUSH ACC
  182. INC 30H
  183. MOV A,30H
  184. CJNE A,#02,RETIME;5*O.1S
  185. INC R3
  186. MOV 30H,#0

  188. RETIME:
  189. MOV TH0,#27H
  190. MOV TL0,#11H;重置定时器
  191. POP ACC
  192. RETI
  193. //延时5ms左右，已进行现场保护
  194. D5MS:
  195. PUSH 07
  196. PUSH 06
  197. MOV  R7,#200      
  198. DEL1:MOV R6,#125
  199. DEL2:DJNZ R6,DEL2      
  200. DJNZ R7,DEL1
  201. POP 06
  202. POP 07
  203. RET
  204. //带保护现场的延时
  205. DELAY5:
  206.         PUSH 02
  207.         PUSH 03
  208.         PUSH 04
  209.     MOV R2,#5
  210. DLY1:
  211.     MOV R3,#200
  212. DLY2:
  213.     MOV R4,#250
  214.     DJNZ R4,$
  215.     DJNZ R3,DLY2
  216.     DJNZ R2,DLY1
  217.         POP 04
  218.         POP 03
  219.         POP 02
  220.     RET
  221. //学号
  222. NUM_TAB: DB "0123456789",20H,05H,20H,06H,20H,07H
  223. //姓名
  224. SELF1:DB  04H,1FH,15H,1FH,15H,1FH,04H,07H
  225. SELF2:DB  02H,0CH,04H,1FH,0EH,15H,15H,04H
  226. SELF3:DB  02H,0AH,06H,02H,1FH,02H,02H,02H
  227. SELF4:DB  0EH,04H,04H,04H,0EH,04H,04H,0EH
  228. SELF5:DB  0FH,0AH,0AH,1AH,1FH,0AH,0AH,0FH
  229. SELF6:DB  09H,01H,1DH,07H,15H,09H,15H,03H
  230. SELF7:DB  04H,1FH,04H,0AH,1FH,00H,1BH,0BH
  231. SELF8:DB  02H,1CH,10H,14H,1FH,04H,15H,0CH
  232.       
  233. END
复制代码

屏幕截图 2022-06-07 130928.png (82.06 KB, 下载次数: 109)

屏幕截图 2022-06-07 130928.png
作者: oops64    时间: 2022-6-7 13:16
  1. ;接收端
  2. //通用寄存器R5用于录入lcd1602的8位指令和数据
  3. ORG 000H
  4. LCD_PORT EQU P1
  5. RS EQU P2.5
  6. RW EQU P2.6
  7. EN  EQU P2.7

  9. AJMP START

  11. ORG 023H
  12. LJMP REC

  14. ORG 100H
  15. START:
  16. //定时器1设置,即设置波特率

  18. MOV TMOD,#20H
  19. MOV PCON,#80H
  20. MOV TH1,#0FDH
  21. //

  23. //初始化串口//方式1发送接收均初始化
  24. MOV SCON,#01010000B
  25. SETB REN
  26. SETB TR1
  27. //

  29. //初始化中断
  30. SETB EA;总开关
  31. SETB ES;串口中断
  32. ACALL WCGRAM
  33. ACALL LCD1602_init;初始化lcd1602
  34. MAIN:;循环
  35. AJMP MAIN

  37. //串口中断服务函数（仅用于接受数据）
  38. REC:
  39. PUSH ACC
  40. PUSH 05
  41. MOV A,SBUF
  42. CLR RI
  43. MOV R5,#00H
  44. ACALL WRITE_COM
  45. MOV R5,A
  46. ACALL WRITE_DATA
  47. POP 05
  48. POP ACC
  49. RETI

  51. //写指令，指令放入R5
  52. WRITE_COM:
  53. ACALL D5MS
  54. CLR  RS                                                                 ;(130)RS,RW,EN均置0，写指令
  55. CLR  RW
  56. CLR  EN
  57. MOV LCD_PORT ,R5                                                         ;(131)指令一律写入R5，在移入P2
  58. //ACALL D5MS
  59. SETB  EN        
  60. CLR  EN                                                                 ;(132)EN跳变，允许数据交换
  61. RET                                                                         ;(134)返回原处


  64. //写数据，数据放入R5
  65. WRITE_DATA:
  66. ACALL D5MS
  67. SETB  RS                                                                 ;(130)RS置1,RW,EN均置0，写数据
  68. CLR  RW
  69. CLR  EN
  70. MOV LCD_PORT ,R5                                                         ;(131)数据一律写入R5，在移入P2
  71. SETB  EN        
  72. CLR  EN                                                                 ;(132)EN跳变，允许数据交换
  73. RET                                                                         ;(134)返回原处


  76. //初始化LCD1602
  77. LCD1602_init:
  78. MOV R5,#06H                                                        ;(144)8位数据，5*7点阵，2行显示
  79. ACALL WRITE_COM                        
  80. MOV R5,#0CH                                                        ;(148)写一个数据后，光标右移，屏幕不移动
  81. ACALL WRITE_COM
  82. MOV R5,#38H                                                        ;(146)显示开，关光标，光标不闪烁
  83. ACALL WRITE_COM
  84. MOV R5,#01H                                                        ;(150)清屏
  85. ACALL WRITE_COM
  86. RET

  88. WCGRAM:
  89. MOV P1,#40H
  90.         ACALL ENABLE
  91.         MOV DPTR,#SELF1
  92.         CALL WSELF
  93.         MOV P1,#48H
  94.         ACALL ENABLE
  95.         MOV DPTR,#SELF2
  96.         CALL WSELF
  97.         MOV P1,#50H
  98.         ACALL ENABLE
  99.         MOV DPTR,#SELF3
  100.         CALL WSELF
  101.         MOV P1,#58H
  102.         ACALL ENABLE
  103.         MOV DPTR,#SELF4
  104.         CALL WSELF
  105.         MOV P1,#60H
  106.         ACALL ENABLE
  107.         MOV DPTR,#SELF5
  108.         CALL WSELF
  109.         MOV P1,#68H
  110.         ACALL ENABLE
  111.         MOV DPTR,#SELF6
  112.         CALL WSELF
  113.         MOV P1,#70H
  114.         ACALL ENABLE
  115.         MOV DPTR,#SELF7
  116.         CALL WSELF
  117.         MOV P1,#78H
  118.         ACALL ENABLE
  119.         MOV DPTR,#SELF8
  120.         CALL WSELF
  121.         RET
  122. ENABLE:
  123.         CLR RS
  124.         CLR RW
  125.         CLR EN
  126.         ACALL D5MS
  127.         ACALL D5MS
  128.         SETB EN
  129.         RET
  130.         WSELF:
  131.         MOV R7,#00H
  132. W1:
  133.         MOV A,R7
  134.         MOVC A,@A+DPTR
  135.         CALL WRITE1
  136.         INC R7
  137.         CJNE R7,#08H,W1
  138.         RET
  139. WRITE1:
  140.         CLR EN
  141.         SETB RS
  142.         CLR RW
  143.         SETB EN
  144.         MOV P1,A
  145.         
  146.         CLR EN
  147.     ACALL D5MS
  148.         ACALL D5MS
  149.         RET


  152. //延时5ms左右，已进行现场保护
  153. D5MS:
  154. PUSH 07
  155. PUSH 06
  156. MOV  R7,#200      
  157. DEL1:MOV R6,#125
  158. DEL2:DJNZ R6,DEL2      
  159. DJNZ R7,DEL1
  160. POP 06
  161. POP 07
  162. RET
  163. //
  164. SELF1:DB  04H,1FH,15H,1FH,15H,1FH,04H,07H
  165. SELF2:DB  02H,0CH,04H,1FH,0EH,15H,15H,04H
  166. SELF3:DB  02H,0AH,06H,02H,1FH,02H,02H,02H
  167. SELF4:DB  0EH,04H,04H,04H,0EH,04H,04H,0EH
  168. SELF5:DB  0FH,0AH,0AH,1AH,1FH,0AH,0AH,0FH
  169. SELF6:DB  09H,01H,1DH,07H,15H,09H,15H,03H
  170. SELF7:DB  04H,1FH,04H,0AH,1FH,00H,1BH,0BH
  171. SELF8:DB  02H,1CH,10H,14H,1FH,04H,15H,0CH



  175. END
复制代码
作者: 李了里    时间: 2023-5-21 16:13
大佬，能直接给一下原理图吗？我自己画的仿真不出来
作者: 8206210115    时间: 2023-5-22 14:26
李了里 发表于 2023-5-21 16:13
大佬，能直接给一下原理图吗？我自己画的仿真不出来

CSU?




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