Lunar Jetman: Routine at 62277

62277: Routine at F345

Used by the routine at 62101.
62277	LD DE,24120	DE=24120.
62280	LD HL,24117	HL=24117.
62283	LD A,(24183)
62286	NEG
62288	ADD A,8
62290	LD B,A
62291	SLA A
62293	ADD A,B
62294	LD C,A
62295	LD B,0
62297	LDDR
62299	LD HL,24184	HL=24184.
62302	LD BC,3	BC=0003.
62305	LDIR
62307	LD A,(24177)
62310	LD (24180),A
62313	CP 1
62315	JR Z,62322
62317	LD DE,24162	DE=2UP_Score_1.
62320	JR 62325	Jump to 62325.
62322	LD DE,24159	DE=1UP_Score_1.
62325	CALL 62399	Call 62399.
62328	LD A,(24178)
62331	AND A
62332	JP Z,62270
62335	CP 2
62337	JP Z,62367
62340	LD (24177),A
62343	XOR A
62344	LD (24178),A
62347	LD DE,24159	DE=1UP_Score_1.
62350	LD (24180),A
62353	CALL 62399
62356	LD A,B
62357	AND A
62358	JP Z,62270
62361	CALL 62773	Call 62773.
62364	JP 62947	Jump to 62947.
62367	LD (24177),A
62370	XOR A
62371	LD (24178),A
62374	LD DE,24162	DE=2UP_Score_1.
62377	LD (24180),A
62380	CALL 62399
62383	LD A,B
62384	AND A
62385	JP Z,62270
62388	LD A,1	Write 1 to Flag_ActivePlayer.
62390	LD (24165),A	Write 1 to Flag_ActivePlayer.
62393	CALL 62773	Call 62773.
62396	JP 62947	Jump to 62947.