	;--- mask_top
	LD	A,#80
	OR	(HL)
	LD	(HL),A
	DEC	L
	LD	A,#01
	OR	(HL)
	LD	(HL),A
	INC	H
	;--- mask_top
	LD	A,#07
	OR	(HL)
	LD	(HL),A
	INC	L
	LD	A,#E0
	OR	(HL)
	LD	(HL),A
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;--- mask_top
	LD	A,#F8
	OR	(HL)
	LD	(HL),A
	DEC	L
	LD	A,#1F
	OR	(HL)
	LD	(HL),A
	INC	H
	;--- mask_top
	LD	A,#7E
	OR	(HL)
	LD	(HL),A
	INC	L
	LD	A,#7E
	OR	(HL)
	LD	(HL),A
	INC	H
	INC	L
	;--- mask_bottom
	LD	A,#80
	OR	(HL)
	LD	(HL),A
	DEC	L
	LD	(HL),#1F
	DEC	L
	LD	(HL),#F8
	DEC	L
	LD	A,#01
	OR	(HL)
	LD	(HL),A
	INC	H
	;--- mask_bottom
	LD	A,#07
	OR	(HL)
	LD	(HL),A
	INC	L
	LD	(HL),#E0
	INC	L
	LD	(HL),#07
	INC	L
	LD	A,#E0
	OR	(HL)
	LD	(HL),A
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;--- mask_bottom
	LD	A,#F8
	OR	(HL)
	LD	(HL),A
	DEC	L
	LD	(HL),#01
	DEC	L
	LD	(HL),#80
	DEC	L
	LD	A,#1F
	OR	(HL)
	LD	(HL),A
	INC	H
	;--- mask_bottom
	LD	A,#7E
	OR	(HL)
	LD	(HL),A
	INC	L
	LD	(HL),#00
	INC	L
	LD	(HL),#00
	INC	L
	LD	A,#7E
	OR	(HL)
	LD	(HL),A
	INC	H
	INC	HL
	;---
	LD	SP,HL
	LD	DE,#1F00
	LD	BC,#00F8
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#0700
	LD	BC,#00E0
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	LD	DE,#0300
	LD	BC,#00C0
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	LD	DE,#0700
	LD	BC,#00E0
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#1F00
	LD	BC,#00F8
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#7E00
	LD	BC,#007E
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#F801
	LD	BC,#801F
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	LD	DE,#E007
	PUSH	DE
	PUSH	DE
	INC	H
	;---
	LD	SP,HL
	LD	DE,#801F
	LD	BC,#F801
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#007E
	LD	BC,#7E00
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#00F8
	LD	BC,#1F00
	PUSH	DE
	PUSH	BC
	;------ check down
	INC	H	
	LD	A,H
	AND	7
	JP	NZ,1F
	LD	A,L
	ADD	A,#20
	LD	L,A
	JP	C,1F
	LD	A,H
	SUB	8
	LD	H,A
1	;---
	;---
	LD	SP,HL
	LD	DE,#00E0
	LD	BC,#0700
	PUSH	DE
	PUSH	BC
	INC	H
	;---
	LD	SP,HL
	LD	DE,#0080
	LD	BC,#0100
	PUSH	DE
	PUSH	BC
