The Hobbit: Routine at A0C8

A0C8: Routine at A0C8

Used by the routine at YouSeeEntry.
A0C8	PUSH BC	Stash BC, DE, IY and IX on the stack.
A0C9	PUSH DE
A0CA	PUSH IY
A0CC	PUSH IX
A0CE	CALL $A0AE	Call A0AE.
A0D1	ADD IX,BC
A0D3	PUSH IX
A0D5	POP IY
A0D7	SUB A
A0D8	CP (IY+$01)
A0DB	JR Z,$A113
A0DD	LD A,(IY+$01)
A0E0	CALL LocateObject	Call LocateObject.
A0E3	BIT 7,(IX+$07)
A0E7	JR Z,$A113
A0E9	LD DE,$0008
A0EC	ADD IX,DE
A0EE	PUSH IX
A0F0	LD A,(IY+$00)
A0F3	CALL $A0BA	Call A0BA.
A0F6	CP $09
A0F8	JR C,$A104
A0FA	LD DE,$07B5
A0FD	JR Z,$A10A
A0FF	LD DE,$082B
A102	JR $A10A
A104	LD HL,$AE17	HL="to the[0x16]"
A107	CALL PrintMsg	Call PrintMsg.
A10A	CALL PrintToken	Call PrintToken.
A10D	LD HL,$B013	HL="there is[0x00][0x14]"
A110	CALL PrintMsg	Call PrintMsg.
A113	ADD IY,BC
A115	LD A,$FF
A117	CP (IY+$00)
A11A	JP NZ,$A0D7
A11D	POP IX	Restore IX, IY, DE and BC off the stack.
A11F	POP IY
A121	POP DE
A122	POP BC
A123	RET	Return.