bcdled.asm

来自「Proteus的8051仿真经典实例」· 汇编 代码 · 共 24 行

	ORG 00H
	JMP START
	ORG 30H
START:	MOV P2,#00100001B	;最左边显示2
	CALL DELAY	;延迟
;--------------------------------------
	MOV P2,#00000010B	;第2位显示0
	CALL DELAY	;延迟
;--------------------------------------
	MOV P2,#00000100B	;第3位显示0
	CALL DELAY	;延迟
;-------------------------------------
	MOV P2,#10001000B	;第4位显示8
	CALL DELAY	;延迟
	JMP START
;------------------------------------
DELAY:	MOV R0,#10
DELAY0:	MOV R7,#100
DELAY1:	MOV R6,#250
	DJNZ R6,$
	DJNZ R7,DELAY1
	DJNZ R0,DELAY0
	RET
	END