The Hobbit: Routine at 6FD3

6FD3: Clear Screen

Used by the routine at SquiggleLine.
ClearScreen	6FD3	PUSH HL	Stash HL, DE and BC on 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 INK: BLACK, PAPER: WHITE to the following 0300 memory locations (the attribute buffer).
	6FEA	LD (HL),$38
	6FEC	LDIR
	6FEE	POP BC	Restore BC, DE and HL from the stack.
	6FEF	POP DE
	6FF0	POP HL
	6FF1	RET	Return.