Lunar Jetman: Routine at 34465

34465: Routine at 86A1

Used by the routines at 34324, 34561 and 35420.
34465	LD L,(IX+2)	L=IX+2.
34468	LD H,(IX+3)	H=IX+3.
34471	LD BC,120	HL=HL+0120.
34474	ADD HL,BC	HL=HL+0120.
34475	LD BC,(24698)	BC=24698.
34479	AND A
34480	SBC HL,BC
34482	LD A,H
34483	AND %00011111	Keep only bits 0-4.
34485	JR NZ,34431
34487	LD A,L
34488	CP 240
34490	JR NC,34431
34492	LD (IX+1),L
34495	CALL 34175	Call 34175.
This entry point is used by the routine at 34324.
34498	LD L,(IX+1)	L=IX+1.
34501	LD H,(IX+4)	H=IX+4.
34504	LD A,L
34505	DEC A
34506	RLCA
34507	AND %00001110	Keep only bits 1-3.
34509	CP 14
34511	JR NZ,34515
34513	LD A,232	A=232.
34515	LD (34333),A
34518	LD (IX+9),A
34521	LD A,2
34523	JR Z,34526
34525	INC A
34526	LD (24151),A
34529	LD (IX+11),H
34532	CALL ScreenAddress	Call ScreenAddress.
34535	LD A,(DE)
34536	INC DE
34537	LD (24153),A
34540	LD (24152),A
34543	LD (IX+10),A
34546	LD (IX+12),E
34549	LD (IX+13),D
34552	LD (IX+14),L
34555	LD (IX+15),H
34558	LD C,0	C=0.
34560	RET	Return.