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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › LED数码管拉幕设计 程序和仿真
返回列表 发新帖
查看: 2268|回复: 1
打印 上一主题 下一主题
收起左侧

LED数码管拉幕设计 程序和仿真

[复制链接]
跳转到指定楼层
楼主
ID:31505 发表于 2016-6-7 10:45 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
51单片机做的LED数码管拉幕仿真

  1.     DISPBUF EQU 30H
  2.     DISPCNT EQU 38H
  3.     DISPBIT EQU 39H
  4.     T1CNTA  EQU 3AH
  5.     T1CNTB  EQU 3BH
  6.     CNT     EQU 3CH
  7.     ORG 00H
  8.     LJMP START
  9.     ORG 0BH
  10.     LJMP INT_T0
  11. START:
  12.     MOV DISPCNT,#8
  13.     MOV R1,#DISPBUF
  14. LP:
  15.     MOV A,#10
  16.     MOV @R1,A
  17.     INC R1
  18.     DJNZ DISPCNT,LP
  19.     MOV DISPBIT,#00H
  20.     MOV T1CNTA,#00H
  21.     MOV T1CNTB,#00H
  22.     MOV CNT,#00H
  23.     MOV TMOD,#01H
  24.     MOV TH0,#(65536-1000) / 256
  25.     MOV TL0,#(65536-1000) MOD 256
  26.     SETB TR0
  27.     SETB ET0
  28.     SETB EA
  29.     SJMP $
  30. INT_T0:
  31.     MOV TH0,#(65536-1000) / 256
  32.     MOV TL0,#(65536-1000) MOD 256
  33.     MOV A,#0FFH
  34.     MOV P1,A
  35.     MOV A,DISPBIT
  36.     ADD A,#DISPBUF
  37.     MOV R0,A
  38.     MOV A,@R0
  39.     MOV DPTR,#TABLE
  40.     MOVC A,@A+DPTR
  41.     MOV P0,A
  42.     MOV A,P1
  43.     ANL A,#0F8H
  44.     ADD A,DISPBIT
  45.     MOV P1,A
  46.     INC DISPBIT
  47.     MOV A,DISPBIT
  48.     CJNE A,#08H,NEXT
  49.     MOV DISPBIT,#00H
  50. NEXT:
  51.     INC T1CNTA
  52.     MOV A,T1CNTA
  53.     CJNE A,#50,LL1
  54.     MOV T1CNTA,#00H
  55.     INC T1CNTB
  56.     MOV A,T1CNTB
  57.     CJNE A,#8,LL1
  58.     MOV T1CNTB,#00H
  59.     INC CNT
  60.     MOV A,CNT
  61.     CJNE A,#9,LLX
  62.     MOV CNT,#00H
  63.     MOV A,CNT
  64. LLX:
  65.     CJNE A,#01H,NEX1
  66.     MOV 30H,#8
  67. LL1:
  68.     LJMP DONE
  69. NEX1:
  70.     CJNE A,#02H,NEX2
  71.     MOV 31H,#7
  72.     MOV 30H,#8
  73.     LJMP DONE
  74. NEX2:
  75.     CJNE A,#03H,NEX3
  76.     MOV 32H,#6
  77.     MOV 31H,#7
  78.     MOV 30H,#8
  79.     LJMP DONE
  80. NEX3:
  81.     CJNE A,#04H,NEX4
  82.     MOV 33H,#5
  83.     MOV 32H,#6
  84.     MOV 31H,#7
  85.     MOV 30H,#8
  86.     LJMP DONE
  87. NEX4:
  88.     CJNE A,#05H,NEX5
  89.     MOV 34H,#4
  90.     MOV 33H,#5
  91.     MOV 32H,#6
  92.     MOV 31H,#7
  93.     MOV 30H,#8
  94.     LJMP DONE
  95. NEX5:
  96.     CJNE A,#06H,NEX6
  97.     MOV 35H,#3
  98.     MOV 34H,#4
  99.     MOV 33H,#5
  100.     MOV 32H,#6
  101.     MOV 31H,#7
  102.     MOV 30H,#8
  103.     LJMP DONE
  104. NEX6:
  105.     CJNE A,#07H,NEX7
  106.     MOV 36H,#2
  107.     MOV 35H,#3
  108.     MOV 34H,#4
  109.     MOV 33H,#5
  110.     MOV 32H,#6
  111.     MOV 31H,#7
  112.     MOV 30H,#8
  113.     LJMP DONE
  114. NEX7:
  115.     CJNE A,#08H,NEX8
  116.     MOV 37H,#1
  117.     MOV 36H,#2
  118.     MOV 35H,#3
  119.     MOV 34H,#4
  120.     MOV 33H,#5
  121.     MOV 32H,#6
  122.     MOV 31H,#7
  123.     MOV 30H,#8
  124.     LJMP DONE
  125. NEX8:
  126.     CJNE A,#00H,DONE
  127.     MOV 37H,#10
  128.     MOV 36H,#10
  129.     MOV 35H,#10
  130.     MOV 34H,#10
  131.     MOV 33H,#10
  132.     MOV 32H,#10
  133.     MOV 31H,#10
  134.     MOV 30H,#10
  135. LL:    LJMP DONE
  136. DONE:  RETI
  137. TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H
  138. ;
  139. END
复制代码



led拉幕设计.zip (72.02 KB, 下载次数: 9)


LED数码管, 程序

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

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

相关帖子
回复

使用道具 举报

沙发
ID:125152 发表于 2016-6-8 00:59 | 只看该作者
学习学习！
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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