找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 2797|回復(fù): 1
收起左側(cè)

LED數(shù)碼管拉幕設(shè)計(jì) 程序和仿真

[復(fù)制鏈接]
ID:31505 發(fā)表于 2016-6-7 10:45 | 顯示全部樓層 |閱讀模式
51單片機(jī)做的LED數(shù)碼管拉幕仿真
0.png
  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
復(fù)制代碼

0.png

led拉幕設(shè)計(jì).zip (72.02 KB, 下載次數(shù): 9)


評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

相關(guān)帖子
回復(fù)

使用道具 舉報(bào)

ID:125152 發(fā)表于 2016-6-8 00:59 | 顯示全部樓層
學(xué)習(xí)學(xué)習(xí)！
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表