Wheelie: Routine at 6833

6833: Routine at 6833


6833	JR Z,$6836
6835	SCF
6836	RL E
6838	RL D
683A	JR NC,$6840
683C	RLC B
683E	JR $682E
6840	LD A,E
6841	RRCA
6842	JR NC,$6846
6844	SET 0,D
6846	RRCA
6847	JR NC,$684B
6849	SET 2,D
684B	RRCA
684C	JR NC,$6850
684E	SET 3,D
6850	RRCA
6851	JR NC,$6855
6853	SET 4,D
6855	RRCA
6856	JR NC,$685A
6858	SET 4,D
685A	RRCA
685B	JR NC,$685F
685D	SET 3,D
685F	RRCA
6860	JR NC,$6864
6862	SET 2,D
6864	RRCA
6865	JR NC,$6869
6867	SET 1,D
6869	LD A,D
686A	AND $03
686C	CP $03
686E	JR NZ,$6872
6870	XOR D
6871	LD D,A
6872	LD A,D
6873	AND $0C
6875	CP $0C
6877	JR NZ,$687B
6879	XOR D
687A	LD D,A
687B	LD A,D
687C	RET
687D	NOP
687E	NOP
687F	NOP
6880	BIT 7,A
6882	JR NZ,$6885
6884	CPL
6885	AND $7F
6887	RRA
6888	LD L,A
6889	LD A,$A7
688B	NOP
688C	NOP
688D	NOP
688E	NOP
688F	SUB L
6890	LD L,A
6891	LD H,$B4
This entry point is used by the routine at 7552.
6893	LDI
6895	LDI
6897	LDI
6899	LDI
689B	LDI
689D	LDI
689F	LDI
68A1	LDI
68A3	LDI
68A5	LDI
68A7	LDI
68A9	LDI
68AB	RET
68AC	NOP
This entry point is used by the routine at 7552.
68AD	LD A,($781B)
68B0	AND A
68B1	RET Z
68B2	LD HL,($781C)
68B5	LD B,A
68B6	LD C,$00
68B8	DEC HL
68B9	LD D,(HL)
68BA	DEC HL
68BB	LD E,(HL)
68BC	DEC HL
68BD	LD A,(HL)
68BE	LD (DE),A
68BF	DEC HL
68C0	LD A,D
68C1	SUB $11
68C3	OR $07
68C5	LD D,A
68C6	EX DE,HL
68C7	LD (HL),C
68C8	DEC H
68C9	LD A,(DE)
68CA	LD (HL),A
68CB	DEC DE
68CC	DEC H
68CD	LD (HL),C
68CE	DEC H
68CF	LD A,(DE)
68D0	LD (HL),A
68D1	DEC DE
68D2	DEC H
68D3	LD (HL),C
68D4	DEC H
68D5	LD A,(DE)
68D6	LD (HL),A
68D7	DEC DE
68D8	DEC H
68D9	LD (HL),C
68DA	DEC H
68DB	LD A,(DE)
68DC	LD (HL),A
68DD	EX DE,HL
68DE	DJNZ $68B8
68E0	LD ($781C),HL
68E3	XOR A
68E4	LD ($781B),A
68E7	RET
68E8	NOP
68E9	NOP
68EA	NOP
68EB	NOP
68EC	EXX
68ED	LD ($781C),HL
68F0	LD A,B
68F1	LD ($781B),A
68F4	EXX
68F5	RET
68F6	LD A,(HL)
68F7	EXX
68F8	LD (HL),A
68F9	INC HL
68FA	EXX
68FB	LD A,(BC)
68FC	LD (HL),A
68FD	INC BC
68FE	INC H
68FF	LD A,(BC)
6900	LD (HL),A
6901	INC BC
6902	INC H
6903	LD A,(HL)
6904	EXX
6905	LD (HL),A
6906	INC HL
6907	EXX
6908	LD A,(BC)
6909	LD (HL),A
690A	INC BC
690B	INC H
690C	LD A,(BC)
690D	LD (HL),A
690E	INC BC
690F	RET
6910	LD A,H
6911	SUB $48
6913	SBC A,A
6914	ADD A,$59
6916	LD H,A
6917	LD A,(HL)
6918	PUSH HL
6919	EXX
691A	POP DE
691B	INC B
691C	LD (HL),A
691D	INC HL
691E	LD (HL),E
691F	INC HL
6920	LD (HL),D
6921	INC HL
6922	CP $07
6924	LD A,C
6925	EXX
6926	LD (HL),A
6927	RET NZ
6928	JP $73F2
692B	RET
This entry point is used by the routine at 7552.
692C	LD B,A
692D	LD A,C
692E	EXX
692F	LD HL,($781C)
6932	LD C,A
6933	LD A,($781B)
6936	LD B,A
6937	EXX
6938	LD A,B
6939	ADD A,A
693A	LD L,A
693B	ADC A,$BE
693D	SUB L
693E	LD H,A
693F	LD A,B
6940	LD C,(HL)
6941	INC L
6942	LD B,(HL)
6943	BIT 5,A
6945	JP NZ,$6DA8
6948	LD A,(BC)
6949	INC BC
694A	ADD A,E
694B	LD E,A
694C	LD A,(BC)
694D	INC BC
694E	ADD A,D
694F	LD D,A
6950	CP $10
6952	JR NC,$6959
6954	LD A,E
6955	CP $20
6957	JR C,$696E
6959	LD HL,$0008
695C	ADD HL,BC
695D	LD B,H
695E	LD C,L
695F	LD A,(BC)
6960	INC A
6961	LD A,$01
6963	JR NZ,$694E
6965	INC BC
6966	LD A,(BC)
6967	CP $80
6969	JR NZ,$6949
696B	JP $68EC
696E	LD A,D
696F	ADD A,$40
6971	AND $48
6973	LD H,A
6974	LD A,D
6975	RRCA
6976	RRCA
6977	RRCA
6978	AND $E0
697A	ADD A,E
697B	LD L,A
697C	CALL $68F6
697F	INC H
6980	CALL $68F6
6983	CALL $6910
6986	JR $695F
6988	LD ($7825),A
698B	EXX
698C	LD (HL),A
698D	LD H,B
698E	LD L,C
698F	JP $691B
6992	NOP
6993	NOP
6994	NOP
6995	NOP
6996	LD E,A
6997	LD A,($7828)
699A	BIT 2,A
699C	JR NZ,$69A4
699E	INC E
699F	BIT 3,A
69A1	JR Z,$69A4
69A3	INC E
69A4	LD L,(HL)
69A5	LD H,$00
69A7	LD D,$B5
69A9	ADD HL,HL
69AA	LD B,H
69AB	LD C,L
69AC	ADD HL,HL
69AD	ADD HL,HL
69AE	ADD HL,HL
69AF	ADD HL,BC
69B0	ADD HL,DE
69B1	LD A,(HL)
69B2	ADD A,A
69B3	ADD A,A
69B4	LD L,A
69B5	LD H,$BB
69B7	RET
69B8	NOP
69B9	NOP
69BA	ADD HL,HL
69BB	ADD HL,BC
69BC	RET
69BD	NOP
69BE	LD DE,$0002
69C1	ADD HL,DE
69C2	LD A,(HL)
69C3	RLCA
69C4	SBC A,A
69C5	RET C
69C6	BIT 6,(HL)
69C8	RET Z
69C9	INC A
69CA	RET
69CB	CALL $69BE
69CE	LD E,A
69CF	LD HL,($782E)
69D2	ADD A,H
69D3	LD H,A
69D4	ADD HL,BC
69D5	CP H
69D6	JR Z,$69DD
69D8	LD A,C
69D9	ADD A,A
69DA	ADD A,A
69DB	ADD A,H
69DC	LD H,A
69DD	LD A,B
69DE	AND $03
69E0	INC A
69E1	ADD A,E
69E2	LD E,A
69E3	CALL $6F62
69E6	ADD A,A
69E7	ADD A,E
69E8	CALL $6996
69EB	LD ($7831),HL
69EE	LD A,($7830)
69F1	RET
69F2	NOP
69F3	NOP
69F4	NOP
69F5	NOP
69F6	NOP
69F7	NOP
69F8	NOP
69F9	NOP
69FA	NOP
69FB	NOP
69FC	NOP
69FD	NOP
69FE	NOP
69FF	NOP
6A00	LD A,($7830)
6A03	INC A
6A04	AND $07
6A06	LD ($7830),A
6A09	LD HL,($7831)
6A0C	LD BC,$0001
6A0F	CALL Z,$69CB
6A12	ADD A,A
6A13	LD C,A
6A14	JR $6A27
6A16	LD A,B
6A17	AND $7F
6A19	SUB $02
6A1B	JR NC,$6A1E
6A1D	XOR A
6A1E	SRL A
6A20	SRL A
6A22	ADD A,L
6A23	LD L,A
6A24	ADC A,H
6A25	SUB L
6A26	LD H,A
6A27	LD A,(HL)
6A28	RLCA
6A29	RLCA
6A2A	RLCA
6A2B	RLCA
6A2C	LD L,A
6A2D	AND $0F
6A2F	ADD A,$C0
6A31	LD H,A
6A32	LD A,L
6A33	AND $F0
6A35	ADD A,C
6A36	LD L,A
6A37	LD A,(HL)
6A38	INC L
6A39	LD ($7834),A
6A3C	LD A,(HL)
6A3D	LD HL,$7826
6A40	LD (HL),$00
6A42	RRCA
6A43	JR NC,$6A46
6A45	INC (HL)
6A46	RRCA
6A47	LD C,A
6A48	JR NC,$6A6D
6A4A	AND $03
6A4C	LD L,$33
6A4E	JR NZ,$6A51
6A50	DEC (HL)
6A51	DEC A
6A52	JR NZ,$6A55
6A54	INC (HL)
6A55	LD L,$26
6A57	LD B,A
6A58	LD A,$23
6A5A	SUB (HL)
6A5B	LD L,A
6A5C	LD A,(HL)
6A5D	DEC B
6A5E	JR NZ,$6A65
6A60	CP $69
6A62	JR Z,$6A65
6A64	DEC (HL)
6A65	DEC B
6A66	JR NZ,$6A6D
6A68	CP $96
6A6A	JR Z,$6A6D
6A6C	INC (HL)
6A6D	LD L,$26
6A6F	LD A,(HL)
6A70	AND A
6A71	JR NZ,$6A94
6A73	LD L,$22
6A75	LD A,(HL)
6A76	BIT 7,A
6A78	JR NZ,$6A7B
6A7A	CPL
6A7B	LD B,A
6A7C	DEC L
6A7D	LD A,(HL)
6A7E	BIT 7,A
6A80	JR NZ,$6A83
6A82	CPL
6A83	SUB B
6A84	JR NC,$6A94
6A86	CPL
6A87	SRL A
6A89	SRL A
6A8B	LD L,$34
6A8D	ADD A,(HL)
6A8E	BIT 4,A
6A90	JR Z,$6A93
6A92	DEC A
6A93	LD (HL),A
6A94	LD A,C
6A95	RRCA
6A96	RRCA
6A97	RRCA
6A98	RET NC
6A99	AND $07
6A9B	ADD A,A
6A9C	ADD A,$DC
6A9E	LD L,A
6A9F	LD H,$B4
6AA1	LD A,(HL)
6AA2	INC L
6AA3	LD H,(HL)
6AA4	LD L,A
6AA5	JP (HL)
6AA6	NOP
6AA7	NOP
6AA8	NOP
6AA9	NOP
6AAA	NOP
6AAB	NOP
6AAC	LD A,($7830)
6AAF	DEC A
6AB0	AND $07
6AB2	LD ($7830),A
6AB5	LD BC,$FFFF
6AB8	LD HL,($7831)
6ABB	CP $07
6ABD	CALL Z,$69CB
6AC0	ADD A,A
6AC1	LD C,A
6AC2	JP $6A27
6AC5	CPL
6AC6	JP $6A17
6AC9	NOP
6ACA	NOP
6ACB	NOP
6ACC	NOP
6ACD	NOP
6ACE	NOP
6ACF	CALL $68AD
6AD2	LD B,$0A
6AD4	PUSH BC
6AD5	CALL $6650
6AD8	CALL $67E9
6ADB	POP BC
6ADC	DJNZ $6AD4
6ADE	LD A,$7F
6AE0	LD HL,$7821
6AE3	LD (HL),A
6AE4	INC L
6AE5	LD (HL),A
6AE6	INC L
6AE7	LD (HL),A
6AE8	INC L
6AE9	LD (HL),$00
6AEB	LD L,$1A
6AED	LD (HL),$01
6AEF	LD HL,($7831)
6AF2	LD BC,$0002
6AF5	ADD HL,BC
6AF6	LD A,(HL)
6AF7	AND $3F
6AF9	CALL $69B2
6AFC	LD ($7831),HL
6AFF	LD HL,$FFFF
6B02	LD SP,HL
6B03	CALL $6D49
6B06	NOP
6B07	NOP
6B08	NOP
6B09	NOP
6B0A	NOP
6B0B	NOP
6B0C	NOP
6B0D	NOP
6B0E	NOP
6B0F	NOP
6B10	NOP
6B11	NOP
6B12	NOP
6B13	NOP
6B14	NOP
6B15	NOP
6B16	CALL $68AD
6B19	LD B,$0A
6B1B	PUSH BC
6B1C	CALL $659C
6B1F	CALL $67E9
6B22	POP BC
6B23	DJNZ $6B1B
6B25	LD A,$80
6B27	JP $6AE0
6B2A	NOP
6B2B	NOP
6B2C	NOP
This entry point is used by the routine at 7552.
6B2D	LD A,($7822)
6B30	LD E,$0D
6B32	BIT 7,A
6B34	JR NZ,$6B38
6B36	LD E,$12
6B38	LD C,$07
6B3A	LD HL,$7833
6B3D	LD D,(HL)
6B3E	INC L
6B3F	LD A,(HL)
6B40	CALL $692C
6B43	RET
6B44	INC D
6B45	LD (HL),E
6B46	RET
6B47	NOP
6B48	LD HL,($782C)
6B4B	JP (HL)
6B4C	LD ($7828),A
6B4F	LD C,$00
6B51	LD DE,$0606
6B54	BIT 2,A
6B56	JR NZ,$6B61
6B58	LD C,E
6B59	LD E,$00
6B5B	BIT 3,A
6B5D	JR NZ,$6B61
6B5F	LD C,E
6B60	LD D,E
6B61	LD HL,$5A53
6B64	LD (HL),C
6B65	INC L
6B66	LD (HL),C
6B67	LD L,$73
6B69	LD (HL),D
6B6A	INC L
6B6B	LD (HL),D
6B6C	LD L,$93
6B6E	LD (HL),E
6B6F	INC L
6B70	LD (HL),E
6B71	NOP
6B72	NOP
6B73	NOP
6B74	LD HL,$7823
6B77	AND $03
6B79	JR Z,$6B99
6B7B	RRCA
6B7C	LD A,(HL)
6B7D	JR NC,$6B8C
6B7F	CP $96
6B81	LD A,$00
6B83	JR Z,$6B99
6B85	INC (HL)
6B86	BIT 7,(HL)
6B88	JR NZ,$6B99
6B8A	JR $6B97
6B8C	CP $69
6B8E	LD A,$00
6B90	JR Z,$6B99
6B92	DEC (HL)
6B93	BIT 7,(HL)
6B95	JR Z,$6B99
6B97	LD A,$02
6B99	LD ($7829),A
6B9C	LD L,$27
6B9E	LD A,(HL)
6B9F	AND A
6BA0	JR Z,$6BA3
6BA2	DEC (HL)
6BA3	DEC L
6BA4	LD A,(HL)
6BA5	AND A
6BA6	JR NZ,$6BC3
6BA8	LD L,$23
6BAA	LD A,(HL)
6BAB	DEC L
6BAC	CP (HL)
6BAD	JR Z,$6BC3
6BAF	LD A,(HL)
6BB0	JR C,$6BB4
6BB2	INC (HL)
6BB3	INC (HL)
6BB4	DEC (HL)
6BB5	OR (HL)
6BB6	INC A
6BB7	JR NZ,$6BC3
6BB9	LD A,(HL)
6BBA	DEC L
6BBB	LD (HL),A
6BBC	RLCA
6BBD	JP NC,$6AC9
6BC0	JP $6B10
6BC3	LD L,$22
6BC5	LD A,(HL)
6BC6	DEC L
6BC7	CP (HL)
6BC8	JR Z,$6BEB
6BCA	JR C,$6BD9
6BCC	INC (HL)
6BCD	RLCA
6BCE	JR NC,$6BEA
6BD0	LD A,($7827)
6BD3	AND A
6BD4	JR Z,$6BE5
6BD6	DEC (HL)
6BD7	JR $6BEA
6BD9	DEC (HL)
6BDA	RLCA
6BDB	JR C,$6BEA
6BDD	INC (HL)
6BDE	LD A,($7827)
6BE1	AND A
6BE2	JR NZ,$6BEA
6BE4	DEC (HL)
6BE5	LD A,$03
6BE7	LD ($7827),A
6BEA	NOP
6BEB	LD L,$22
6BED	LD A,(HL)
6BEE	LD DE,$5A45
6BF1	CALL $6880
6BF4	LD A,($7823)
6BF7	LD E,$85
6BF9	JP $6D28
6BFC	NOP
6BFD	NOP
6BFE	NOP
6BFF	NOP
This entry point is used by the routine at EBF3.
6C00	LD A,($782B)
6C03	XOR $01
6C05	LD ($782B),A
6C08	LD HL,$FFFF
6C0B	LD SP,HL
6C0C	LD A,($5C78)
6C0F	INC A
6C10	LD HL,$781A
6C13	DEC (HL)
6C14	LD L,$5A
6C16	LD (HL),A
6C17	JR NZ,$6C73
6C19	INC (HL)
6C1A	LD L,$2B
6C1C	LD A,(HL)
6C1D	XOR $01
6C1F	LD (HL),A
6C20	NOP
6C21	NOP
6C22	LD A,$02
6C24	LD ($7824),A
6C27	LD A,($782A)
6C2A	AND A
6C2B	JP NZ,$6E18
6C2E	CALL $68AD
6C31	LD A,($7822)
6C34	BIT 7,A
6C36	JR Z,$6C43
6C38	CALL $659C
6C3B	CALL $67E9
6C3E	CALL $6A00
6C41	JR $6C4C
6C43	CALL $6650
6C46	CALL $67E9
6C49	CALL $6AAC
6C4C	CALL $72C3
6C4F	CALL $7311
6C52	CALL $6B48
6C55	CALL $6B4C
6C58	LD A,($7822)
6C5B	BIT 7,A
6C5D	JR Z,$6C60
6C5F	CPL
6C60	SUB $66
6C62	JR NC,$6C65
6C64	XOR A
6C65	SRL A
6C67	SRL A
6C69	INC A
6C6A	LD ($781A),A
6C6D	NOP
6C6E	NOP
6C6F	NOP
6C70	CALL $763C
6C73	LD A,($782B)
6C76	AND A
6C77	JR NZ,$6C8F
6C79	LD A,($782A)
6C7C	AND A
6C7D	JR NZ,$6C88
6C7F	CALL $72C3
6C82	CALL $6B48
6C85	CALL $6B4C
6C88	XOR A
6C89	LD ($7824),A
6C8C	CALL $6D50
6C8F	LD A,($7824)
6C92	AND A
6C93	JR NZ,$6C9B
6C95	CALL $68AD
6C98	CALL $7311
6C9B	CALL $6D50
6C9E	HALT
6C9F	NOP
6CA0	NOP
6CA1	NOP
6CA2	NOP
6CA3	NOP
6CA4	NOP
6CA5	NOP
6CA6	NOP
6CA7	NOP
6CA8	NOP
6CA9	NOP
This entry point is used by the routine at ECAB.
6CAA	CALL $75AA
This entry point is used by the routine at 7552.
6CAD	LD HL,$3400
6CB0	LD ($783C),HL
6CB3	LD HL,$7815
6CB6	LD (HL),$00
6CB8	DEC L
6CB9	LD (HL),$00
6CBB	LD L,$1A
6CBD	LD (HL),$01
6CBF	INC L
6CC0	LD (HL),$00
6CC2	INC L
6CC3	LD (HL),$00
6CC5	INC L
6CC6	LD (HL),$B2
6CC8	LD L,$21
6CCA	LD B,$03
6CCC	LD (HL),$80
6CCE	INC L
6CCF	DJNZ $6CCC
6CD1	LD B,$08
6CD3	LD (HL),$00
6CD5	INC L
6CD6	DJNZ $6CD3
6CD8	INC L
6CD9	INC L
6CDA	LD (HL),$13
6CDC	INC L
6CDD	LD (HL),$A1
6CDF	INC L
6CE0	LD (HL),$03
6CE2	INC L
6CE3	LD (HL),$00
6CE5	INC L
6CE6	LD (HL),$BB
6CE8	INC L
6CE9	LD (HL),$0B
6CEB	INC L
6CEC	LD (HL),$00
6CEE	CALL $6500
6CF1	LD L,$10
6CF3	LD A,($782D)
6CF6	CP $73
6CF8	JR NZ,$6D11
6CFA	LD HL,$A1E0
6CFD	LD A,(HL)
6CFE	DEC L
6CFF	DEC A
6D00	JR Z,$6D0A
6D02	CP $31
6D04	JR NC,$6CFD
6D06	CP $2D
6D08	JR C,$6CFD
6D0A	LD A,L
6D0B	INC A
6D0C	LD ($782E),A
6D0F	DEC L
6D10	DEC L
6D11	LD H,$9E
6D13	XOR A
6D14	CALL $6800
6D17	LD A,($5C78)
6D1A	INC A
6D1B	JP $EBF6
6D1E	JP $E80E
6D21	LD HL,$FFFF
6D24	LD SP,HL
6D25	JP $6CAA
6D28	BIT 7,A
6D2A	JR NZ,$6D2D
6D2C	CPL
6D2D	ADD A,$3C
6D2F	LD L,A
6D30	LD H,$B4
6D32	LD L,(HL)
6D33	LD A,($7829)
6D36	AND A
6D37	JR NZ,$6D42
6D39	LD A,($7828)
6D3C	AND $03
6D3E	JR Z,$6D42
6D40	DEC L
6D41	DEC L
6D42	LD A,L
6D43	LD ($7835),A
6D46	JP $6893
This entry point is used by the routine at 7552.
6D49	LD A,($5C78)
6D4C	INC A
6D4D	LD ($785A),A
This entry point is used by the routine at 7552.
6D50	LD HL,$782A
6D53	LD A,(HL)
6D54	AND A
6D55	JR NZ,$6D5E
6D57	DEC L
6D58	LD A,(HL)
6D59	AND A
6D5A	JR Z,$6D77
6D5C	LD A,$02
6D5E	LD L,$CC
6D60	LD B,$02
6D62	LD D,(HL)
6D63	INC L
6D64	LD E,(HL)
6D65	OUT ($FE),A
6D67	XOR $10
6D69	DEC E
6D6A	JR NZ,$6D69
6D6C	CALL $EC00
6D6F	DEC D
6D70	JR NZ,$6D64
6D72	INC L
6D73	DJNZ $6D62
6D75	JR $6D5E
6D77	LD A,($7835)
6D7A	SUB $9B
6D7C	LD C,A
6D7D	LD D,$14
6D7F	LD L,$CC
6D81	XOR A
6D82	LD B,C
6D83	OUT ($FE),A
6D85	XOR $10
6D87	LD E,(HL)
6D88	DEC E
6D89	JR NZ,$6D88
6D8B	CALL $EC00
6D8E	DJNZ $6D87
6D90	INC L
6D91	DEC D
6D92	JR NZ,$6D82
6D94	JR $6D7D
6D96	LD A,(HL)
6D97	LD (HL),$00
6D99	EXX
6D9A	LD (HL),A
6D9B	INC HL
6D9C	EXX
6D9D	INC H
6D9E	INC H
6D9F	LD A,(HL)
6DA0	LD (HL),$00
6DA2	EXX
6DA3	LD (HL),A
6DA4	INC HL
6DA5	EXX
6DA6	INC H
6DA7	RET
6DA8	LD A,(BC)
6DA9	INC BC
6DAA	ADD A,E
6DAB	LD E,A
6DAC	LD A,(BC)
6DAD	INC BC
6DAE	ADD A,D
6DAF	DEC A
6DB0	LD D,A
6DB1	CP $10
6DB3	JR NC,$6DBA
6DB5	LD A,E
6DB6	CP $20
6DB8	JR C,$6DCF
6DBA	LD HL,$0008
6DBD	ADD HL,BC
6DBE	LD B,H
6DBF	LD C,L
6DC0	INC D
6DC1	LD A,(BC)
6DC2	INC A
6DC3	LD A,D
6DC4	JR NZ,$6DB1
6DC6	INC BC
6DC7	LD A,(BC)
6DC8	CP $80
6DCA	JR NZ,$6DA9
6DCC	JP $68EC
6DCF	LD A,D
6DD0	ADD A,$40
6DD2	AND $48
6DD4	LD H,A
6DD5	LD A,D
6DD6	RRCA
6DD7	RRCA
6DD8	RRCA
6DD9	AND $E0
6DDB	ADD A,E
6DDC	LD L,A
6DDD	CALL $6D96
6DE0	INC H
6DE1	CALL $68F6
6DE4	CALL $6910
6DE7	INC D
6DE8	LD A,D
6DE9	CP $10
6DEB	JR C,$6DF3
6DED	INC BC
6DEE	INC BC
6DEF	INC BC
6DF0	INC BC
6DF1	JR $6DC1
6DF3	ADD A,$40
6DF5	AND $48
6DF7	LD H,A
6DF8	LD A,D
6DF9	RRCA
6DFA	RRCA
6DFB	RRCA
6DFC	AND $E0
6DFE	ADD A,E
6DFF	LD L,A
6E00	CALL $68F6
6E03	INC H
6E04	LD A,(BC)
6E05	INC A
6E06	JR NZ,$6DE1
6E08	CALL $6D96
6E0B	CALL $6910
6E0E	JR $6DC6
6E10	NOP
6E11	NOP
6E12	LD BC,$0607
6E15	LD BC,$0000
6E18	CALL $68AD
6E1B	LD HL,($783A)
6E1E	LD A,(HL)
6E1F	CP $F0
6E21	JR NC,$6E57
6E23	LD ($7834),A
6E26	INC HL
6E27	LD A,(HL)
6E28	AND $0F
6E2A	LD ($781A),A
6E2D	LD A,(HL)
6E2E	INC HL
6E2F	LD ($783A),HL
6E32	LD HL,$7833
6E35	RLCA
6E36	JR NC,$6E39
6E38	DEC (HL)
6E39	RLCA
6E3A	JR NC,$6E3D
6E3C	INC (HL)
6E3D	RLCA
6E3E	JR NC,$6E48
6E40	CALL $659C
6E43	CALL $67E9
6E46	JR $6E51
6E48	RLCA
6E49	JR NC,$6E51
6E4B	CALL $6650
6E4E	CALL $67E9
6E51	CALL $6B2D
6E54	CALL $6D50
6E57	PUSH AF
6E58	NOP
6E59	NOP
6E5A	NOP
6E5B	NOP
6E5C	NOP
6E5D	NOP
6E5E	CALL $6B2D
6E61	POP AF
6E62	AND $0F
6E64	SUB $08
6E66	LD B,A
6E67	LD A,($7822)
6E6A	BIT 7,A
6E6C	LD A,$12
6E6E	JR Z,$6E72
6E70	LD A,$0D
6E72	ADD A,B
6E73	LD L,A
6E74	LD A,($7833)
6E77	SUB $02
6E79	LD H,$40
6E7B	CP $08
6E7D	JR C,$6E81
6E7F	LD H,$48
6E81	AND $07
6E83	RRCA
6E84	RRCA
6E85	RRCA
6E86	ADD A,L
6E87	LD L,A
6E88	PUSH HL
6E89	DEC L
6E8A	DEC L
6E8B	LD DE,$78E0
6E8E	LD C,$28
6E90	EX DE,HL
6E91	LD B,$04
6E93	LDI
6E95	DJNZ $6E93
6E97	LD A,E
6E98	SUB $04
6E9A	LD E,A
6E9B	INC D
6E9C	DEC C
6E9D	JR NZ,$6E91
6E9F	LD A,D
6EA0	SUB $49
6EA2	SBC A,A
6EA3	ADD A,$59
6EA5	LD D,A
6EA6	LD B,$04
6EA8	LD A,$06
6EAA	LD (DE),A
6EAB	INC E
6EAC	DJNZ $6EAA
6EAE	POP HL
6EAF	LD B,$14
6EB1	PUSH BC
6EB2	PUSH HL
6EB3	LD A,B
6EB4	AND $07
6EB6	LD D,$00
6EB8	OUT ($FE),A
6EBA	XOR $10
6EBC	LD B,D
6EBD	DJNZ $6EBD
6EBF	DEC D
6EC0	JR NZ,$6EB8
6EC2	LD B,$08
6EC4	XOR A
6EC5	RLD
6EC7	DEC L
6EC8	RLD
6ECA	INC L
6ECB	OR (HL)
6ECC	LD (HL),A
6ECD	INC H
6ECE	DJNZ $6EC4
6ED0	POP HL
6ED1	POP BC
6ED2	DJNZ $6EB1
This entry point is used by the routine at 7552.
6ED4	CALL $68AD
6ED7	LD A,($7838)
6EDA	BIT 7,A
6EDC	LD HL,$BB00
6EDF	LD A,$80
6EE1	JR Z,$6EE6
6EE3	DEC A
6EE4	LD L,$04
6EE6	LD ($7831),HL
6EE9	LD HL,$7830
6EEC	LD (HL),$03
6EEE	JR Z,$6EF1
6EF0	INC (HL)
6EF1	LD L,$21
6EF3	LD B,$03
6EF5	LD (HL),A
6EF6	INC L
6EF7	DJNZ $6EF5
6EF9	LD B,$08
6EFB	LD (HL),$00
6EFD	INC L
6EFE	DJNZ $6EFB
6F00	LD L,$1A
6F02	LD (HL),$01
6F04	LD HL,$0000
6F07	LD ($7814),HL
6F0A	LD HL,($7836)
6F0D	LD ($782E),HL
6F10	BIT 7,A
6F12	LD B,$03
6F14	JR NZ,$6F17
6F16	INC B
6F17	LD A,H
6F18	SUB $99
6F1A	SUB $05
6F1C	JR NC,$6F1A
6F1E	ADD A,$05
6F20	ADD A,A
6F21	ADD A,A
6F22	DEC A
6F23	LD ($7833),A
6F26	LD A,$9E
6F28	ADD A,$05
6F2A	CP H
6F2B	JR C,$6F28
6F2D	SUB $05
6F2F	LD H,A
6F30	LD A,L
6F31	SUB B
6F32	LD L,A
6F33	JR NC,$6F39
6F35	LD A,H
6F36	SUB $05
6F38	LD H,A
6F39	XOR A
6F3A	CALL $6800
6F3D	CALL $7552
6F40	CALL $6D17
6F43	NOP
6F44	NOP
6F45	NOP
6F46	NOP
6F47	NOP
6F48	NOP
6F49	NOP
6F4A	LD HL,$BC80
6F4D	LD A,($7822)
6F50	BIT 7,A
6F52	JR NZ,$6F56
6F54	LD L,$8F
6F56	LD ($783A),HL
6F59	LD A,$04
6F5B	LD ($782A),A
6F5E	RET
6F5F	NOP
6F60	NOP
6F61	NOP
6F62	LD ($782E),HL
6F65	LD C,A
6F66	LD A,(HL)
6F67	DEC A
6F68	JR Z,$6F72
6F6A	CP $29
6F6C	JR C,$6F7B
6F6E	CP $31
6F70	JR NC,$6F7B
6F72	LD ($7836),HL
6F75	LD A,($7822)
6F78	LD ($7838),A
6F7B	LD A,C
6F7C	RET
6F7D	LD A,($7834)
6F80	AND $07
6F82	RET NZ
6F83	LD A,$05
6F85	LD ($782A),A
6F88	LD A,($7834)
6F8B	AND $40
6F8D	LD HL,$BD0E
6F90	JR Z,$6F94
6F92	LD L,$21
6F94	LD ($783A),HL
6F97	RET
6F98	NOP
6F99	LD A,($7822)
6F9C	CP $90
6F9E	JR NC,$6FAA
6FA0	CP $6F
6FA2	JR C,$6FAA
6FA4	LD A,($7828)
6FA7	AND $03
6FA9	RET Z
6FAA	LD A,$06
6FAC	LD ($782A),A
6FAF	LD HL,$BDB8
6FB2	LD A,($7822)
6FB5	BIT 7,A
6FB7	JR NZ,$6FBB
6FB9	LD L,$C7
6FBB	LD ($783A),HL
6FBE	RET
6FBF	NOP
6FC0	LD DE,$0000
6FC3	LD A,($7822)
6FC6	CP $96
6FC8	JR NC,$6FDE
6FCA	LD E,$42
6FCC	CP $6A
6FCE	JR C,$6FDE
6FD0	LD E,$23
6FD2	CP $90
6FD4	RET NC
6FD5	CP $70
6FD7	RET C
6FD8	BIT 7,A
6FDA	JR NZ,$6FDE
6FDC	LD E,$65
6FDE	RLCA
6FDF	LD HL,($782E)
6FE2	JR C,$6FE6
6FE4	DEC L
6FE5	DEC L
6FE6	INC L
6FE7	LD A,(HL)
6FE8	LD HL,$BD34
6FEB	CP $43
6FED	JR C,$6FF2
6FEF	LD HL,$C400
6FF2	ADD HL,DE
6FF3	LD ($783A),HL
6FF6	LD A,$04
6FF8	LD ($782A),A
6FFB	RET
6FFC	NOP
6FFD	LD A,($7822)
7000	CP $96
7002	JR NC,$7007
7004	CP $6A
7006	RET NC
7007	LD HL,$BC9E
700A	LD DE,($782E)
700E	INC D
700F	LD B,A
7010	LD A,$03
7012	LD ($782A),A
7015	LD A,B
7016	RLCA
7017	JR NC,$702D
7019	INC E
701A	JR NZ,$7020
701C	LD A,D
701D	ADD A,$05
701F	LD D,A
7020	LD A,(DE)
7021	CP $0B
7023	JR Z,$7029
7025	CP $1E
7027	JR NZ,$7043
7029	LD L,$B3
702B	JR $7043
702D	LD L,$D6
702F	LD A,E
7030	DEC E
7031	AND A
7032	JR NZ,$7038
7034	LD A,D
7035	SUB $05
7037	LD D,A
7038	LD A,(DE)
7039	CP $0A
703B	JR Z,$7041
703D	CP $1F
703F	JR NZ,$7043
7041	LD L,$EB
7043	LD ($783A),HL
7046	RET
7047	NOP
7048	LD HL,($782E)
704B	LD (HL),$2E
704D	LD A,($7833)
7050	CP $08
7052	LD H,$42
7054	JR C,$7058
7056	LD H,$4A
7058	DEC A
7059	AND $06
705B	RRCA
705C	RRCA
705D	RRCA
705E	ADD A,$0D
7060	LD L,A
7061	LD C,$03
7063	LD E,$02
7065	LD B,$06
7067	XOR A
7068	LD (HL),A
7069	INC L
706A	DJNZ $7068
706C	LD A,L
706D	SUB $06
706F	LD L,A
7070	INC H
7071	INC H
7072	DEC C
7073	JR NZ,$7065
7075	ADD A,$20
7077	LD L,A
7078	LD A,H
7079	SUB $08
707B	LD H,A
707C	LD C,E
707D	DEC E
707E	JR NZ,$7065
7080	LD HL,$3400
7083	LD ($783C),HL
7086	RET
7087	NOP
This entry point is used by the routine at 6400.
7088	CALL $6400
708B	LD E,A
708C	LD A,H
708D	CP $9F
708F	JR C,$709B
7091	JR Z,$7097
7093	SUB $05
7095	JR $708D
7097	LD A,E
7098	AND $01
709A	RET
709B	LD A,E
709C	RET
709D	LD C,(HL)
709E	BIT 7,C
70A0	RET NZ
70A1	INC L
70A2	DEC (HL)
70A3	RET NZ
70A4	LD A,C
70A5	AND $0F
70A7	LD (HL),A
70A8	INC L
70A9	DEC (HL)
70AA	JR NZ,$70AE
70AC	LD (HL),$0E
70AE	LD A,C
70AF	RLCA
70B0	RLCA
70B1	SBC A,A
70B2	BIT 5,C
70B4	JR Z,$70B7
70B6	INC A
70B7	INC L
70B8	ADD A,(HL)
70B9	LD B,A
70BA	CP $08
70BC	JR NC,$70FF
70BE	INC L
70BF	LD E,(HL)
70C0	LD D,$BB
70C2	LD A,(DE)
70C3	ADD A,B
70C4	LD E,A
70C5	LD D,$C3
70C7	LD A,(DE)
70C8	BIT 5,A
70CA	JR Z,$70EB
70CC	INC L
70CD	LD A,(HL)
70CE	XOR $80
70D0	LD (HL),A
70D1	DEC L
70D2	LD E,(HL)
70D3	INC E
70D4	LD D,$BB
70D6	LD A,(DE)
70D7	AND $3F
70D9	LD E,A
70DA	ADD A,A
70DB	ADD A,A
70DC	INC A
70DD	LD (HL),A
70DE	LD A,$60
70E0	XOR C
70E1	LD C,A
70E2	DEC L
70E3	DEC L
70E4	DEC L
70E5	DEC L
70E6	LD (HL),C
70E7	INC L
70E8	INC L
70E9	JR $70AE
70EB	DEC L
70EC	LD (HL),B
70ED	INC L
70EE	INC L
70EF	RLCA
70F0	JR NC,$70F3
70F2	DEC (HL)
70F3	RLCA
70F4	JR NC,$70F7
70F6	INC (HL)
70F7	RES 4,(HL)
70F9	RLCA
70FA	AND $10
70FC	OR (HL)
70FD	LD (HL),A
70FE	RET
70FF	INC L
7100	INC L
7101	INC L
7102	LD A,(HL)
7103	DEC L
7104	AND $1F
7106	CP $1E
7108	JR NZ,$710E
710A	BIT 7,B
710C	JR Z,$70CD
710E	CP $08
7110	JR NZ,$7116
7112	BIT 7,B
7114	JR NZ,$70CD
7116	LD E,$01
7118	INC L
7119	INC (HL)
711A	LD A,B
711B	RLCA
711C	JR NC,$7122
711E	DEC (HL)
711F	DEC (HL)
7120	LD E,$04
7122	DEC L
7123	DEC L
7124	DEC L
7125	AND $07
7127	LD (HL),A
7128	LD B,A
7129	INC L
712A	PUSH HL
712B	LD C,(HL)
712C	INC C
712D	LD B,$BB
712F	LD A,(BC)
7130	INC L
7131	INC L
7132	INC L
7133	RLCA
7134	JR C,$713B
7136	INC E
7137	INC (HL)
7138	RLCA
7139	JR C,$713D
713B	DEC E
713C	DEC (HL)
713D	LD A,E
713E	ADD A,A
713F	ADD A,E
7140	LD E,A
7141	LD A,(HL)
7142	DEC L
7143	LD L,(HL)
7144	LD H,A
7145	CALL $6400
7148	AND $0C
714A	JR Z,$714E
714C	XOR $0C
714E	CALL $699A
7151	POP DE
7152	EX DE,HL
7153	INC E
7154	LD (HL),E
7155	LD A,(DE)
7156	DEC L
7157	ADD A,(HL)
7158	LD E,A
7159	LD D,$C3
715B	LD A,(DE)
715C	JR $70ED
715E	NOP
715F	NOP
7160	NOP
This entry point is used by the routine at 7552.
7161	CALL $7535
7164	JP $6ED4
7167	NOP
7168	NOP
7169	NOP
716A	NOP
716B	NOP
716C	NOP
716D	NOP
716E	LD A,($7817)
7171	ADD A,A
7172	ADD A,A
7173	ADD A,A
7174	LD C,A
7175	LD A,($7819)
7178	ADD A,C
7179	LD C,A
717A	LD HL,($783E)
717D	LD B,$08
717F	LD A,(HL)
7180	INC L
7181	INC L
7182	LD D,(HL)
7183	INC L
7184	LD E,(HL)
7185	INC L
7186	INC L
7187	INC L
7188	RLCA
7189	JR C,$71F3
718B	LD A,(HL)
718C	ADD A,A
718D	ADD A,A
718E	ADD A,A
718F	ADD A,E
7190	SUB C
7191	JR NC,$7198
7193	CP $FD
7195	CCF
7196	JR $719A
7198	CP $44
719A	JR NC,$71F3
719C	PUSH BC
719D	PUSH HL
719E	SRA A
71A0	LD E,A
71A1	ADC A,$90
71A3	SUB E
71A4	LD B,A
71A5	DEC L
71A6	LD A,(HL)
71A7	DEC D
71A8	LD L,A
71A9	AND $E0
71AB	RLA
71AC	JR NC,$71B0
71AE	SET 6,B
71B0	RLCA
71B1	RLCA
71B2	LD C,A
71B3	RLCA
71B4	RLCA
71B5	OR B
71B6	LD B,A
71B7	LD A,C
71B8	LD C,$43
71BA	AND A
71BB	JR Z,$71D3
71BD	DEC C
71BE	CP $02
71C0	JR Z,$71D3
71C2	LD C,$45
71C4	DEC A
71C5	JR Z,$71DB
71C7	INC C
71C8	LD A,D
71C9	CP $06
71CB	JR C,$71DB
71CD	AND $03
71CF	ADD A,$02
71D1	JR $71DB
71D3	LD A,D
71D4	CP $08
71D6	JR C,$71DB
71D8	CPL
71D9	SUB $F1
71DB	BIT 4,L
71DD	JR Z,$71E0
71DF	INC A
71E0	SRL A
71E2	JR NC,$71E6
71E4	INC B
71E5	INC B
71E6	LD H,A
71E7	LD A,L
71E8	AND $0F
71EA	SUB H
71EB	LD D,A
71EC	LD A,B
71ED	DEC A
71EE	CALL $76D7
71F1	POP HL
71F2	POP BC
71F3	INC L
71F4	INC L
71F5	DJNZ $717F
71F7	RET
71F8	NOP
71F9	NOP
71FA	NOP
71FB	NOP
71FC	NOP
71FD	NOP
71FE	NOP
71FF	NOP
This entry point is used by the routine at 6400.
7200	LD HL,$7820
7203	LD A,(HL)
7204	CP $07
7206	JR Z,$720A
7208	INC (HL)
7209	INC A
720A	RRCA
720B	RRCA
720C	LD L,A
720D	AND $03
720F	ADD A,$E6
7211	LD H,A
7212	LD A,L
7213	AND $C0
7215	LD L,A
7216	LD A,$0A
7218	NOP
7219	LD DE,$FA40
721C	PUSH HL
721D	LD BC,$0040
7220	LDIR
7222	POP HL
7223	DEC A
7224	JR NZ,$721C
7226	LD H,A
7227	LD B,$08
7229	LD L,B
722A	EX DE,HL
722B	LD (HL),H
722C	ADD HL,DE
722D	DJNZ $722B
722F	LD B,E
7230	LD H,$FA
7232	LD (HL),H
7233	ADD HL,DE
7234	DJNZ $7232
7236	LD B,E
7237	LD E,$10
7239	LD (HL),H
723A	ADD HL,DE
723B	DJNZ $7239
723D	EXX
723E	LD BC,$FA46
7241	EXX
7242	LD DE,$9F20
7245	LD B,$0A
7247	PUSH BC
7248	LD B,$08
724A	CALL $6400
724D	AND $1F
724F	CP $1F
7251	JR Z,$724A
7253	CP $08
7255	JR C,$724A
7257	LD L,A
7258	CALL $6400
725B	AND $03
725D	LD H,A
725E	ADD HL,DE
725F	LD A,(HL)
7260	DEC A
7261	JR Z,$726B
7263	CP $31
7265	JR NC,$724A
7267	CP $2D
7269	JR C,$724A
726B	PUSH HL
726C	EXX
726D	LD H,B
726E	LD L,C
726F	POP DE
7270	LD A,(HL)
7271	AND A
7272	JR Z,$7284
7274	INC L
7275	CP E
7276	JR NZ,$727E
7278	LD A,(HL)
7279	CP D
727A	EXX
727B	JR Z,$724A
727D	EXX
727E	LD A,L
727F	ADD A,$07
7281	LD L,A
7282	JR $7270
7284	LD (HL),E
7285	INC L
7286	LD (HL),D
7287	EXX
7288	DJNZ $724A
728A	EXX
728B	LD HL,$0040
728E	ADD HL,BC
728F	LD B,H
7290	LD C,L
7291	EXX
7292	LD A,E
7293	ADD A,$20
7295	LD E,A
7296	JR NZ,$729C
7298	LD A,D
7299	ADD A,$05
729B	LD D,A
729C	POP BC
729D	DJNZ $7247
729F	CALL $74DC
72A2	LD HL,$3280
72A5	LD A,($782D)
72A8	CP $73
72AA	JR Z,$72AE
72AC	LD H,$0B
72AE	NOP
72AF	NOP
72B0	LD ($7841),HL
72B3	XOR A
72B4	LD ($7840),A
72B7	JP $7396
72BA	NOP
72BB	NOP
72BC	NOP
72BD	NOP
72BE	NOP
72BF	NOP
72C0	NOP
72C1	NOP
72C2	NOP
72C3	LD A,($7840)
72C6	AND A
72C7	JR Z,$72E2
72C9	LD HL,$7843
72CC	DEC (HL)
72CD	JR NZ,$72E2
72CF	LD (HL),$03
72D1	LD HL,($7841)
72D4	DEC HL
72D5	LD ($7841),HL
72D8	LD A,H
72D9	AND A
72DA	JR NZ,$72E2
72DC	LD A,L
72DD	CP $80
72DF	CALL Z,$77E0
72E2	LD HL,($7817)
72E5	LD A,H
72E6	SUB $99
72E8	LD B,$FE
72EA	INC B
72EB	INC B
72EC	SUB $05
72EE	JR NZ,$72EA
72F0	LD A,L
72F1	AND $E0
72F3	ADD A,A
72F4	LD L,A
72F5	ADC A,B
72F6	SUB L
72F7	ADD A,$FA
72F9	LD H,A
72FA	CALL $E84D
72FD	LD B,$08
72FF	PUSH HL
7300	PUSH BC
7301	CALL $709D
7304	POP BC
7305	POP HL
7306	LD DE,$0008
7309	ADD HL,DE
730A	DJNZ $72FF
730C	RET
730D	NOP
730E	NOP
730F	NOP
7310	NOP
7311	CALL $6B2D
This entry point is used by the routine at 7552.
7314	CALL $716E
7317	LD HL,($7817)
731A	LD A,L
731B	RLCA
731C	RLCA
731D	RLCA
731E	LD L,A
731F	AND $07
7321	LD B,A
7322	LD A,L
7323	AND $F8
7325	LD L,A
7326	LD A,($7819)
7329	ADD A,L
732A	LD L,A
732B	LD A,H
732C	LD H,$F8
732E	LD DE,$0800
7331	SUB $99
7333	ADD HL,DE
7334	SUB $05
7336	JR NZ,$7333
7338	LD A,H
7339	ADD A,B
733A	LD H,A
733B	PUSH HL
733C	LD DE,$0008
733F	SBC HL,DE
7341	EX DE,HL
7342	LD HL,($7841)
7345	SBC HL,DE
7347	LD A,H
7348	AND A
7349	JR NZ,$736C
734B	LD A,L
734C	CP $50
734E	JR NC,$736C
7350	SUB $08
7352	SRA A
7354	LD C,$44
7356	LD E,A
7357	LD D,$0B
7359	LD A,$00
735B	ADC A,$00
735D	CALL $76D7
7360	LD A,($7825)
7363	CP $44
7365	JR NZ,$736C
7367	LD A,$01
7369	LD ($7840),A
736C	POP HL
736D	LD A,($7840)
7370	AND A
7371	RET Z
7372	LD A,H
7373	AND A
7374	RET NZ
7375	LD A,L
7376	CP $80
7378	RET NC
7379	LD A,$80
737B	SUB L
737C	NOP
737D	NOP
737E	NOP
737F	NOP
7380	NOP
7381	LD C,$47
7383	LD D,$0B
7385	SRA A
7387	LD E,A
7388	LD A,$40
738A	ADC A,$00
738C	CALL $76D7
738F	RET
7390	NOP
7391	NOP
7392	NOP
7393	NOP
7394	NOP
7395	NOP
7396	LD HL,$FA47
7399	LD B,$50
739B	LD A,(HL)
739C	DEC L
739D	DEC L
739E	SUB $9A
73A0	SUB $05
73A2	JR NC,$73A0
73A4	ADD A,$06
73A6	CP $05
73A8	JR Z,$73AF
73AA	ADD A,A
73AB	ADD A,A
73AC	DEC A
73AD	ADD A,(HL)
73AE	LD (HL),A
73AF	LD DE,$000A
73B2	ADD HL,DE
73B3	DJNZ $739B
73B5	RET
73B6	INC BC
73B7	LD A,$04
73B9	LD ($7839),A
73BC	LD HL,$3400
73BF	LD ($783C),HL
73C2	CALL $6828
73C5	AND A
73C6	JR Z,$73D1
73C8	NOP
73C9	NOP
73CA	NOP
73CB	NOP
73CC	NOP
73CD	NOP
73CE	JP $E81B
73D1	CALL $6400
73D4	AND $0C
73D6	JR Z,$73D1
73D8	XOR $0C
73DA	LD HL,($7831)
73DD	INC L
73DE	INC L
73DF	INC L
73E0	LD D,A
73E1	LD A,($7822)
73E4	CP (HL)
73E5	LD A,$00
73E7	JR Z,$73EF
73E9	JR C,$73ED
73EB	LD A,$03
73ED	XOR $01
73EF	OR D
73F0	RET
73F1	NOP
73F2	LD A,($7825)
73F5	AND A
73F6	RET NZ
73F7	LD HL,$FFF8
73FA	ADD HL,BC
73FB	EXX
73FC	LD A,L
73FD	SUB $07
73FF	LD L,A
7400	SBC A,A
7401	ADD A,H
7402	LD H,A
7403	LD DE,$0400
7406	LD A,(HL)
7407	EXX
7408	OR (HL)
7409	XOR (HL)
740A	INC HL
740B	INC HL
740C	EXX
740D	CP (HL)
740E	JR Z,$7411
7410	INC E
7411	INC HL
7412	DEC D
7413	JR NZ,$7406
7415	INC HL
7416	INC HL
7417	INC HL
7418	LD A,E
7419	LD ($7825),A
741C	EXX
741D	RET
741E	NOP
741F	NOP
This entry point is used by the routine at 7552.
7420	LD HL,($7844)
7423	LD DE,($7846)
7427	AND A
7428	SBC HL,DE
742A	RET Z
742B	ADD HL,DE
This entry point is used by the routine at 7552.
742C	LD ($7846),HL
742F	EXX
7430	LD DE,$51C6
7433	EXX
This entry point is used by the routine at 7552.
7434	LD DE,$784B
7437	LD BC,$D810
743A	LD A,$FF
743C	INC A
743D	ADD HL,BC
743E	JR C,$743C
7440	SBC HL,BC
7442	LD (DE),A
7443	INC E
7444	LD BC,$FC18
7447	LD A,$FF
7449	INC A
744A	ADD HL,BC
744B	JR C,$7449
744D	SBC HL,BC
744F	LD (DE),A
7450	INC E
7451	LD BC,$FF9C
7454	LD A,$FF
7456	INC A
7457	ADD HL,BC
7458	JR C,$7456
745A	SBC HL,BC
745C	LD (DE),A
745D	INC E
745E	LD C,$F6
7460	LD A,$FF
7462	INC A
7463	ADD HL,BC
7464	JR C,$7462
7466	LD (DE),A
7467	INC E
7468	LD A,L
7469	ADD A,$0A
746B	LD (DE),A
746C	EXX
746D	LD BC,$784B
7470	LD A,(BC)
7471	ADD A,A
7472	ADD A,A
7473	ADD A,A
7474	ADD A,$81
7476	LD L,A
7477	LD H,$3D
7479	LD A,(HL)
747A	LD (DE),A
747B	INC L
747C	INC D
747D	LD A,(HL)
747E	LD (DE),A
747F	INC L
7480	INC D
7481	LD A,(HL)
7482	LD (DE),A
7483	INC L
7484	INC D
7485	LD A,(HL)
7486	LD (DE),A
7487	INC L
7488	INC D
7489	LD A,(HL)
748A	LD (DE),A
748B	INC L
748C	INC D
748D	LD A,(HL)
748E	LD (DE),A
748F	LD D,$51
7491	INC E
7492	INC C
7493	BIT 3,C
7495	JR NZ,$7470
7497	EXX
7498	RET
7499	NOP
749A	NOP
749B	NOP
This entry point is used by the routines at 7552 and ECAB.
749C	LD HL,$4000
749F	LD (HL),L
74A0	LD BC,$1B00
74A3	LD D,H
74A4	LD E,L
74A5	INC E
74A6	LDIR
74A8	RET
74A9	EXX