	ORG	0h
	ljmp	label0
label4:	ljmp	label1
label0:	mov	SP, #0Bh
	lcall	label2
	mov	A, DPL
	jz	label3
	ljmp	label4
label3:	mov	R1, #0h
	mov	A, R1
	orl	A, #0h
	jz	label5
	mov	R2, #0h
	mov	DPTR, #084h
	mov	R0, #0h
	mov	P2, #0h
label7:	clr	A
	movc	A, @A+DPTR
	movx	@R0, A
	inc	DPTR
	inc	R0
	cjne	R0, #0h, label6
	inc	P2
label6:	djnz	R1, label7
	djnz	R2, label7
	mov	P2, #0FFh
label5:	clr	A
	mov	R0, #7Fh
label8:	mov	@R0, A
	djnz	R0, label8
	mov	R0, #0h
	mov	A, R0
	orl	A, #0h
	jz	label9
	mov	R1, #0h
	mov	P2, #0h
	clr	A
label10:
	movx	@R1, A
	inc	R1
	djnz	R0, label10
label9:	mov	R0, #0h
	mov	A, R0
	orl	A, #0h
	jz	label11
	mov	R1, #0h
	mov	DPTR, #000h
	clr	A
label12:
	movx	@DPTR, A
	inc	DPTR
	djnz	R0, label12
	djnz	R1, label12
label11:
	clr	A
	mov	8h, A
	mov	9h, A
	mov	0Ah, A
	mov	0Bh, A
	ljmp	label4
label1:	inc	8h
	clr	A
	cjne	A, 8h, label13
	inc	9h
	cjne	A, 9h, label13
	inc	0Ah
	cjne	A, 0Ah, label1
	inc	0Bh
label13:
	sjmp	label1
	ret
label2:	mov	DPL, #0h
	ret

	END
