Everyone's a Wally: Routine at EB0F

EB0F: Routine at EB0F


EB0F	LD A,$01	Write 01 to EB54.
EB11	LD ($EB54),A	Write 01 to EB54.
EB14	LD B,(IY-$2D)	B=IY-2D.
EB17	LD C,(HL)	C=*HL.
EB18	INC HL	Increment HL by one.
EB19	PUSH HL	Stash HL and IY on the stack.
EB1A	PUSH IY	Stash HL and IY on the stack.
EB1C	CALL Handler_ItemsCurrentRoom	Call Handler_ItemsCurrentRoom.
EB1F	LD A,(IY+$50)	A=*IY+50.
EB22	CP C
EB23	JR Z,$EB2F
EB25	INC IY	Increment IY by five.
EB27	INC IY
EB29	INC IY
EB2B	INC IY
EB2D	INC IY
Switch the values at HL and IY+50.
EB2F	LD C,(HL)	C=*HL.
EB30	LD A,(IY+$50)	Write IY+50 to HL.
EB33	LD (HL),A	Write IY+50 to HL.
EB34	LD (IY+$50),C	Write C to *IY+50.
EB37	INC HL	Increment HL by three.
EB38	INC HL
EB39	INC HL
EB3A	LD A,(HL)	A=*HL.
EB3B	RES 7,A
EB3D	LD C,A
EB3E	LD A,(HL)	A=*HL.
EB3F	AND %10000000	Keep only bit 7.
EB41	OR (IY-$37)
EB44	LD (HL),A
EB45	LD (IY-$37),C
EB48	POP IY	Restore IY from the stack.
EB4A	CALL $E41D	Call E41D.
EB4D	CALL Sounds_PickUp	Call Sounds_PickUp.
EB50	POP HL	Restore HL from the stack.
EB51	JP $EAEB	Jump to EAEB.