s7-4.asm

51单片机程序教程

	ORG 0000H
	LJMP MAIN
	ORG 030H
MAIN:	MOV 20H,#00H
GOON:	MOV A,20H
	ANL A,#0FH
	MOV DPTR,#TAB
	MOVC A,@A+DPTR
	MOV P0,A
	MOV A,20H
	SWAP  A
	ANL A,#0FH
	MOVC A,@A+DPTR
	MOV P1,A
	ACALL DEL
	INC 20H
	AJMP GOON
DEL: 	MOV R7,#014H
DEL1:	MOV R6,#0FFH
DEL2:   MOV R5,#01FH
DEL3:	DJNZ R5,DEL3
	DJNZ R6,DEL2
	DJNZ R7,DEL1
	RET
	ORG 0100H
TAB:	DB 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H
	DB 080H,090H,088H,083H,0C6H,0A1H,086H,08EH
	END