标题: 51单片机控制循环彩灯 汇编程序 [打印本页]
作者: 单单单片机就好    时间: 2017-8-1 22:16
标题: 51单片机控制循环彩灯 汇编程序

  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

复制代码



新建文件夹.zip (11.76 KB, 下载次数: 18)
包含程序和原理图
作者: sy974631    时间: 2018-7-18 09:50
哇 正在做实验 需要这个



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