Lunar Jetman: Routine at 87B9

87B9: Routine at 87B9

Used by the routines at 864F, 8787 and 8807.
87B9	LD A,C	A=C.
87BA	AND A	If A is zero, jump to 8807.
87BB	JR Z,$8807	If A is zero, jump to 8807.
87BD	DEC C	Decrease C by one.
87BE	PUSH BC	Stash BC and HL on the stack.
87BF	PUSH HL	Stash BC and HL on the stack.
87C0	LD A,(DE)	A=DE.
87C1	INC DE	Increment DE by one.
87C2	XOR (HL)
87C3	LD (HL),A	Write A to HL.
87C4	INC L	Increment L by one.
87C5	DJNZ $87C0
87C7	JR $87C7	Jump to 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 ScreenPos1PixelAbove
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 ScreenPos1PixelAbove
8803	POP BC
8804	EXX
8805	JR $87B9