The Hobbit: Routine at 6FD3

6FD3: Clear Screen

Used by the routine at SquiggleLine.
ClearScreen	6FD3	PUSH HL	Push HL, DE and BC onto the stack.
	6FD4	PUSH DE
	6FD5	PUSH BC
	6FD6	LD A,$07	Set the border colour to white.
	6FD8	OUT ($FE),A	Set the border colour to white.
	6FDA	LD HL,$4000	Write $00 to $1800 memory locations (clearing the screen buffer).
	6FDD	LD DE,$4001
	6FE0	LD BC,$1800
	6FE3	LD (HL),$00
	6FE5	LDIR
	6FE7	LD BC,$0300	Write $38 to the following $300 memory locations (the attribute buffer).
	6FEA	LD (HL),$38
	6FEC	LDIR
	6FEE	POP BC	Pop HL, DE and BC from the stack.
	6FEF	POP DE
	6FF0	POP HL
	6FF1	RET	Return.