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

QQ登錄

只需一步，快速開始

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

51單片機(jī)控制循環(huán)彩燈 匯編程序

[復(fù)制鏈接]
ID:219126 發(fā)表于 2017-8-1 22:16 | 顯示全部樓層 |閱讀模式
0.png
  1. ORG 0000H
  2. ljmp LOOP1
  3. org 0030H
  4. LOOP1:                MOV R1,#00H
  5. NEXT:                MOV A,R1
  6.                 MOV DPTR,#TABLE
  7.                 MOVC A,@A+DPTR
  8.                 MOV P0,A
  9.                 LCALL DELAY
  10.                 MOV DPTR,#TABL
  11.                 MOV A,P1
  12.                 ANL A,#08H
  13.                 RL A
  14.                 JMP @A+DPTR
  15.                 INC R1
  16.                 CJNE R1,#10,NEXT
  17.                 LJMP LOOP1
  18. org 1000h
  19. TABL:    AJMP CS0
  20.          AJMP CS1
  21.                  AJMP CS2
  22.                  AJMP CS3
  23.                  AJMP CS4
  24.                   AJMP CS5
  25.                  AJMP CS6
  26.                  AJMP CS7
  27. CSO:MOV P1,#00000001B
  28.     LCALL DELAY
  29. CS1:MOV P1,#00000011B
  30.     LCALL DELAY
  31. CS2:MOV P1,#00000111B
  32.     LCALL DELAY
  33. CS3:MOV P1,#00001111B
  34.     LCALL DELAY
  35. CS4:MOV P1,#00011111B
  36.     LCALL DELAY
  37. CS5:MOV P1,#00111111B
  38.     LCALL DELAY
  39. CS6:MOV P1,#01111111B
  40.     LCALL DELAY
  41. CS7:MOV P1,#11111111B
  42.     LCALL DELAY
  43. DELAY:                MOV R5,#20
  44. D2:                MOV R6,#20
  45. D1:                MOV R7,#248
  46.                 DJNZ R7,$
  47.                 DJNZ R6,D1
  48.                 DJNZ R5,D2
  49.                 RET
  50. TABLE:                DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH         
  51. END

復(fù)制代碼



新建文件夾.zip (11.76 KB, 下載次數(shù): 18)
包含程序和原理圖

評(píng)分

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

查看全部評(píng)分

回復(fù)

使用道具 舉報(bào)

ID:364157 發(fā)表于 2018-7-18 09:50 來(lái)自手機(jī) | 顯示全部樓層
哇 正在做實(shí)驗(yàn) 需要這個(gè)
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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