The Hobbit: Routine at 80F5

80F5: Up one attribute row, if it can

Used by the routine at RUN_PICTURE.
ATTR_UP	80F5	PUSH AF
	80F6	PUSH DE
	80F7	LD DE,$0020	Up a row: 32 cells back
	80FA	AND A
	80FB	SBC HL,DE
	80FD	LD A,H	Above $5800? Then undo it
	80FE	CP $57
	8100	JR NZ,ATTR_UP_0
	8102	ADD HL,DE
ATTR_UP_0	8103	POP DE
	8104	POP AF
	8105	RET