jk4-2.asm

来自「微机原理课程 所有讲义PPT 课程全实验（包括代码程序设计实验报告） 习」· 汇编 代码 · 共 47 行

ORG	0000H
	LJMP	P1MAIN2
	ORG	0830H
P1MAIN2:	MOV	SP,#5FH
	MOV	30H,#80H
	MOV	P1,#0FH
P1L0:	JB	P1.0,P1L2
	MOV	A,30H
	RR	A
	JNB	ACC.3,P1L1
	MOV	A,#80H
P1L1:	MOV	30H,A
	ORL	A,#0FH
	MOV	P1,A
	LCALL	D200Ms
	SJMP	P1L0
P1L2:	JB	P1.1,P1L3
	MOV	A,30H
	RL	A
	JNB	ACC.0,P1L1
	MOV	A,#10H
	SJMP	P1L1
P1L3:	JB	P1.2,P1L4
	MOV	A,30H
	RL	A
	JNB	ACC.0,P1L1
	MOV	A,#30H
	SJMP	P1L1
P1L4:	JB	P1.3,P1L0
	MOV	A,30H
	RR	A
	JNB	ACC.3,P1L1
	MOV	A,#0C0H
	SJMP	P1L1
D200Ms:	MOV	R7,#200
DLP:	LCALL	DIMS
	DJNZ	R7,DLP
	RET
DIMS:	PUSH	30H
	MOV	30H,#0F8H
DILP:	NOP
	NOP
	DJNZ	30H,DILP
	POP	30H
	RET
	END