单片机试验代码2

最新推荐文章于 2023-12-23 18:58:35 发布

依稀记得那一天

最新推荐文章于 2023-12-23 18:58:35 发布

阅读量717

点赞数

LOOP:
	MOV A,#01H
	MOV R2,#8
	OUTPUT:
	MOV P1,A
	RL A
	LCALL DELAY
	DJNZ R2,OUTPUT
	LJMP LOOP
DELAY:
	MOV R6,#0
	MOV R7,#0
	DELAYLOOP:
	DJNZ R6,DELAYLOOP
	DJNZ R7,DELAYLOOP
	RET
END

KEYLEFT EQU P1.0
KEYRIGHT EQU P1.1
LEDLEFT EQU P1.2
LEDRIGHT EQU P1.3
	SETB KEYLEFT
	SETB KEYRIGHT
LOOP:
	MOV C,KEYLEFT
	MOV LEDLEFT,C
	MOV C,KEYRIGHT
	MOV LEDRIGHT,C
	LJMP LOOP
	END

AA:CLR P1.0
	MOV R0,#10H
	LCALL DELY
	LCALL DELY
	NOP
	SETB P1.0
	LCALL DELY
	LCALL DELY
	SJMP AA
	DELY:MOV R5,#02H
	DELY1:MOV R7,#00H
	DELY2:DJNZ R7,DELY2
		  DJNZ R6,DELY2
		  DJNZ R5,DELY2
		  RET
		  END