Lunar Jetman: Routine at 42298

42298: Routine at A53A

Used by the routine at 44342.
42298	PUSH IX	HL=IX+0024.
42300	POP HL
42301	LD DE,24
42304	ADD HL,DE
42305	LD A,(HL)	Return if the byte at this address is non-zero.
42306	AND A
42307	RET NZ
42308	LD (HL),200	Write 200 to HL.
42310	INC HL
42311	INC HL
42312	EX DE,HL
42313	LD A,(24130)
42316	LD C,A
42317	LD A,(24128)
42320	ADD A,C
42321	LD (24128),A
42324	LD A,(24128)
42327	AND %00111100	Keep only bits 2-5.
42329	LD C,A
42330	LD B,0
42332	LD HL,42635	HL=42635.
42335	ADD HL,BC
42336	INC HL
42337	INC HL
42338	LD A,(IX+2)
42341	ADD A,8
42343	LD (DE),A
42344	INC DE
42345	LD A,(IX+3)
42348	ADC A,0
42350	AND %00011111	Keep only bits 0-4.
42352	LD (DE),A
42353	INC DE
42354	LD A,(IX+4)
42357	SUB 16
42359	JR 42440	Jump to 42440.