标题: 51单片机汇编语言流水灯Proteus仿真程序 [打印本页]

作者: 1751180087    时间: 2019-12-23 10:42
标题: 51单片机汇编语言流水灯Proteus仿真程序
流水灯


单片机源程序如下:
  1.                                  ORG 0000H
  2. MOV R2,#08H
  3. MAIN:JB P0.0,LOOP1
  4.      JB P0.1,LOOP2
  5.      JB P0.2,LOOP3
  6.      AJMP MAIN
  7. LOOP1:MOV R2,#08H
  8.       MOV A,#0FEH
  9.       AJMP BUTTON1
  10. BUTTON1:MOV P1,A
  11.         ACALL DELAY
  12.         RL A
  13.         JB P0.1,LOOP2
  14.         JB P0.2,LOOP3
  15.         DJNZ R2,BUTTON1
  16.         MOV R2,#08H
  17.         AJMP BUTTON1
  18. LOOP2:MOV R2,#08H
  19.       MOV A,#7FH
  20.       AJMP BUTTON2
  21. BUTTON2:MOV P1,A
  22.         RR A
  23.         JB P0.0,LOOP1
  24.         JB P0.2,LOOP3
  25.         ACALL DELAY
  26.         DJNZ R2,BUTTON2
  27.         SJMP LOOP2
  28. LOOP3:MOV R2,#08H
  29.       MOV A,#0FCH
  30.       AJMP BUTTON3
  31. BUTTON3:MOV P1,A
  32.         RL A
  33.         JB P0.0,LOOP1
  34.         JB P0.1,LOOP2
  35.         ACALL DELAY
  36.         DJNZ R2,BUTTON3
  37.         MOV R2,#08H
  38.         AJMP BUTTON3
  39. DELAY:MOV R3,#14H
  40.       MOV TMOD,#10H
  41.       MOV TH1,#3CH
  42.       MOV TL1,#0B0H
  43.       SETB TR1
  44. LP1:JBC TF1,LP2
  45.     SJMP LP1
  46. LP2:MOV TH1,#3CH
  47.     MOV TL1,#0B0H
  48.     DJNZ R3,LP1
  49.     RET
  50.     END
复制代码

所有资料51hei提供下载:
1.流水灯.rar (40.59 KB, 下载次数: 41)






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