16.asm

刚学时编的小程序

/*ORG 0000h
JMP BEGIN

BEGIN:
MOV SP,#60H
LOOP:
CPL P3.7
MOV R5,#10
CALL DELAY
JMP LOOP

DELAY:
MOV R6,#50
XXXX:
MOV R7,#100
DJNZ R7,$
DJNZ R6,XXXX
DJNZ R5,DELAY
RET
END

ORG 0
START: CLR P1.0
LCALL DELAY
SETB P1.0
LCALL DELAY
LJMP START
DELAY: MOV R5,#20 ;延时子程序，延时0.2秒
D1: MOV R6,#20
D2: MOV R7,#248
DJNZ R7,$
DJNZ R6,D2
DJNZ R5,D1
RET
END	*/


		ORG 0000H
		LJMP MAIN
MAIN:	MOV SP,#60H
L1:		MOV A,#0FEH
		MOV R7,#08H

L2:		MOV P1,A
		RL A
		LCALL DELAY
		DJNZ R7,L2
		LJMP L1

DELAY:	MOV R4,#08H
DE2:	LCALL DELAY1
		DJNZ R4,DE2
		RET
DELAY1:	MOV R6,#0
		MOV R5,#0
DE1:	DJNZ R5,$
		DJNZ R6,DE1
		RET
		END