Lunar Jetman: Routine at 8787

8787: Routine at 8787

Used by the routines at 9ECA, 9EDC, A880 and B3E8.
8787	CALL $88E8
878A	EXX
878B	CALL $8826
878E	EXX
This entry point is used by the routine at 877C.
878F	LD A,($5E56)
8792	SUB (IX+$04)
8795	JP Z,$880D
8798	JP M,$87AA
879B	LD C,A
879C	LD A,($5E5A)
879F	CP C
87A0	JP C,$880D
87A3	SUB C
87A4	LD ($5E5A),A
87A7	JP $87B9
87AA	EXX
87AB	NEG
87AD	LD C,A
87AE	LD A,($5E59)
87B1	CP C
87B2	JP C,$880C
87B5	SUB C
87B6	JP $8820
This entry point is used by the routines at 864F and 8807.
87B9	LD A,C
87BA	AND A
87BB	JR Z,$8807
87BD	DEC C
87BE	PUSH BC
87BF	PUSH HL
87C0	LD A,(DE)
87C1	INC DE
87C2	XOR (HL)
87C3	LD (HL),A
87C4	INC L
87C5	DJNZ $87C0
87C7	JR $87C7
87C9	INC DE
87CA	INC DE
87CB	INC DE
87CC	INC DE
87CD	INC DE
87CE	INC DE
87CF	INC DE
87D0	INC DE
87D1	INC DE
87D2	INC DE
87D3	INC DE
87D4	INC DE
87D5	INC DE
87D6	INC DE
87D7	INC DE
87D8	INC DE
87D9	POP HL
87DA	CALL $85F6
87DD	POP BC
87DE	EXX
87DF	LD A,C
87E0	AND A
87E1	JR Z,$8804
This entry point is used by the routine at 8807.
87E3	DEC C
87E4	PUSH BC
87E5	PUSH HL
87E6	LD A,(DE)
87E7	INC DE
87E8	XOR (HL)
87E9	LD (HL),A
87EA	INC L
87EB	DJNZ $87E6
87ED	JR $87ED
87EF	INC DE
87F0	INC DE
87F1	INC DE
87F2	INC DE
87F3	INC DE
87F4	INC DE
87F5	INC DE
87F6	INC DE
87F7	INC DE
87F8	INC DE
87F9	INC DE
87FA	INC DE
87FB	INC DE
87FC	INC DE
87FD	INC DE
87FE	INC DE
87FF	POP HL
8800	CALL $85F6
8803	POP BC
8804	EXX
8805	JR $87B9