Flunky: Routine at A084

A084: Routine at A084

Used by the routines at 9597 and A057.
A084	CALL $A0AD
A087	ADD A,A
A088	INC A
A089	NEG
A08B	ADD A,(IX+$05)
A08E	INC D
A08F	LD BC,$7994
This entry point is used by the routines at A068 and A076.
A092	LD (IY+$05),A
A095	ADD A,E
A096	LD (IY+$07),A
A099	LD (IY+$01),D
A09C	LD A,($6D92)
A09F	CP $10
A0A1	RET NZ
A0A2	LD IY,$CEA9
A0A6	LD (IY+$02),C
A0A9	LD (IY+$03),B
A0AC	RET
This entry point is used by the routines at A063, A068 and A076.
A0AD	BIT 4,(IX+$09)
A0B1	JR NZ,$A0B5
A0B3	POP BC
A0B4	RET
A0B5	LD IY,($6DC0)
A0B9	LD A,(IX+$00)
A0BC	LD (IY+$00),A
A0BF	CALL $A14F
A0C2	LD A,(IY+$07)
A0C5	SUB (IY+$05)
A0C8	LD E,A
A0C9	SRL A
A0CB	LD D,(IX+$01)
A0CE	RET
This entry point is used by the routine at 9F53.
A0CF	LD A,(IX+$06)
A0D2	SUB (IX+$04)
A0D5	LD C,A
A0D6	LD A,(IY+$06)
A0D9	ADD A,B
A0DA	LD (IX+$06),A
A0DD	SUB C
A0DE	LD (IX+$04),A
A0E1	LD A,(IX+$07)
A0E4	SUB (IX+$05)
A0E7	LD B,A
A0E8	SRL A
A0EA	LD C,A
A0EB	LD A,(IY+$07)
A0EE	SUB (IY+$05)
A0F1	SRL A
A0F3	ADD A,(IY+$05)
A0F6	SUB C
A0F7	LD (IX+$05),A
A0FA	ADD A,B
A0FB	LD (IX+$07),A
A0FE	LD A,(IX+$08)
A101	CP $1F
A103	RET NZ
A104	PUSH HL
A105	CALL $93CA
A108	POP HL
A109	LD A,($6D88)
A10C	DEC A
A10D	RET NZ
A10E	LD A,(IX+$00)
A111	CP $05
A113	RET NZ
A114	LD A,($6D83)
A117	SET 3,A
A119	LD ($6D83),A
A11C	RET
This entry point is used by the routine at 9D30.
A11D	LD IY,($6D65)
A121	LD ($6DC0),IY
A125	RES 3,(IY+$0A)
A129	SET 4,(IY+$0A)
This entry point is used by the routines at 9165 and 9F53.
A12D	SET 4,(IX+$09)
A131	LD A,(IY+$08)
A134	LD ($6D92),A
A137	LD A,(IY+$07)
A13A	SUB (IY+$05)
A13D	LD ($6D9A),A
A140	LD E,A
A141	SRL A
A143	XOR $01
A145	ADD A,(IX+$05)
A148	LD (IY+$05),A
A14B	ADD A,E
A14C	LD (IY+$07),A
A14F	LD A,(IY+$06)
A152	SUB (IY+$04)
A155	LD E,A
A156	SRL A
A158	LD D,A
A159	LD A,(IX+$04)
A15C	ADD A,$05
A15E	SUB D
A15F	LD (IY+$04),A
A162	ADD A,E
A163	LD (IY+$06),A
A166	RET
This entry point is used by the routine at 9EEC.
A167	LD BC,$01FF
A16A	JR $A16F
This entry point is used by the routine at 9F1D.
A16C	LD BC,$0000
A16F	LD IY,($6D81)
A173	LD DE,$000C
A176	LD A,(IY+$08)
A179	CP $29
A17B	JR Z,$A182
A17D	RES 5,(IX+$09)
A181	RET
A182	LD A,(IX+$00)
A185	CP (IY+$00)
A188	JR NZ,$A1BE
A18A	LD A,(IX+$01)
A18D	CP (IY+$01)
A190	JR NZ,$A1BE
A192	LD A,(IX+$07)
A195	CP (IY+$05)
A198	JR C,$A1BE
A19A	LD A,(IY+$07)
A19D	CP (IX+$05)
A1A0	JR C,$A1BE
A1A2	LD A,(IX+$06)
A1A5	ADD A,B
A1A6	CP (IY+$04)
A1A9	JR C,$A1BE
A1AB	LD A,(IY+$06)
A1AE	ADD A,C
A1AF	CP (IX+$06)
A1B2	JR C,$A1BE
A1B4	SET 5,(IX+$09)
A1B8	LD ($6DBE),IY
A1BC	XOR A
A1BD	RET
A1BE	ADD IY,DE
A1C0	JR $A176