原创 在 keil 中完成数字连续显示的程序

这是在keil中可以连续显示数字显示的数码管:

ORG 0000H
 MOV R3,#00H
LOOP: MOV DPTR,#TABLE
 MOV A,R3
 MOVC A,@A+DPTR
 MOV P0,A         ;字显码送至7段LED显示器段选
 MOV P2,#0FEH     ;位码显示
 ACALL D1S           ;延时1秒
 MOV A,R3
 ADD A,#1          ;十进制加法，把A的内容加1
 DA A
 ANL A,#0FH
 MOV R3,A
 AJMP LOOP
D1S: MOV R5,#50H
DL0: MOV R6,#250
DL1: MOV R7,200
DL2: DJNZ R7,DL2
 DJNZ R6,DL1
 DJNZ R5,DL0
 RET
TABLE: DB 11000000B
 DB 11111001B
 DB 10100100B
 DB 10110000B
 DB 10011001B
 DB 10010010B
 DB 10000010B
 DB 11111000B
 DB 10000000B
 DB 10010000B
 END