设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 分享一个51单片机的LCD1602显示汇编语言程序
返回列表 发新帖
查看: 7193|回复: 3
打印 上一主题 下一主题
收起左侧

分享一个51单片机的LCD1602显示汇编语言程序

[复制链接]
跳转到指定楼层
楼主
ID:308653 发表于 2018-4-15 17:02 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
分享一个51单片机的LCD1602显示程序

单片机源程序如下:
  1. RS  EQU  P1.1
  2. RW  EQU  P1.2
  3. E   EQU  P1.3
  4. ORG  0000H
  5. AJMP MAIN
  6. ORG  0030H
  7. MAIN:
  8. CLR RS
  9. CLR E
  10. CLR RW
  11. MOV SP,#60H   
  12. MOV P0,#01H ;清屏   
  13. CLR RS    ;送命令   
  14. CLR RW   
  15. CLR E   
  16. LCALL DELAY   
  17. SETB E   
  18. MOV P0,#38H ;显示功能      
  19. LCALL ENABLE   
  20. MOV P0,#0FH ;显示开关控制   
  21. LCALL ENABLE   
  22. MOV P0,#06H ;显示光标右移加1   
  23. LCALL ENABLE   
  24. MOV  DPTR,#TABLE1   
  25. ACALL DD2;DD2是LCD第一行显示TABLE1   
  26. ACALL PPP  ;PPP是LCD第二行显示TAB
  27. SJMP $
  28. DD2: MOV P0,#80H;第一行的开始位置   
  29. LCALL ENABLE   
  30. LCALL WRITE1;到TABLE1取码?   
  31. RET
  32. ENABLE:
  33. CLR RS    ;送命令   
  34. CLR RW   
  35. CLR E   
  36. LCALL DELAY   
  37. SETB E   
  38. RET
  39. WRITE1: MOV R1,#00H   ;显示table中的值  
  40. A1:   MOV A,R1;到table取码   
  41. MOVC A,@A+DPTR   
  42. LCALL  WRITE2  ;显示到lcd   
  43. INC R1   
  44. CJNE A,#00H,A1  ;是否到00h   
  45. RET
  46. WRITE2:MOV P0,A  ;显示   
  47. SETB RS   
  48. CLR RW   
  49. CLR E   
  50. CALL DELAY   
  51. SETB E   
  52. RET   
  53. DELAY:
  54. MOV R4,#10
  55. D1:MOV R5,#0F8H   
  56. D2:DJNZ R5,D2   
  57. DJNZ R4,D1   
  58. RET
  59. PPP:
  60. MOV P0,#0C0H;第二行的位置   
  61. LCALL ENABLE   
  62. MOV DPTR,#TAB;显示   
  63. LCALL WRITE3;到TAB取码   
  64. RET  
  65. WRITE3: MOV R1,#00H   ;显示table中的值  
  66. A2:   MOV A,R1;到table取码   
  67. MOVC A,@A+DPTR   
  68. LCALL  WRITE2  ;显示到lcd   
  69. INC R1   
  70. CJNE A,#00H,A2  ;是否到00h   
  71. RET
  72. ORG 0C000H
  73. TABLE1: db"NAME: amy       ",00H
  74. TAB:  db"Tel:13218892322 ",00H      
复制代码

所有资料51hei提供下载:
正确代码.zip (4.35 KB, 下载次数: 56)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶1 踩踩
回复

使用道具 举报

沙发
ID:302373 发表于 2018-4-15 19:44 | 只看该作者
厉害啊
回复

使用道具 举报

板凳
ID:222443 发表于 2018-4-26 23:14 | 只看该作者
CLR RS
CLR E
CLR RW
MOV SP,#60H   
MOV P0,#01H ;清屏   
CLR RS    ;送命令   
CLR RW   
CLR E   
RS RW E为什么多次置0
回复

使用道具 举报

地板
ID:313328 发表于 2018-6-4 20:50 | 只看该作者
学习了，感谢
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表