111.ams

this procedure is a game of basketball or subsystems time, the competition will record the entire ti

		ORG		0000H
		AJMP 	LK1
		ORG 	 000BH
		AJMP	CTCO
		ORG		0013H
		AJMP	CXT
LK1:	MOV		33H,#00H
		MOV 	34H,#00H
		MOV 	35H,#00H
		MOV 	36H,#00H
		MOV 	37H,#00H
		MOV 	38H,#00H
		MOV 	39H,#00H
		MOV 	40H,#00H
		MOV 	41H,#00H
		CLR		P0.0
MP:		CLR		P2.0
		CLR		P2.1
		CLR		P2.2
		CLR		P2.3
		MOV		P1,#00H
		NOP
		NOP
		SETB	P2.0
		SETB	P2.1
		SETB	P2.2
		SETB	P2.3
		MOV		42H,#05H
		MOV		43H,#09H

		MOV		SCON,#00H
		CLR		P3.7
		MOV		R1,#33H
		MOV		R2,#06H
LP3:		MOV		A,@R1
		MOV		DPTR,#TAB
		MOVC	A,@A+DPTR
		MOV		SBUF,A
		JNB		TI,$
		CLR		TI
		INC		R1
		DJNZ	R2,LP6
		SETB	P3.7
LK3:	JB		P2.4,LK6
		ACALL	D10MS
		JB		P2.4,LK3
		ACALL	D2S
LK4:	JB		P2.4,LK3
		CLR		P2.0
		MOV		P1,40H
		SETB	P2.0
		ACALL	D2S
		INC		40H
		MOV		A,40H
		CJNE	A,#0AH,LK4
		MOV		40H,#00H
		AJMP	LK4
LK6:	JB		P2.5,LK5
		ACALL	D10MS
		JB		P2.5,LK6
		ACALL	D2S
LK7:	JB		P2.5,LK6
		CLR		P2.1
		MOV		P1,41H
		SETB	P2.1
		ACALL	D2S
		INC		41H
		MOV		A,41H
		CJNE	A,#0AH,LK7
		MOV		41H,#00H
		CJNE	A,#0AH,LK7
		MOV		41H,#00H
		AJMP	LK7

LK5:	JB		P2.6,LK3
		ACALL	D10MS
		JB		P2.6,LK5
		CLR		P2.2
		MOV		P1,42H
		NOP
		NOP
		SETB	P2.2
		CLR		P2.3
		MOV		P1,43H
		NOP
		NOP
		SETB	P2.3
		SETB	P0.0
		MOV		TMOD,#01H
		MOV		TL0,#0B0H
		MOV		TH0,#3CH
		SETB	ET0
		SETB	EX1
		CLR		IT0
		SETB	TR0
		MOV		R0,#14H
		SJMP	$
CTCO:	JNB 	P2.6,LK8
		DJNZ	R0,NEXT
		MOV		R0,#14H
		DEC		43H
		CLR		P2.3
		MOV		P1,43H
		NOP
		NOP
		SETB	P2.3
		CLR		P2.2
		MOV		P1,42H
		NOP
		NOP
		SETB	P2.2
		CLR		P2.1
		MOV		P1,41H
		NOP
		NOP
		SETB	P2.1

		CLR		P2.0
		MOV		P1,40H
		NOP
		NOP
		SETB	P2.O
		MOV		A,43H
		CJNE	A,#00H,NEXT
		MOV		43H,#0AH
		MOV		A,42H
		CJNE	A,#00H,LP3
		MOV		42H,#05H
		MOV		A,41H
		CJNE	A,#00H,LP2
		MOV		41H,#00H,LP2
		MOV		41H,#09H
		MOV		A,40H
		CJNE	A,#00H,LP1
		CLR		P0.0
		CLR		P3.6
		ACALL	D10S
		SETB	P3.6
KP11:	JB		P2.6 ,KP11
		AJMP	KP12
LK8:	ACALL	D10MS
		JB		P2.6,CTCO
		CLR		P0.0
LK9:	JNB		P2.6,LK9
LK10:	JB		P2.6,LK10
		SETB	P0.0
		AJMP	CTCO
P3:		DEC		42H
		AJMP	NEXT
LP1:	DEC		41H
		AJMP	NEXT
LP2:	DEC		41H
NEXT:	MOV		TL0,#0B0H
		MOV		TH0,#3CH
		RETI
KP12:	MOV		A,33H
		XCH		A,36H
		MOV		33H,A
		MOV		A,34H
		XCH		A,37H
		MOV		34H,A
		MOV		A,35H
		XCH		A,38H
		MOV		35H,A
		AJMP	MP
CXT:	JNB		P3.5,KP1
		JNB		P3.4,KP2
		JNB		P0.2,KP3
		JNB		P0.1,KP4
KP1:	JNC		36H
		MOV		A,36H
		CJNE	A,#0AH,KP5
		MOV		36H,#00H
		INC		37H
		MOV 	A,37H
		CJNE	A,#0AH,KP5
		MOV		37H,#00H
		INC		38H
		AJMP	KP5
KP2:	MOV		A,36H
		CJNE	A,#00H,AP1
		MOV		36H,#09H
		DEC		37H
		AJMP	KP5
AP1:	DEC		36H
		AJMP	KP5
KP3:	INC		33H
		MOV		A,33H
		CJNE	A,#0AH,KP5
		MOV		33H,#00H
		INC		34H
		MOV		A,34H
		CJNE	A,#0AH,KP5
		MOV		A,34H
		CJNE	A,#0AH,KP5
		MOV		34H,#00H
		INC		35H
		AJMP	KP5
KP4:	MOV		A,33H
		CJNE	A,#00H,AP2
		MOV		34H,#09H
		DEC		35H
		AJMP	KP5
AP2:	DEC		34H

KP5:	CLR		P3.7
		MOV		R1,#33H
		MOV		R2,#06H
LP6:	MOV		A,@R1
		MOV		DPTR,#TAB
		MOVC	A,@A+DPTR
		MOV		SBUF,A
		JNB		TI,$
		CLR		TI	
		INC		R1
		DJNZ	R2,LP6
		SETB	P3.7
KP6:	JNB		P3.3,KP6
KP:		RETI
TAB:	DB	3FH,06,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H
D10S:	MOV		50H,#05H
D2S:	MOV		R3,#0AH
D200MS:	MOV		R7,#14H
D10MS:	MOV		R6,#05H
LOOP3:	MOV		R5,#0F9H
		NOP
		NOP
LOOP2:	DJNZ	R5,LOOP2
		DJNZ	R6,LOOP3
		DJNZ	R7,D10MS
		DJNZ	R3,D200MS
		DJNZ	50H,D2S
		RET


END