ex4-4.asm

《增强型8051单片机实用开发技术》例程代码

$INCLUDE  (STC12C5A.INC)  		;包含STC12C5A60S2单片机寄存器定义文件
		ORG		0000H
		LJMP	MAIN
		ORG		0100H
MAIN:	MOV		SP,#70H			;设置堆栈指针
		MOV		DPTR,#0000H
		MOV		R2,#10H
		CLR		A
LOOP1:	MOVX	@DPTR,A
		INC		DPTR
		DJNZ	R2,LOOP1		;将XRAM 0000H~000FH单元的内容清零
		SETB	P1.0
LOOP2:	CPL		P1.0
		LCALL	DELAY
		LJMP	LOOP2			;输出方波
DELAY: 	MOV		R2,#100 		;10ms延时子程序
DLY_LOOP:
		MOV		R7,#150
LOOP:	DJNZ	R7,LOOP
		DJNZ	R2,DLY_LOOP
		RET
		END