Everyone's a Wally: Routine at 60175

60175: Routine at EB0F


60175	LD A,1	Write 1 to 60244.
60177	LD (60244),A	Write 1 to 60244.
60180	LD B,(IY-45)	B=IY-45.
60183	LD C,(HL)	C=*HL.
60184	INC HL	Increment HL by one.
60185	PUSH HL	Stash HL and IY on the stack.
60186	PUSH IY	Stash HL and IY on the stack.
60188	CALL Handler_ItemsCurrentRoom	Call Handler_ItemsCurrentRoom.
60191	LD A,(IY+80)	A=*IY+80.
60194	CP C
60195	JR Z,60207
60197	INC IY	Increment IY by five.
60199	INC IY
60201	INC IY
60203	INC IY
60205	INC IY
Switch the values at HL and IY+80.
60207	LD C,(HL)	C=*HL.
60208	LD A,(IY+80)	Write IY+80 to HL.
60211	LD (HL),A	Write IY+80 to HL.
60212	LD (IY+80),C	Write C to *IY+80.
60215	INC HL	Increment HL by three.
60216	INC HL
60217	INC HL
60218	LD A,(HL)	A=*HL.
60219	RES 7,A
60221	LD C,A
60222	LD A,(HL)	A=*HL.
60223	AND %10000000	Keep only bit 7.
60225	OR (IY-55)
60228	LD (HL),A
60229	LD (IY-55),C
60232	POP IY	Restore IY from the stack.
60234	CALL 58397	Call 58397.
60237	CALL Sounds_PickUp	Call Sounds_PickUp.
60240	POP HL	Restore HL from the stack.
60241	JP 60139	Jump to 60139.