The Hobbit: Routine at 9E34

9E34: Routine at 9E34

Used by the routines at LocationLit, 9DD9, 9F94 and A55F.
9E34	PUSH IX	Stash IX on the stack.
9E36	LD IX,($B70C)	IX=ptrCurObject.
9E3A	CALL $9E40	Call 9E40.
9E3D	POP IX	Restore IX from the stack.
9E3F	RET	Return.
This entry point is used by the routine at 9DD9.
9E40	BIT 7,(IY+$07)	Return if the object is not "visible".
9E44	RET Z	Return if the object is not "visible".
9E45	PUSH IY	Stash IY, IX and BC on the stack.
9E47	PUSH IX
9E49	PUSH BC
9E4A	LD B,A	B=the object ID.
9E4B	LD C,(IX+$10)	C=your current location ID.
9E4E	PUSH IY
9E50	CALL ContainerLit
9E53	CP B
9E54	LD B,A
9E55	POP IX
9E57	JR Z,$9E72
9E59	CALL ContainerLit
9E5C	CP B
9E5D	JR NZ,$9E6F
9E5F	INC A
9E60	JR NZ,$9E72
9E62	LD B,(IY+$00)
9E65	LD A,C
9E66	CP (IY+$10)
9E69	JR Z,$9E72
9E6B	INC IY
9E6D	DJNZ $9E66
9E6F	XOR A
9E70	JR $9E74
9E72	OR $01
9E74	POP BC	Restore BC, IX and IY from the stack.
9E75	POP IX
9E77	POP IY
9E79	RET	Return.