Batty: Routine at 974A

974A: Routine at 974A

Used by the routine at Sounds_PlayQueue.
974A	XOR A
974B	LD ($5CDD),A
974E	LD BC,$0608
9751	LD A,($B7E5)
9754	CP $02
9756	JR NZ,$9767
9758	LD HL,$1510
975B	CALL $9CF4
975E	LD BC,$0608
9761	LD HL,$15C0
9764	JP $9CF4
9767	LD HL,$1510
976A	LD A,($B7E6)
976D	AND A
976E	JP Z,$9CF4
9771	LD L,$C0
9773	JP $9CF4
This entry point is used by the routines at StartGame and BDCF.
9776	LD A,($B7EA)
This entry point is used by the routine at BDCF.
9779	LD HL,$6CBD
977C	ADD A,A
977D	LD E,A
977E	LD D,$00
9780	ADD HL,DE
9781	LD E,(HL)
9782	INC HL
9783	LD D,(HL)
9784	EX DE,HL
9785	LD ($9789),HL
9788	RET
9789	NOP
978A	NOP
This entry point is used by the routine at StartGame.
978B	CALL $979F
978E	RET Z
978F	CALL $979F
9792	JR NZ,$978F
9794	CALL $979F
9797	JR Z,$9794
9799	CALL $979F
979C	JR NZ,$9799
979E	RET
979F	LD A,$F7
97A1	CALL $97A7
97A4	AND $0F
97A6	RET
This entry point is used by the routines at 926B, 93F8 and 9EAA.
97A7	IN A,($FE)
97A9	CPL
97AA	AND $1F
97AC	RET
This entry point is used by the routines at 910C, DrawFrame and StartGame.
97AD	LD ($97D0),SP
97B1	LD SP,$5B00
97B4	LD BC,$8002
97B7	LD DE,$0000
97BA	JR $97C9
This entry point is used by the routines at 910C, DrawFrame and StartGame.
97BC	LD ($97D0),SP
97C0	LD SP,$5800
97C3	LD BC,$000C
97C6	LD DE,$0000
97C9	PUSH DE
97CA	DJNZ $97C9
97CC	DEC C
97CD	JR NZ,$97C9
97CF	LD SP,$0000
97D2	RET
This entry point is used by the routine at 910C.
97D3	LD E,$FF
97D5	DEC E
97D6	JR NZ,$97D5
97D8	DEC D
97D9	JR NZ,$97D3
97DB	RET
97DC	NOP
97DD	NOP
This entry point is used by the routine at StartGame.
97DE	LD IX,$9AD0
97E2	LD B,$0B
97E4	XOR A
97E5	LD ($D000),A
97E8	LD HL,$D001
97EB	PUSH BC
97EC	LD A,(IX+$00)
97EF	AND A
97F0	CALL NZ,$9801
97F3	POP BC
97F4	LD DE,$0016
97F7	ADD IX,DE
97F9	DJNZ $97EB
97FB	LD ($97FF),HL
97FE	RET
97FF	NOP
9800	NOP
9801	LD A,(IX+$04)
9804	CP $C0
9806	JR C,$980C
9808	SET 7,(IX+$00)
980C	BIT 7,(IX+$00)
9810	RET NZ
9811	LD A,($D000)
9814	INC A
9815	LD ($D000),A
9818	LD C,(IX+$08)
981B	LD A,(IX+$02)
981E	AND $07
9820	JR Z,$9823
9822	INC C
9823	LD A,C
9824	ADD A,A
9825	ADD A,A
9826	ADD A,A
9827	ADD A,(IX+$02)
982A	JR NC,$9839
982C	LD A,$FF
982E	SUB (IX+$02)
9831	SRL A
9833	SRL A
9835	SRL A
9837	INC A
9838	LD C,A
9839	LD D,(IX+$0A)
983C	LD E,(IX+$0B)
983F	LD (HL),E
9840	INC HL
9841	LD (HL),D
9842	INC HL
9843	SLA C
9845	LD A,$F6
9847	SUB C
9848	LD (HL),A
9849	INC HL
984A	LD ($9877),A
984D	LD B,(IX+$09)
9850	INC B
9851	LD (HL),B
9852	INC HL
9853	EX DE,HL
9854	LD A,L
9855	LD C,$FF
9857	JP $9876
985A	LDI
985C	LDI
985E	LDI
9860	LDI
9862	LDI
9864	LDI
9866	LDI
9868	LDI
986A	LDI
986C	LDI
986E	DEC HL
986F	ADD A,$20
9871	LD L,A
9872	JP NC,$9876
9875	INC H
9876	DJNZ $9876
9878	EX DE,HL
9879	RET
This entry point is used by the routine at StartGame.
987A	LD A,($8E71)
987D	AND A
987E	JR Z,$989A
9880	LD IX,($8E70)
9884	LD A,(IX+$02)
9887	SUB $05
9889	LD L,A
988A	LD A,(IX+$04)
988D	SUB $05
988F	LD H,A
9890	LD BC,$0417
9893	CALL $9CF4
9896	XOR A
9897	LD ($8E71),A
This entry point is used by the routine at StartGame.
989A	LD A,($D000)
989D	AND A
989E	RET Z
989F	LD HL,$D001
98A2	EX AF,AF'
98A3	LD E,(HL)
98A4	INC HL
98A5	LD D,(HL)
98A6	INC HL
98A7	LD A,(HL)
98A8	LD ($98D6),A
98AB	INC HL
98AC	LD B,(HL)
98AD	INC HL
98AE	LD C,$FF
98B0	LD A,E
98B1	JP $98D5
98B4	EX AF,AF'
98B5	DEC A
98B6	JR NZ,$98A2
98B8	RET
98B9	LDI
98BB	LDI
98BD	LDI
98BF	LDI
98C1	LDI
98C3	LDI
98C5	LDI
98C7	LDI
98C9	LDI
98CB	LDI
98CD	DEC DE
98CE	ADD A,$20
98D0	LD E,A
98D1	JP NC,$98D5
98D4	INC D
98D5	DJNZ $98D5
98D7	JP $98B4
98DA	DEC D
98DB	SBC A,D
98DC	RRCA
98DD	SBC A,D
98DE	ADD HL,BC
98DF	SBC A,D
98E0	INC BC
98E1	SBC A,D
98E2	DEFB $FD
98E3	SBC A,C
98E4	RST $30
98E5	SBC A,C
98E6	POP AF
98E7	SBC A,C
98E8	EX DE,HL
98E9	SBC A,C
98EA	SBC A,D
98EB	SBC A,D
98EC	ADC A,H
98ED	SBC A,D
98EE	LD A,(HL)
98EF	SBC A,D
98F0	LD (HL),B
98F1	SBC A,D
98F2	LD H,D
98F3	SBC A,D
98F4	LD D,H
98F5	SBC A,D
98F6	LD B,(HL)
98F7	SBC A,D
98F8	JR C,$9894
98FA	EX AF,AF'
98FB	LD A,(BC)
98FC	INC B
98FD	LD B,$00
98FF	NOP
9900	LD B,$00
9902	LD (BC),A
9903	LD (BC),A
9904	INC B
9905	INC B
9906	NOP
9907	NOP
9908	ADD HL,BC
9909	DJNZ $9911
990B	INC C
990C	INC B
990D	ADD HL,BC
990E	DEC B
990F	RLCA
This entry point is used by the routines at 8E72, 965D, 9EAA and BDCF.
9910	LD A,(IX+$00)
9913	BIT 7,A
9915	RET NZ
9916	CP $02
9918	JR NZ,$995C
991A	LD A,($9B68)
991D	CP $07
991F	JR Z,$9928
9921	LD A,($9B52)
9924	CP $07
9926	JR NZ,$9959
9928	LD (IX+$01),$08
992C	RES 7,(IX+$15)
9930	LD A,($8D46)
9933	RRA
9934	JR C,$9959
9936	LD A,($A65A)
9939	INC A
993A	LD ($A65A),A
993D	CP $F8
993F	JR C,$9959
9941	LD A,($9B68)
9944	CP $07
9946	JR NZ,$994D
9948	LD A,$FF
994A	LD ($9B68),A
994D	LD A,($9B52)
9950	CP $07
9952	JR NZ,$9959
9954	LD A,$FF
9956	LD ($9B52),A
9959	LD A,(IX+$00)
995C	LD HL,$98F8
995F	ADD A,A
9960	CALL PrintLine_9
9963	LD A,(IX+$02)
9966	AND $07
9968	JR Z,$996B
996A	INC HL
996B	LD A,($5CD8)
996E	ADD A,(HL)
996F	LD ($5CD8),A
9972	CALL $7767
9975	LD HL,$98D8
9978	LD A,(IX+$04)
997B	CP $C0
997D	RET NC
997E	ADD A,(IX+$09)
9981	CP $20
9983	LD ($97DC),SP
9987	BIT 7,(IX+$15)
998B	LD A,$00
998D	JR NZ,$9992
998F	LD A,(IX+$02)
9992	AND $07
9994	LD C,A
9995	LD A,(DE)
9996	LD B,A
9997	JR Z,$999C
9999	ADD A,$08
999B	INC B
999C	ADD A,A
999D	CALL PrintLine_9
99A0	LD A,(HL)
99A1	INC HL
99A2	LD H,(HL)
99A3	LD L,A
99A4	LD ($9A20),HL
99A7	LD ($9AB4),HL
99AA	LD ($9AB9),HL
99AD	LD ($99E3),HL
99B0	INC DE
99B1	LD A,$21
99B3	SUB B
99B4	LD ($9AB0),A
99B7	LD ($9A1B),A
99BA	LD H,(IX+$0A)
99BD	LD L,(IX+$0B)
99C0	EX DE,HL
99C1	LD A,(HL)
99C2	LD B,A
99C3	EX AF,AF'
99C4	INC HL
99C5	LD SP,HL
99C6	LD A,(IX+$04)
99C9	ADD A,B
99CA	CP $C1
99CC	JR C,$99D5
99CE	LD A,$C0
99D0	SUB (IX+$04)
99D3	LD B,A
99D4	EX AF,AF'
99D5	LD A,C
99D6	AND A
99D7	JR Z,$99E5
99D9	ADD A,A
99DA	ADD A,$F0
99DC	LD H,A
99DD	LD ($9AC2),DE
99E1	LD A,(DE)
99E2	JP $99E2
99E5	EX DE,HL
99E6	LD ($9A28),HL
99E9	JR $99E2
99EB	POP DE
99EC	LD A,E
99ED	OR (HL)
99EE	XOR D
99EF	LD (HL),A
99F0	INC L
99F1	POP DE
99F2	LD A,E
99F3	OR (HL)
99F4	XOR D
99F5	LD (HL),A
99F6	INC L
99F7	POP DE
99F8	LD A,E
99F9	OR (HL)
99FA	XOR D
99FB	LD (HL),A
99FC	INC L
99FD	POP DE
99FE	LD A,E
99FF	OR (HL)
9A00	XOR D
9A01	LD (HL),A
9A02	INC L
9A03	POP DE
9A04	LD A,E
9A05	OR (HL)
9A06	XOR D
9A07	LD (HL),A
9A08	INC L
9A09	POP DE
9A0A	LD A,E
9A0B	OR (HL)
9A0C	XOR D
9A0D	LD (HL),A
9A0E	INC L
9A0F	POP DE
9A10	LD A,E
9A11	OR (HL)
9A12	XOR D
9A13	LD (HL),A
9A14	INC L
9A15	POP DE
9A16	LD A,E
9A17	OR (HL)
9A18	XOR D
9A19	LD (HL),A
9A1A	LD DE,$0000
9A1D	ADD HL,DE
9A1E	DEC B
9A1F	JP NZ,$9A1F
9A22	LD SP,($97DC)
9A26	RET
9A27	LD HL,$0000
9A2A	LD DE,$0020
9A2D	ADD HL,DE
9A2E	LD ($9A28),HL
9A31	DEC B
9A32	JP NZ,$9AB8
9A35	JP $9A22
9A38	POP BC
9A39	LD L,C
9A3A	OR (HL)
9A3B	LD L,B
9A3C	XOR (HL)
9A3D	LD (DE),A
9A3E	INC E
9A3F	INC H
9A40	LD L,C
9A41	LD A,(DE)
9A42	OR (HL)
9A43	LD L,B
9A44	XOR (HL)
9A45	DEC H
9A46	POP BC
9A47	LD L,C
9A48	OR (HL)
9A49	LD L,B
9A4A	XOR (HL)
9A4B	LD (DE),A
9A4C	INC E
9A4D	INC H
9A4E	LD L,C
9A4F	LD A,(DE)
9A50	OR (HL)
9A51	LD L,B
9A52	XOR (HL)
9A53	DEC H
9A54	POP BC
9A55	LD L,C
9A56	OR (HL)
9A57	LD L,B
9A58	XOR (HL)
9A59	LD (DE),A
9A5A	INC E
9A5B	INC H
9A5C	LD L,C
9A5D	LD A,(DE)
9A5E	OR (HL)
9A5F	LD L,B
9A60	XOR (HL)
9A61	DEC H
9A62	POP BC
9A63	LD L,C
9A64	OR (HL)
9A65	LD L,B
9A66	XOR (HL)
9A67	LD (DE),A
9A68	INC E
9A69	INC H
9A6A	LD L,C
9A6B	LD A,(DE)
9A6C	OR (HL)
9A6D	LD L,B
9A6E	XOR (HL)
9A6F	DEC H
9A70	POP BC
9A71	LD L,C
9A72	OR (HL)
9A73	LD L,B
9A74	XOR (HL)
9A75	LD (DE),A
9A76	INC E
9A77	INC H
9A78	LD L,C
9A79	LD A,(DE)
9A7A	OR (HL)
9A7B	LD L,B
9A7C	XOR (HL)
9A7D	DEC H
9A7E	POP BC
9A7F	LD L,C
9A80	OR (HL)
9A81	LD L,B
9A82	XOR (HL)
9A83	LD (DE),A
9A84	INC E
9A85	INC H
9A86	LD L,C
9A87	LD A,(DE)
9A88	OR (HL)
9A89	LD L,B
9A8A	XOR (HL)
9A8B	DEC H
9A8C	POP BC
9A8D	LD L,C
9A8E	OR (HL)
9A8F	LD L,B
9A90	XOR (HL)
9A91	LD (DE),A
9A92	INC E
9A93	INC H
9A94	LD L,C
9A95	LD A,(DE)
9A96	OR (HL)
9A97	LD L,B
9A98	XOR (HL)
9A99	DEC H
9A9A	POP BC
9A9B	LD L,C
9A9C	OR (HL)
9A9D	LD L,B
9A9E	XOR (HL)
9A9F	LD (DE),A
9AA0	INC E
9AA1	INC H
9AA2	LD L,C
9AA3	LD A,(DE)
9AA4	OR (HL)
9AA5	LD L,B
9AA6	XOR (HL)
9AA7	DEC H
9AA8	LD (DE),A
9AA9	EX AF,AF'
9AAA	DEC A
9AAB	JR Z,$9ABB
9AAD	EX AF,AF'
9AAE	LD A,E
9AAF	ADD A,$00
9AB1	LD E,A
9AB2	LD A,(DE)
9AB3	JP NC,$9AB3
9AB6	INC D
9AB7	LD A,(DE)
9AB8	JP $9AB8
9ABB	LD SP,($97DC)
9ABF	RET
9AC0	LD A,H
9AC1	LD HL,$0000
9AC4	LD DE,$0020
9AC7	ADD HL,DE
9AC8	LD ($9AC2),HL
9ACB	EX DE,HL
9ACC	LD H,A
9ACD	JP $9AB7
9AD0	LD (BC),A
9AD1	NOP
9AD2	ADD A,H
9AD3	NOP
9AD4	AND B
9AD5	NOP
9AD6	JR C,$9ADA
9AD8	LD (BC),A
9AD9	INC C
9ADA	NOP
9ADB	NOP
9ADC	EX AF,AF'
9ADD	RLCA
9ADE	NOP
9ADF	NOP
9AE0	NOP
9AE1	NOP
9AE2	NOP
9AE3	NOP
9AE4	NOP
9AE5	ADD A,B
9AE6	NOP
9AE7	NOP
9AE8	ADD A,H
9AE9	NOP
9AEA	AND B
9AEB	NOP
9AEC	JR C,$9AF0
9AEE	LD (BC),A
9AEF	INC C
9AF0	NOP
9AF1	NOP
9AF2	EX AF,AF'
9AF3	RLCA
9AF4	NOP
9AF5	NOP
9AF6	NOP
9AF7	NOP
9AF8	NOP
9AF9	NOP
9AFA	NOP
9AFB	ADD A,B
9AFC	NOP
9AFD	NOP
9AFE	ADD A,H
9AFF	NOP
9B00	AND B
9B01	NOP
9B02	JR C,$9B06
9B04	LD (BC),A
9B05	INC C
9B06	NOP
9B07	NOP
9B08	EX AF,AF'
9B09	RLCA
9B0A	NOP
9B0B	NOP
9B0C	NOP
9B0D	NOP
9B0E	NOP
9B0F	NOP
9B10	NOP
9B11	ADD A,B
9B12	NOP
9B13	NOP
9B14	ADD A,H
9B15	NOP
9B16	AND B
9B17	NOP
9B18	JR NC,$9B1B
9B1A	LD BC,$0008
9B1D	NOP
9B1E	INC B
9B1F	EX AF,AF'
9B20	NOP
9B21	NOP
9B22	NOP
9B23	NOP
9B24	NOP
9B25	NOP
9B26	NOP
9B27	ADD A,B
9B28	NOP
9B29	NOP
9B2A	ADD A,H
9B2B	NOP
9B2C	AND B
9B2D	NOP
9B2E	JR NC,$9B31
9B30	LD BC,$0008
9B33	NOP
9B34	INC B
9B35	EX AF,AF'
9B36	NOP
9B37	NOP
9B38	NOP
9B39	NOP
9B3A	NOP
9B3B	NOP
9B3C	NOP
9B3D	ADD A,B
9B3E	NOP
9B3F	NOP
9B40	LD (HL),H
9B41	NOP
9B42	XOR L
9B43	NOP
9B44	NOP
9B45	NOP
9B46	INC B
9B47	DEC C
9B48	NOP
9B49	NOP
9B4A	INC E
9B4B	LD A,(BC)
9B4C	NOP
9B4D	NOP
9B4E	NOP
9B4F	NOP
9B50	RET P
9B51	NOP
9B52	RST $38
9B53	ADD A,B
9B54	LD BC,$7400
9B57	NOP
9B58	XOR L
9B59	NOP
9B5A	NOP
9B5B	NOP
9B5C	INC B
9B5D	DEC C
9B5E	NOP
9B5F	NOP
9B60	INC E
9B61	LD A,(BC)
9B62	NOP
9B63	NOP
9B64	NOP
9B65	NOP
9B66	RET P
9B67	NOP
9B68	NOP
9B69	ADD A,B
9B6A	NOP
9B6B	INC BC
9B6C	ADD A,H
9B6D	NOP
9B6E	XOR L
9B6F	NOP
9B70	NOP
9B71	NOP
9B72	INC BC
9B73	DEC C
9B74	NOP
9B75	NOP
9B76	DEC DE
9B77	LD A,(BC)
9B78	NOP
9B79	NOP
9B7A	NOP
9B7B	NOP
9B7C	NOP
9B7D	NOP
9B7E	NOP
9B7F	NOP
9B80	NOP
9B81	NOP
9B82	JR Z,$9B84
9B84	SBC A,A
9B85	NOP
9B86	NOP
9B87	NOP
9B88	NOP
9B89	NOP
9B8A	NOP
9B8B	NOP
9B8C	NOP
9B8D	NOP
9B8E	NOP
9B8F	NOP
9B90	NOP
9B91	NOP
9B92	RET P
9B93	LD H,B
9B94	NOP
9B95	NOP
9B96	NOP
9B97	LD BC,$0078
9B9A	ADC A,B
9B9B	NOP
9B9C	NOP
9B9D	NOP
9B9E	INC BC
9B9F	JR $9BA1
9BA1	NOP
9BA2	JR $9BBC
9BA4	NOP
9BA5	NOP
9BA6	NOP
9BA7	NOP
9BA8	LD D,B
9BA9	LD B,H
9BAA	NOP
9BAB	NOP
9BAC	NOP
9BAD	NOP
9BAE	RET M
9BAF	NOP
9BB0	XOR B
9BB1	NOP
9BB2	NOP
9BB3	NOP
9BB4	INC BC
9BB5	INC E
9BB6	NOP
9BB7	NOP
9BB8	NOP
9BB9	NOP
9BBA	NOP
9BBB	NOP
9BBC	NOP
9BBD	NOP
9BBE	NOP
9BBF	NOP
9BC0	NOP
9BC1	NOP
9BC2	INC BC
9BC3	NOP
9BC4	DJNZ $9BC6
9BC6	CP C
9BC7	NOP
9BC8	NOP
9BC9	NOP
9BCA	LD (BC),A
9BCB	LD B,$00
9BCD	NOP
9BCE	NOP
9BCF	NOP
9BD0	NOP
9BD1	NOP
9BD2	NOP
9BD3	NOP
9BD4	INC BC
9BD5	NOP
9BD6	NOP
9BD7	NOP
9BD8	INC C
9BD9	NOP
9BDA	NOP
9BDB	NOP
9BDC	NOP
9BDD	NOP
9BDE	NOP
9BDF	NOP
9BE0	NOP
9BE1	NOP
9BE2	NOP
9BE3	NOP
9BE4	NOP
9BE5	NOP
9BE6	NOP
9BE7	NOP
9BE8	NOP
9BE9	NOP
9BEA	NOP
9BEB	NOP
9BEC	NOP
9BED	NOP
9BEE	INC BC
9BEF	DEC B
9BF0	LD A,L
9BF1	NOP
9BF2	XOR C
9BF3	NOP
9BF4	NOP
9BF5	NOP
9BF6	NOP
9BF7	NOP
9BF8	NOP
9BF9	NOP
9BFA	NOP
9BFB	NOP
9BFC	NOP
9BFD	NOP
9BFE	NOP
9BFF	NOP
9C00	NOP
9C01	NOP
9C02	NOP
9C03	NOP
9C04	NOP
9C05	NOP
9C06	NOP
9C07	NOP
9C08	NOP
9C09	NOP
9C0A	NOP
9C0B	NOP
9C0C	NOP
9C0D	NOP
9C0E	NOP
9C0F	NOP
9C10	NOP
9C11	NOP
9C12	NOP
9C13	NOP
9C14	NOP
9C15	NOP
9C16	NOP
9C17	NOP
9C18	NOP
9C19	NOP
9C1A	NOP
9C1B	NOP
9C1C	NOP
9C1D	NOP
9C1E	NOP
9C1F	NOP
9C20	NOP
9C21	NOP
9C22	NOP
9C23	NOP
9C24	NOP
This entry point is used by the routines at 965D and 9EAA.
9C25	LD A,(IX+$00)
9C28	RLA
9C29	JR NC,$9C2F
9C2B	LD (IX+$00),$00
9C2F	LD L,(IX+$02)
9C32	LD A,(IX+$11)
9C35	AND A
9C36	JR NZ,$9C49
9C38	LD H,(IX+$04)
9C3B	LD A,(IX+$08)
9C3E	ADD A,A
9C3F	ADD A,A
9C40	ADD A,A
9C41	ADD A,L
9C42	LD B,A
9C43	LD C,(IX+$09)
9C46	JP $9C88
9C49	LD E,L
9C4A	LD A,(IX+$0E)
9C4D	LD D,A
9C4E	CP L
9C4F	JR NC,$9C52
9C51	LD L,A
9C52	LD B,(IX+$08)
9C55	SLA B
9C57	SLA B
9C59	SLA B
9C5B	LD C,(IX+$10)
9C5E	SLA C
9C60	SLA C
9C62	SLA C
9C64	LD A,E
9C65	ADD A,B
9C66	LD B,A
9C67	LD A,D
9C68	ADD A,C
9C69	CP B
9C6A	JR C,$9C6D
9C6C	LD B,A
9C6D	LD H,(IX+$04)
9C70	LD D,H
9C71	LD A,(IX+$0F)
9C74	LD E,A
9C75	CP H
9C76	JR NC,$9C79
9C78	LD H,A
9C79	LD A,D
9C7A	ADD A,(IX+$09)
9C7D	LD D,A
9C7E	LD A,E
9C7F	ADD A,(IX+$11)
9C82	CP D
9C83	JR NC,$9C86
9C85	LD A,D
9C86	SUB H
9C87	LD C,A
9C88	LD A,L
9C89	AND $F8
9C8B	LD L,A
9C8C	CP $F8
9C8E	RET NC
9C8F	CP B
9C90	JR C,$9C94
9C92	LD B,$FF
9C94	LD E,L
9C95	BIT 7,A
9C97	JR Z,$9C9D
9C99	RES 7,L
9C9B	RES 7,B
9C9D	LD A,B
9C9E	ADD A,$07
9CA0	AND $F8
9CA2	SUB L
9CA3	SRL A
9CA5	SRL A
9CA7	SRL A
9CA9	LD B,A
9CAA	LD L,E
9CAB	LD A,(IX+$02)
9CAE	LD (IX+$0E),A
9CB1	LD A,(IX+$04)
9CB4	LD (IX+$0F),A
9CB7	LD A,(IX+$08)
9CBA	LD (IX+$10),A
9CBD	LD A,(IX+$09)
9CC0	LD (IX+$11),A
9CC3	LD A,H
9CC4	ADD A,C
9CC5	CP $C0
9CC7	JR C,$9CCD
9CC9	LD A,$C0
9CCB	SUB H
9CCC	LD C,A
9CCD	BIT 7,L
9CCF	JR Z,$9CE8
9CD1	RES 7,L
9CD3	LD A,B
9CD4	ADD A,A
9CD5	ADD A,A
9CD6	ADD A,A
9CD7	ADD A,L
9CD8	SUB $78
9CDA	JR C,$9CE6
9CDC	SRL A
9CDE	SRL A
9CE0	SRL A
9CE2	NEG
9CE4	ADD A,B
9CE5	LD B,A
9CE6	SET 7,L
9CE8	LD A,H
9CE9	SUB $08
9CEB	JR NC,$9CF4
9CED	ADD A,C
9CEE	LD C,A
9CEF	DEC A
9CF0	RLA
9CF1	RET C
9CF2	LD H,$08
This entry point is used by the routines at B717 and StartGame.
9CF4	PUSH BC
9CF5	PUSH HL
9CF6	CALL ScreenAddress
9CF9	EX DE,HL
9CFA	POP HL
9CFB	CALL PrintLine_7
9CFE	EX DE,HL
9CFF	POP BC
9D00	LD A,B
9D01	EXX
9D02	LD C,A
9D03	LD A,$20
9D05	SUB C
9D06	LD ($9D3B),A
9D09	SLA C
9D0B	LD B,$00
9D0D	LD HL,$9D3A
9D10	SBC HL,BC
9D12	LD ($9D55),HL
9D15	EXX
9D16	LD B,C
9D17	PUSH DE
9D18	LD C,$FE
9D1A	INC C
9D1B	JP $9D54
9D1E	LDI
9D20	LDI
9D22	LDI
9D24	LDI
9D26	LDI
9D28	LDI
9D2A	LDI
9D2C	LDI
9D2E	LDI
9D30	LDI
9D32	LDI
9D34	LDI
9D36	LDI
9D38	LDI
9D3A	LD DE,$0000
9D3D	ADD HL,DE
9D3E	POP DE
9D3F	LD A,D
9D40	INC D
9D41	CPL
9D42	AND $07
9D44	JP NZ,$9D52
9D47	LD A,E
9D48	ADD A,$20
9D4A	LD E,A
9D4B	JP C,$9D52
9D4E	LD A,D
9D4F	SUB $08
9D51	LD D,A
9D52	PUSH DE
9D53	DEC B
9D54	JP NZ,$9D54
9D57	POP DE
9D58	RET
9D59	NOP
9D5A	LD A,($9B80)
9D5D	AND A
9D5E	RET NZ
9D5F	LD A,($B7E5)
9D62	CP $02
9D64	JR NZ,$9D6C
9D66	LD A,($B290)
9D69	CP $78
9D6B	RET Z
9D6C	PUSH IY
9D6E	EXX
9D6F	LD IX,$9B80
9D73	LD (IX+$00),$04
9D77	LD HL,$0000
9D7A	LD ($A557),HL
9D7D	LD HL,($B290)
9D80	LD (IX+$02),L
9D83	LD (IX+$04),H
9D86	LD A,($9B68)
9D89	LD ($9D59),A
9D8C	LD A,($B7E5)
9D8F	CP $02
9D91	JR NZ,$9D9E
9D93	LD A,L
9D94	CP $80
9D96	JR C,$9D9E
9D98	LD A,($9B52)
9D9B	LD ($9D59),A
9D9E	LD (IX+$12),$F0
9DA2	LD (IX+$13),$60
9DA6	LD (IX+$11),$00
9DAA	LD (IX+$0C),$10
9DAE	LD (IX+$0D),$08
9DB2	CALL $8EB4
9DB5	LD A,($8D49)
9DB8	AND $0F
9DBA	LD HL,$9E4A
9DBD	CALL PrintLine_9
9DC0	LD A,($9D59)
9DC3	CP (HL)
9DC4	JR Z,$9DB2
9DC6	LD A,(HL)
9DC7	CP $04
9DC9	JR NZ,$9DF4
9DCB	LD A,($9AD0)
9DCE	AND A
9DCF	JR Z,$9DD8
9DD1	LD A,($9AD7)
9DD4	CP $02
9DD6	JR Z,$9DB2
9DD8	LD A,($9AE6)
9DDB	AND A
9DDC	JR Z,$9DE5
9DDE	LD A,($9AED)
9DE1	CP $02
9DE3	JR Z,$9DB2
9DE5	LD A,($9AFC)
9DE8	AND A
9DE9	JR Z,$9DF2
9DEB	LD A,($9B03)
9DEE	CP $02
9DF0	JR Z,$9DB2
9DF2	JR $9E0A
9DF4	CP $02
9DF6	JR NZ,$9E00
9DF8	LD A,($5CD9)
9DFB	DEC A
9DFC	JR NZ,$9DB2
9DFE	JR $9E0A
9E00	CP $05
9E02	JR NZ,$9E0A
9E04	LD A,($A899)
9E07	AND A
9E08	JR NZ,$9DB2
9E0A	LD A,(HL)
9E0B	CP $06
9E0D	JR NZ,$9E23
9E0F	LD A,($9BAC)
9E12	AND A
9E13	JR NZ,$9DB2
9E15	LD A,($B7EB)
9E18	CP $06
9E1A	JR C,$9E23
9E1C	LD A,($8D48)
9E1F	AND $C0
9E21	JR NZ,$9DB2
9E23	LD A,(HL)
9E24	DEC A
9E25	JR NZ,$9E3C
9E27	LD A,($B7E5)
9E2A	CP $02
9E2C	JR NZ,$9E3C
9E2E	LD A,($9B68)
9E31	DEC A
9E32	JP Z,$9DB2
9E35	LD A,($9B52)
9E38	DEC A
9E39	JP Z,$9DB2
9E3C	LD A,(HL)
9E3D	LD (IX+$14),A
9E40	LD (IX+$01),A
9E43	CALL $AB06
9E46	EXX
9E47	POP IY
9E49	RET
9E4A	NOP
9E4B	LD BC,$0302
9E4E	INC B
9E4F	DEC B
9E50	LD B,$07
9E52	EX AF,AF'
9E53	ADD HL,BC
9E54	NOP
9E55	INC B
9E56	NOP
9E57	INC BC
9E58	LD BC,$0002
9E5B	LD BC,$0302
9E5E	INC B
9E5F	DEC B
9E60	LD B,$02
9E62	LD BC,$0003
9E65	INC B
9E66	NOP
9E67	INC BC
9E68	LD BC,$0002
9E6B	LD BC,$0302
9E6E	INC B
9E6F	DEC B
9E70	LD B,$07
9E72	EX AF,AF'
9E73	ADD HL,BC
9E74	NOP
9E75	INC B
9E76	NOP
9E77	INC BC
9E78	LD BC,$0002
9E7B	LD BC,$0302
9E7E	INC B
9E7F	DEC B
9E80	LD B,$02
9E82	LD BC,$0003
9E85	INC B
9E86	NOP
9E87	INC BC
9E88	LD BC,$0002
9E8B	LD BC,$0302
9E8E	LD (BC),A
9E8F	NOP
9E90	LD B,$07
9E92	EX AF,AF'
9E93	ADD HL,BC
9E94	NOP
9E95	INC BC
9E96	NOP
9E97	LD (BC),A
9E98	LD BC,$0003
9E9B	LD BC,$0302
9E9E	LD (BC),A
9E9F	NOP
9EA0	LD B,$02
9EA2	LD BC,$0003
9EA5	INC BC
9EA6	NOP
9EA7	LD (BC),A
9EA8	LD BC,$3A03