The Hobbit: Routine at 28627

28627: Clear Screen

Used by the routine at SquiggleLine.
ClearScreen	28627	PUSH HL	Push HL, DE and BC onto the stack.
	28628	PUSH DE
	28629	PUSH BC
	28630	LD A,7	Set the border colour to white.
	28632	OUT (254),A	Set the border colour to white.
	28634	LD HL,16384	Write $00 to $1800 memory locations (clearing the screen buffer).
	28637	LD DE,16385
	28640	LD BC,6144
	28643	LD (HL),0
	28645	LDIR
	28647	LD BC,768	Write $38 to the following $300 memory locations (the attribute buffer).
	28650	LD (HL),56
	28652	LDIR
	28654	POP BC	Pop HL, DE and BC from the stack.
	28655	POP DE
	28656	POP HL
	28657	RET	Return.