four dynamic display .asm

89C51单片机实现四位数码管动态显示

;=================================================
; 简单实现四位数码管动态显示    
;=================================================


LED1	EQU	08H
LED2	EQU	09H
LED3	EQU	0AH
LED4	EQU	0BH


ORG 0000H 
LJMP START;转入主程序
ORG 0010H 

START:
	MOV	SP,#60H
	MOV	DPTR,#TABLE

MAIN:

	MOV	LED1,#1
	MOV	LED2,#2
	MOV	LED3,#3
	MOV	LED4,#4

SCAN:


	MOV	A,LED1
	MOVC	A,@A+DPTR
	MOV	P0,A
	CLR	P2.7
	LCALL	DELAY1MS
	SETB	P2.7

	MOV	A,LED2
	MOVC	A,@A+DPTR
	MOV	P0,A
	CLR	P2.6
	LCALL	DELAY1MS
	SETB	P2.6

	MOV	A,LED3
	MOVC	A,@A+DPTR
	MOV	P0,A
	CLR	P2.5
	LCALL	DELAY1MS
	SETB	P2.5

	MOV	A,LED4
	MOVC	A,@A+DPTR
	MOV	P0,A
	CLR	P2.4
	LCALL	DELAY1MS
	SETB	P2.4

LJMP	SCAN


DELAY1MS: 
	MOV	R4,#2
DELAY10MSA:
	MOV	R5,#247
	DJNZ	R5,$
	DJNZ	R4,DELAY10MSA
RET

TABLE:
	DB	00101000B	;0
	DB	11101011B	;1
	DB	00110010B	;2
	DB	10100010B	;3
	DB	11100001B	;4
	DB	10100100B	;5
	DB	00100100B	;6
	DB	11101010B	;7
	DB	00100000B	;8
	DB	10100000B	;9
	DB	01100000B	;A
	DB	00100101B	;b
	DB	00111100B	;C
	DB	00100011B	;d
	DB	00110100B	;E
	DB	01110100B	;F
	DB	11110111B	;-
	DB	11111111B	;
END