Robotron: 2084: Routine at ED7C

ED7C: Routine at ED7C

Used by the routines at EBC8 and ED10.
ED7C	LD DE,$5800
ED7F	LD A,(DE)
ED80	LD HL,$EE5B
ED83	LD BC,$000A
ED86	CPIR
ED88	JR NZ,$ED8C
ED8A	LD A,(HL)
ED8B	LD (DE),A
ED8C	INC DE
ED8D	LD A,D
ED8E	CP $5B
ED90	JR NZ,$ED7F
ED92	RET
This entry point is used by the routine at EBC8.
ED93	LD A,(DE)
ED94	LD HL,$EE5B
ED97	LD BC,$000A
ED9A	CPIR
ED9C	JR NZ,$EDA0
ED9E	LD A,(HL)
ED9F	LD (DE),A
EDA0	INC DE
EDA1	PUSH IX
EDA3	POP HL
EDA4	AND A
EDA5	SBC HL,DE
EDA7	JR NZ,$ED93
EDA9	RET
This entry point is used by the routine at EBC8.
EDAA	PUSH IX
EDAC	POP HL
EDAD	LD A,E
EDAE	PUSH BC
EDAF	CALL $EE02
EDB2	POP BC
EDB3	RET NZ
EDB4	INC HL
EDB5	LD A,(HL)
EDB6	CP D
EDB7	RET Z
EDB8	LD E,A
EDB9	INC HL
EDBA	LD A,(HL)
EDBB	PUSH DE
EDBC	CALL $EE0B
EDBF	POP DE
EDC0	CALL $EE1D
EDC3	PUSH IX
EDC5	POP HL
EDC6	INC HL
EDC7	LD A,D
EDC8	CALL $EE02
EDCB	INC HL
EDCC	LD A,(HL)
EDCD	PUSH DE
EDCE	CALL $EE0B
EDD1	POP DE
EDD2	INC HL
EDD3	INC HL
EDD4	LD B,$1C
EDD6	LD (HL),C
EDD7	INC HL
EDD8	DJNZ $EDD6
EDDA	LD D,E
EDDB	XOR A
EDDC	RET
This entry point is used by the routine at EBC8.
EDDD	PUSH IX
EDDF	POP HL
EDE0	LD A,E
EDE1	PUSH BC
EDE2	CALL $EE02
EDE5	POP BC
EDE6	RET NZ
EDE7	INC HL
EDE8	LD A,(HL)
EDE9	CP D
EDEA	RET Z
EDEB	LD E,A
EDEC	INC HL
EDED	LD L,(HL)
EDEE	LD H,$59
EDF0	LD (HL),$47
EDF2	PUSH IX
EDF4	POP HL
EDF5	INC HL
EDF6	LD A,D
EDF7	CALL $EE02
EDFA	INC HL
EDFB	LD L,(HL)
EDFC	LD H,$59
EDFE	LD (HL),C
EDFF	LD D,E
EE00	XOR A
EE01	RET
EE02	CP (HL)
EE03	RET Z
EE04	INC HL
EE05	INC HL
EE06	INC HL
EE07	DJNZ $EE02
EE09	DEC B
EE0A	RET