The Hobbit: Routine at 8C4B

8C4B: Action Look


Action_Look	8C4B	CALL $9D44
	8C4E	LD IX,($B70C)	IX=ptrCurObject
	8C52	LD A,(IX+$01)
	8C55	CP $FF
	8C57	JR Z,Action_Look_0
	8C59	LD HL,$0080
	8C5C	LD ($AFFD),HL
	8C5F	LD HL,$AFFC	HL="You are in[0x16]"
	8C62	CALL PrintMsg	Call PrintMsg.
	8C65	PUSH IX	Stash IX on the stack.
	8C67	LD A,(IX+$01)
	8C6A	CALL LocateObject
	8C6D	CALL $A09D
	8C70	LD E,(IX+$08)
	8C73	LD A,(IX+$09)
	8C76	AND $0F
	8C78	LD D,A
	8C79	CALL PrintToken
	8C7C	LD A,$2E
	8C7E	CALL $858B
	8C81	CALL $8583
	8C84	LD HL,$B003	HL="You see :[0x14]"
	8C87	CALL PrintMsg	Call PrintMsg.
	8C8A	POP IX	Restore IX off the stack.
	8C8C	LD A,(IX+$01)
	8C8F	LD B,(IX+$10)
	8C92	JP $9FAF	Jump to 9FAF.
Action_Look_0	8C95	LD A,(IX+$10)
	8C98	JP YouSeePreposition
This entry point is used by the routines at Action_Putdown and Action_Examine.
Action_Look_1	8C9B	CALL $9C78
	8C9E	RET C
	8C9F	POP HL
	8CA0	LD HL,$ADF1	HL="You are not carrying it[0x15]"
	8CA3	JP PrintMsg	Jump to PrintMsg.