The Hobbit: Routine at A050

A050: Routine at A050

Used by the routines at 910E and 9F94.
A050	PUSH IX	Stash IX, BC and DE on the stack.
A052	PUSH BC
A053	PUSH DE
A054	LD C,A
A055	CALL LocateObject
A058	LD A,(IX+$07)
A05B	AND $28
A05D	JR Z,$A097
A05F	LD A,C
A060	CALL ObjectCount
A063	CP $00
A065	JR Z,$A097
A067	BIT 6,(IX+$07)
A06B	JR Z,$A074
A06D	LD A,C
A06E	PUSH AF
A06F	LD HL,$ADF9
A072	JR $A08E
A074	LD HL,$039B
A077	DEC A
A078	JR Z,$A07D
A07A	LD HL,$0065
A07D	PUSH HL
A07E	LD L,(IX+$08)
A081	LD A,(IX+$09)
A084	AND $0F
A086	LD H,A
A087	PUSH HL
A088	CALL $A09D	Call A09D.
A08B	LD HL,$AFE0	HL="[0x01] there[0x01][0x14]"
A08E	CALL PrintMsg	Call PrintMsg.
A091	AND A
A092	POP DE	Restore DE, BC and IX off the stack.
A093	POP BC
A094	POP IX
A096	RET	Return.
A097	CALL $8583	Call 8583.
A09A	SCF
A09B	JR $A092	Jump back to A092.
This entry point is used by the routine at Action_Look.
A09D	LD HL,$AFCA	HL=AFCA
A0A0	LD A,(IX+$04)
A0A3	RLCA
A0A4	RLCA
A0A5	AND $3C
A0A7	LD E,A
A0A8	LD D,$00
A0AA	ADD HL,DE
A0AB	JP PrintMsg	Jump to PrintMsg.