Underwurlde: Routine at 9906

9906: Routine at 9906

Used by the routines at GameEntry and 9C70.
9906	DI	Disable interrupts.
9907	CALL $99AB	Call 99AB.
990A	LD HL,$0000	Write 00 to AA97.
990D	LD ($AA97),HL	Write 00 to AA97.
9910	CALL $98CC	Call 98CC.
9913	LD A,(IX+$04)
9916	CP $FF
9918	JP Z,$9EA0
991B	CP $10
991D	JP C,$997D
9920	CALL $99F5	Call 99F5.
9923	CALL $9A53	Call 9A53.
9926	CALL $9AB6	Call 9AB6.
9929	CALL $9AF8	Call 9AF8.
992C	CALL $9B38	Call 9B38.
992F	CALL $9B64	Call 9B64.
9932	CALL $9BA4	Call 9BA4.
9935	CALL $9BB8	Call 9BB8.
9938	CALL $AF56	Call AF56.
993B	CALL $E6A5	Call E6A5.
993E	LD A,(HL)
993F	AND A
9940	JR NZ,$9944
9942	LD (HL),$01
9944	CALL $9E66
9947	CALL $998F
994A	CALL $999D
994D	CALL $EC3A
9950	XOR A
9951	LD ($AAAC),A
9954	LD A,($8F29)
9957	OR $01
9959	LD ($8F29),A
995C	LD ($8F39),A
995F	LD ($8EF0),A
9962	LD A,($8F1A)
9965	CP $09
9967	JR C,$996C
9969	CALL $AE81
996C	LD SP,$6000
996F	LD IX,$8F2A
9973	LD HL,($5C78)
9976	DEC HL
9977	LD ($8EDF),HL
997A	JP GameEntry_158
997D	CALL $9DA0
9980	LD HL,$8F9A
9983	LD B,$40
9985	LD (HL),$00
9987	INC HL
9988	DJNZ $9985
998A	CALL $EAA2
998D	JR $993B
998F	LD HL,$8F09
9992	LD DE,$0010
9995	LD BC,$1301
9998	LD (HL),C
9999	ADD HL,DE
999A	DJNZ $9998
999C	RET
999D	LD HL,$9031
99A0	LD DE,$0008
99A3	LD B,$04
99A5	SET 0,(HL)
99A7	ADD HL,DE
99A8	DJNZ $99A5
99AA	RET
99AB	LD HL,$BF00
99AE	CALL $ADF8
99B1	LD C,$B0
99B3	PUSH HL
99B4	LD B,$20
99B6	LD (HL),$00
99B8	INC L
99B9	DJNZ $99B6
99BB	POP HL
99BC	CALL $AE71
99BF	DEC C
99C0	JR NZ,$99B3
This entry point is used by the routine at GameEntry.
99C2	LD HL,$5840
99C5	LD C,$16
99C7	LD B,$20
99C9	LD (HL),$47
99CB	INC HL
99CC	DJNZ $99C9
99CE	DEC C
99CF	JR NZ,$99C7
99D1	RET
This entry point is used by the routine at 9BB8.
99D2	LD BC,$0304
99D5	JR $99DF
99D7	LD BC,$0370
99DA	JR $99DF
99DC	LD BC,$1A20
99DF	CALL $ADF8
99E2	LD E,$00
99E4	LD D,B
99E5	LD (HL),E
99E6	INC L
99E7	DJNZ $99E5
99E9	LD B,D
99EA	LD A,L
99EB	SUB B
99EC	LD L,A
99ED	CALL $9C2B
99F0	DEC C
99F1	JR NZ,$99E5
99F3	POP DE
99F4	RET
99F5	PUSH DE
99F6	BIT 0,E
99F8	LD HL,$1018
99FB	LD DE,$9A33
99FE	JP Z,$99DC
9A01	LD B,$0D
9A03	PUSH HL
9A04	CALL $ADF8
9A07	LD A,(IX+$02)
9A0A	ADD A,(IX+$04)
9A0D	RLCA
9A0E	AND $1E
9A10	LD C,A
9A11	PUSH BC
9A12	EX DE,HL
This entry point is used by the routine at 9C70.
9A13	PUSH HL
9A14	LD B,$00
9A16	ADD HL,BC
9A17	LD A,(HL)
9A18	INC HL
9A19	LD H,(HL)
9A1A	LD L,A
9A1B	EX DE,HL
9A1C	PUSH HL
9A1D	CALL $9BF8
9A20	POP HL
9A21	INC L
9A22	INC L
9A23	POP DE
9A24	POP BC
9A25	LD A,C
9A26	ADD A,$02
9A28	DJNZ $9A0E
9A2A	POP HL
9A2B	LD BC,$1A20
9A2E	CALL $9C10
9A31	POP DE
9A32	RET
9A33	EX DE,HL
9A34	CP D
9A35	DEC L
9A36	CP E
9A37	LD L,A
9A38	CP E
9A39	OR C
9A3A	CP E
9A3B	DI
9A3C	CP E
9A3D	DEC (HL)
9A3E	CP H
9A3F	LD (HL),A
9A40	CP H
9A41	CP C
9A42	CP H
9A43	EX DE,HL
9A44	CP D
9A45	DEC L
9A46	CP E
9A47	LD L,A
9A48	CP E
9A49	OR C
9A4A	CP E
9A4B	DI
9A4C	CP E
9A4D	DEC (HL)
9A4E	CP H
9A4F	LD (HL),A
9A50	CP H
9A51	CP C
9A52	CP H
9A53	PUSH DE
9A54	LD HL,$10E8
9A57	LD A,E
9A58	LD DE,$9A96
9A5B	BIT 1,A
9A5D	JP Z,$99D2
9A60	PUSH HL
9A61	EX DE,HL
9A62	BIT 0,A
9A64	JR Z,$9A68
9A66	INC HL
9A67	INC HL
9A68	BIT 2,A
9A6A	JR Z,$9A70
9A6C	INC HL
9A6D	INC HL
9A6E	INC HL
9A6F	INC HL
This entry point is used by the routine at 9BB8.
9A70	LD A,(IX+$02)
9A73	ADD A,(IX+$04)
9A76	ADD A,A
9A77	ADD A,A
9A78	ADD A,A
9A79	AND $18
9A7B	LD C,A
9A7C	LD B,$00
9A7E	ADD HL,BC
9A7F	LD A,(HL)
9A80	INC HL
9A81	LD H,(HL)
9A82	LD L,A
9A83	EX DE,HL
9A84	LD BC,$0320
9A87	CALL $ADF8
9A8A	CALL $9BFE
9A8D	POP HL
9A8E	LD BC,$0320
9A91	CALL $9C10
9A94	POP DE
9A95	RET
9A96	OR A
9A97	JP NZ,$C989
9A9A	LD C,L
9A9B	CP L
9A9C	RET
9A9D	RET Z
9A9E	OR A
9A9F	JP NZ,$C9E9
9AA2	RST $30
9AA3	CP L
9AA4	RET
9AA5	RET Z
9AA6	OR A
9AA7	JP NZ,$CA49
9AAA	AND C
9AAB	CP (HL)
9AAC	RET
9AAD	RET Z
9AAE	OR A
9AAF	JP NZ,$CAA9
9AB2	LD C,E
9AB3	CP A
9AB4	RET
9AB5	RET Z
9AB6	PUSH DE
9AB7	BIT 2,E
9AB9	LD HL,$30E8
9ABC	LD DE,$9BB0
9ABF	JP Z,$99D7
9AC2	LD B,$02
9AC4	PUSH HL
9AC5	CALL $ADF8
9AC8	LD A,(IX+$02)
9ACB	ADD A,(IX+$04)
9ACE	RLCA
9ACF	AND $06
9AD1	LD C,A
9AD2	PUSH BC
9AD3	EX DE,HL
9AD4	PUSH HL
9AD5	LD B,$00
9AD7	ADD HL,BC
9AD8	LD A,(HL)
9AD9	INC HL
9ADA	LD H,(HL)
9ADB	LD L,A
9ADC	EX DE,HL
9ADD	CALL $9BF8
9AE0	POP DE
9AE1	POP BC
9AE2	LD A,C
9AE3	ADD A,$02
9AE5	DJNZ $9ACF
9AE7	POP HL
9AE8	LD BC,$0370
9AEB	CALL $9C10
9AEE	POP DE
9AEF	RET
9AF0	XOR E
9AF1	CP A
9AF2	LD D,L
9AF3	RET NZ
9AF4	RST $38
9AF5	RET NZ
9AF6	XOR H
9AF7	POP BC
9AF8	PUSH DE
9AF9	LD HL,$A0E8
9AFC	LD A,E
9AFD	LD DE,$9B18
9B00	BIT 3,A
9B02	JP Z,$99D2
9B05	PUSH HL
9B06	EX DE,HL
9B07	BIT 4,A
9B09	JR Z,$9B0D
9B0B	INC HL
9B0C	INC HL
9B0D	BIT 2,A
9B0F	JR Z,$9B15
9B11	INC HL
9B12	INC HL
9B13	INC HL
9B14	INC HL
9B15	JP $9A70
9B18	LD A,E
9B19	CP B
9B1A	ADD HL,BC
9B1B	RLC L
9B1D	CP L
9B1E	ADD HL,BC
9B1F	RET Z
9B20	LD A,E
9B21	CP B
9B22	LD L,C
9B23	RES 5,A
9B25	CP L
9B26	ADD HL,BC
9B27	RET Z
9B28	LD A,E
9B29	CP B
9B2A	RET
9B2B	BIT 3,C
9B2D	CP (HL)
9B2E	ADD HL,BC
9B2F	RET Z
9B30	LD A,E
9B31	CP B
9B32	ADD HL,HL
9B33	CALL Z,$BF03
9B36	ADD HL,BC
9B37	RET Z
9B38	PUSH DE
9B39	BIT 4,E
9B3B	LD HL,$A018
9B3E	LD DE,$9B44
9B41	JP $99FE
9B44	IN A,($B8)
9B46	DEC E
9B47	CP C
9B48	LD E,A
9B49	CP C
9B4A	AND C
9B4B	CP C
9B4C	EX (SP),HL
9B4D	CP C
9B4E	DEC H
9B4F	CP D
9B50	LD H,A
9B51	CP D
9B52	XOR C
9B53	CP D
9B54	IN A,($B8)
9B56	DEC E
9B57	CP C
9B58	LD E,A
9B59	CP C
9B5A	AND C
9B5B	CP C
9B5C	EX (SP),HL
9B5D	CP C
9B5E	DEC H
9B5F	CP D
9B60	LD H,A
9B61	CP D
9B62	XOR C
9B63	CP D
9B64	PUSH DE
9B65	LD HL,$A000
9B68	LD A,E
9B69	LD DE,$9B84
9B6C	BIT 5,A
9B6E	JP Z,$99D2
9B71	PUSH HL
9B72	EX DE,HL
9B73	BIT 4,A
9B75	JR Z,$9B79
9B77	INC HL
9B78	INC HL
9B79	BIT 6,A
9B7B	JR Z,$9B81
9B7D	INC HL
9B7E	INC HL
9B7F	INC HL
9B80	INC HL
9B81	JP $9A70
9B84	DEC DE
9B85	CP B
9B86	ADD HL,BC
9B87	RES 5,L
9B89	CP A
9B8A	LD L,C
9B8B	RET Z
9B8C	DEC DE
9B8D	CP B
9B8E	LD L,C
9B8F	BIT 2,A
9B91	RET NZ
9B92	LD L,C
9B93	RET Z
9B94	DEC DE
9B95	CP B
9B96	RET
9B97	RLC C
9B99	POP BC
9B9A	LD L,C
9B9B	RET Z
9B9C	DEC DE
9B9D	CP B
9B9E	ADD HL,HL
9B9F	CALL Z,$C1AE
9BA2	LD L,C
9BA3	RET Z
9BA4	PUSH DE
9BA5	BIT 6,E
9BA7	LD HL,$3000
9BAA	LD DE,$9AF0
9BAD	JP $9ABF
9BB0	INC BC
9BB1	CP L
9BB2	XOR L
9BB3	CP L
9BB4	LD D,A
9BB5	CP (HL)
9BB6	LD BC,$D5BF