8-7-2.asm

书籍8051入门篇

;8-7-2.ASM
BUFFER	DATA	20H
$MOD51
	ORG	0000H
	MOV	SP,#50H		;知道为什么要设定堆栈STACK?
	MOV	A,#00H		;累加器=00H
	MOV	BUFFER,A	;(20H)=00H
LOOP:	MOV	P1,BUFFER	;P1=(BUFFER)
	INC	BUFFER		;将BUFFER内容加上1
	ACALL	DELAY		;延迟一小段时间
	SJMP	LOOP
;ROUTINE
;为时间延迟用
DELAY:	MOV	R0,#00H
DLY:	MOV	R1,#00H	
	DJNZ	R1,$
	DJNZ	R0,DLY
	RET
	END