标题: 用于单片机跑马灯的汇编语言程序 [打印本页]
作者: 77777790    时间: 2017-9-29 15:55
标题: 用于单片机跑马灯的汇编语言程序
一个有多功能的跑马灯

  1.         ORG    0000H
  2. LJMP MAIN1

  4. ORG 0040H
  5. MAIN1: MOV A,#0001H
  6.            MOV 10H,#0001H
  7.        MOV 40H,#0003H
  8.            MOV 50H,#0007H
  9.              MOV 60H,#000FH
  10.            SETB EX0
  11.        SETB ET0
  12.        SETB EA
  13.            MOV R0,#30H
  14.            MOV R1,#70H
  15.            MOV 30H,#00H
  16.            MOV R5,#00H
  17.            MOV R6,#00H
  18.           
  19. MAIN2:
  20.           
  21.             MOV @R0,P0
  22.         ANL 30H,#0003H
  23.         CJNE R6,#0001H,LOOP2

  25. LOOP1:MOV A,10H
  26.     CJNE @R0,#0003H,CC11
  27.         MOV P2,A    ;将控制字送端口
  28.     RL A    ;控制字循环左移
  29.                 MOV 10H,A
  30.     LCALL DELAY    ;延时
  31.         LJMP MAIN2
  32. LOOP2: MOV A,10H
  33.   CJNE @R0,#0003H,CC21
  34. MOV P2,A
  35.      RR A
  36.            MOV 10H,A
  37.      LCALL DELAY
  38.      LJMP MAIN2


  41. CC11:  
  42. MOV A,40H
  43. CJNE @R0,#0002H,CC12
  44.         MOV P2,A
  45.         RL A
  46.         MOV 40H,A
  47.     LCALL DELAY    ;延时
  48.         LJMP MAIN2
  49. CC12:
  50. MOV A,50H
  51. CJNE @R0,#0001H,CC13
  52.          MOV P2,A
  53.          RL A
  54.          MOV 50H,A
  55.     LCALL DELAY    ;延时
  56.         LJMP MAIN2
  57. CC13:
  58. MOV A,60H
  59.          MOV P2,A
  60.          RL A
  61.          MOV 60H,A
  62.     LCALL DELAY    ;延时
  63.         LJMP MAIN2
  64. CC21:
  65.      MOV A,40H
  66.      CJNE @R0,#0002H,CC22
  67.          MOV P2,A
  68.      RR A
  69.          MOV 40H,A
  70.      LCALL DELAY
  71.      LJMP MAIN2
  72. CC22:  MOV A,50H
  73. CJNE @R0,#0001H,CC23
  74.           MOV P2,A
  75.      RR A
  76.          MOV 50H,A
  77.      LCALL DELAY
  78.      LJMP MAIN2
  79. CC23: MOV A,60H
  80.          MOV P2,A
  81.          RR A
  82.          MOV 60H,A
  83.     LCALL DELAY    ;延时
  84.         LJMP MAIN2

  86. DELAY:     ;延时大概1秒
  87. MOV        @R1,P0
  88. ANL 70H,#000CH
  89. CJNE @R1,#000CH,DD1
  90. MOV R2,#10
  91. DLY1:
  92.     MOV R3,#200
  93. DLY2:
  94.     MOV R4,#250
  95.     DJNZ R4,$
  96.     DJNZ R3,DLY2
  97.     DJNZ R2,DLY1
  98.     RET
  99. DD1:CJNE @R1,#0008H,DD2
  100.   MOV R2,#5
  101. DLY3:
  102.     MOV R3,#100
  103. DLY4:
  104.     MOV R4,#250
  105.     DJNZ R4,$
  106.     DJNZ R3,DLY4
  107.     DJNZ R2,DLY3
  108.     RET

  110. DD2:  CJNE @R1,#0004H,DD3
  111.         MOV R2,#5
  112. DLY5:
  113.     MOV R3,#100
  114. DLY6:
  115.     MOV R4,#100
  116.     DJNZ R4,$
  117.     DJNZ R3,DLY6
  118.     DJNZ R2,DLY5
  119.     RET
  120. DD3:
  121.                  MOV R2,#20
  122. DLY7:
  123.     MOV R3,#250
  124. DLY8:
  125.     MOV R4,#250
  126.     DJNZ R4,$
  127.     DJNZ R3,DLY8
  128.     DJNZ R2,DLY7
  129.     RET


  132.        
  133.         END
复制代码


paomadeng.zip

718 Bytes, 下载次数: 5, 下载积分: 黑币 -5

asm
作者: sadlucky1996    时间: 2017-9-29 21:43
刚学了单片机。看到汇编不错，谢谢分享



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