180: Routine at CC84

CC84: Routine at CC84


CC84	NOP
CC85	CP H
CC86	AND H
CC87	XOR B
CC88	XOR L
CC89	LD L,E
CC8A	SBC A,D
CC8B	SUB L
CC8C	DJNZ $CC12
CC8E	LD A,H
CC8F	LD C,D
CC90	ADD HL,SP
CC91	LD E,B
CC92	XOR C
CC93	LD BC,$32AF
CC96	ADD HL,BC
CC97	RET NC
CC98	POP HL
CC99	JP $CC66
CC9C	LD C,(IX+$05)
CC9F	LD B,(IX+$06)
CCA2	LD L,(IX+$03)
CCA5	LD H,(IX+$04)
CCA8	ADD HL,BC
CCA9	INC BC
CCAA	INC BC
CCAB	LD A,(HL)
CCAC	INC HL
CCAD	LD D,(HL)
CCAE	LD E,A
CCAF	OR D
CCB0	JR NZ,$CCBE
CCB2	LD L,(IX+$03)
CCB5	LD H,(IX+$04)
CCB8	LD BC,$0002
CCBB	LD E,(HL)
CCBC	INC HL
CCBD	LD D,(HL)
CCBE	LD (IX+$05),C
CCC1	LD (IX+$06),B
CCC4	LD B,$00
CCC6	JP $CD58
CCC9	LD A,(IX+$1E)
CCCC	LD C,A
CCCD	AND $07
CCCF	LD HL,$CEE2
CCD2	XOR (HL)
CCD3	AND C
CCD4	XOR (HL)
CCD5	LD (HL),A
CCD6	JP $CD58
CCD9	LD A,(IX+$1E)
CCDC	LD C,A
CCDD	AND $38
CCDF	LD HL,$CEE2
CCE2	XOR (HL)
CCE3	AND C
CCE4	XOR (HL)
CCE5	LD (HL),A
CCE6	JP $CD58
CCE9	LD HL,$CEE2
CCEC	LD A,(IX+$1E)
CCEF	CPL
CCF0	AND (HL)
CCF1	LD (HL),A
CCF2	JR $CD58
CCF4	LD A,(DE)
CCF5	INC DE
CCF6	LD (IX+$07),B
CCF9	LD (IX+$08),B
CCFC	LD (IX+$0D),A
CCFF	SET 2,(IX+$00)
CD03	LD A,(DE)
CD04	LD (IX+$0E),A
CD07	INC DE
CD08	JR $CD58
CD0A	LD A,(DE)
CD0B	INC DE
CD0C	LD ($CBFD),A
CD0F	JR $CD58
CD11	LD A,(DE)
CD12	LD (IX+$1B),A
CD15	INC DE
CD16	LD A,(DE)
CD17	LD (IX+$1A),A
CD1A	INC DE
CD1B	LD (IX+$1C),A
CD1E	JR $CD58
CD20	SET 7,(IX+$00)
CD24	SET 3,(IX+$00)
CD28	JR $CD58
CD2A	LD (IX+$1D),B
CD2D	JR $CD58
CD2F	LD (IX+$1D),$40
CD33	JR $CD58
CD35	LD (IX+$1D),$C0
CD39	JR $CD58
CD3B	SET 1,(IX+$00)
CD3F	JR $CD58
CD41	LD (IX+$13),B
CD44	RES 5,(IX+$00)
CD48	JR $CD7B
This entry point is used by the routine at CBF7.
CD4A	DEC (IX+$10)
CD4D	JR NZ,$CD88
CD4F	LD (IX+$00),B
CD52	LD E,(IX+$01)
CD55	LD D,(IX+$02)
CD58	LD A,(DE)
CD59	INC DE
CD5A	AND A
CD5B	JP M,$CD99
CD5E	LD (IX+$12),A
CD61	LD A,(IX+$19)
CD64	LD (IX+$13),A
CD67	SET 5,(IX+$00)
CD6B	SET 6,(IX+$00)
CD6F	LD A,(IX+$14)
CD72	LD (IX+$16),A
CD75	LD A,(IX+$17)
CD78	LD (IX+$18),A
CD7B	LD A,(IX+$11)
CD7E	LD (IX+$10),A
CD81	LD (IX+$02),D
CD84	LD (IX+$01),E
CD87	RET
CD88	LD A,(IX+$00)
CD8B	BIT 3,A
CD8D	RET Z
CD8E	RLA
CD8F	JR NC,$CD95
CD91	INC (IX+$12)
CD94	RET
CD95	DEC (IX+$12)
CD98	RET
CD99	CP $B8
CD9B	JR C,$CDE4
CD9D	ADD A,$20
CD9F	JR C,$CDC9
CDA1	ADD A,$10
CDA3	JR C,$CDCF
CDA5	ADD A,$10
CDA7	JR NC,$CDC2
CDA9	LD C,A
CDAA	LD HL,$CFCB
CDAD	ADD HL,BC
CDAE	LD C,(HL)
CDAF	ADD HL,BC
CDB0	LD (IX+$0B),L
CDB3	LD (IX+$09),L
CDB6	LD (IX+$0C),H
CDB9	LD (IX+$0A),H
CDBC	SET 4,(IX+$00)
CDC0	JR $CD58
CDC2	ADD A,$09
CDC4	LD ($CC21),A
CDC7	JR $CD58
CDC9	INC A
CDCA	LD (IX+$11),A
CDCD	JR $CD58
CDCF	LD (IX+$19),A
CDD2	LD A,(DE)
CDD3	INC DE
CDD4	LD (IX+$14),A
CDD7	LD A,(DE)
CDD8	INC DE
CDD9	LD (IX+$15),A
CDDC	LD A,(DE)
CDDD	INC DE
CDDE	LD (IX+$17),A
CDE1	JP $CD58
CDE4	LD HL,$CC05
CDE7	LD C,A
CDE8	ADD HL,BC
CDE9	LD C,(HL)
CDEA	ADD HL,BC
CDEB	JP (HL)
This entry point is used by the routine at CBF7.
CDEC	LD C,(IX+$00)
CDEF	BIT 5,C
CDF1	JR Z,$CE37
CDF3	LD A,(IX+$16)
CDF6	SUB $10
CDF8	JR NC,$CE1F
CDFA	BIT 6,C
CDFC	JR Z,$CE24
CDFE	ADD A,(IX+$13)
CE01	JR NC,$CE04
CE03	SBC A,A
CE04	ADD A,$10
CE06	LD (IX+$13),A
CE09	LD A,(IX+$18)
CE0C	SUB $10
CE0E	JR NC,$CE1A
CE10	RES 6,C
CE12	LD A,(IX+$15)
CE15	LD (IX+$16),A
CE18	JR $CE37
CE1A	LD (IX+$18),A
CE1D	JR $CE37
CE1F	LD (IX+$16),A
CE22	JR $CE37
CE24	CPL
CE25	SUB $0F
CE27	ADD A,(IX+$13)
CE2A	JR C,$CE2D
CE2C	SUB A
CE2D	LD (IX+$13),A
CE30	DEC (IX+$18)
CE33	JR NZ,$CE37
CE35	RES 5,C
CE37	LD A,(IX+$12)
CE3A	BIT 4,C
CE3C	JR Z,$CE59
CE3E	LD B,A
CE3F	LD L,(IX+$0B)
CE42	LD H,(IX+$0C)
CE45	LD A,(HL)
CE46	CP $54
CE48	JR C,$CE51
CE4A	LD L,(IX+$09)
CE4D	LD H,(IX+$0A)
CE50	LD A,(HL)
CE51	INC HL
CE52	LD (IX+$0B),L
CE55	LD (IX+$0C),H
CE58	ADD A,B
CE59	LD HL,$CF0B
CE5C	LD D,$00
CE5E	ADD A,A
CE5F	LD E,A
CE60	ADD HL,DE
CE61	LD E,(HL)
CE62	INC HL
CE63	LD D,(HL)
CE64	LD L,(IX+$1D)
CE67	BIT 6,L
CE69	JR Z,$CEB3
CE6B	LD H,A
CE6C	LD B,(IX+$1A)
CE6F	SLA B
CE71	BIT 7,L
CE73	LD A,(IX+$1C)
CE76	JR Z,$CE7C
CE78	BIT 0,C
CE7A	JR NZ,$CE9A
CE7C	BIT 5,L
CE7E	JR NZ,$CE8C
CE80	SUB (IX+$1B)
CE83	JR NC,$CE97
CE85	SET 5,(IX+$1D)
CE89	SUB A
CE8A	JR $CE97
CE8C	ADD A,(IX+$1B)
CE8F	CP B
CE90	JR C,$CE97
CE92	RES 5,(IX+$1D)
CE96	LD A,B
CE97	LD (IX+$1C),A
CE9A	EX DE,HL
CE9B	SRL B
CE9D	SUB B
CE9E	LD E,A
CE9F	LD A,D
CEA0	LD D,$00
CEA2	JR NC,$CEA5
CEA4	DEC D
CEA5	ADD A,$A0
CEA7	JR C,$CEB1
CEA9	SLA E
CEAB	RL D
CEAD	ADD A,$18
CEAF	JR NC,$CEA9
CEB1	ADD HL,DE
CEB2	EX DE,HL
CEB3	LD A,C
CEB4	XOR $01
CEB6	LD (IX+$00),A
CEB9	BIT 2,C
CEBB	JR Z,$CEDE
CEBD	LD B,(IX+$0E)
CEC0	DJNZ $CEDB
CEC2	LD C,(IX+$0D)
CEC5	BIT 7,C
CEC7	JR Z,$CECA
CEC9	DEC B
CECA	LD L,(IX+$07)
CECD	LD H,(IX+$08)
CED0	ADD HL,BC
CED1	LD (IX+$07),L
CED4	LD (IX+$08),H
CED7	ADD HL,DE
CED8	EX DE,HL
CED9	JR $CEDE
CEDB	LD (IX+$0E),B
CEDE	CPL
CEDF	AND $03
CEE1	LD A,$38
CEE3	JR NZ,$CEEF
CEE5	LD A,($CBFD)
CEE8	XOR $08
CEEA	LD ($CC4A),A
CEED	LD A,$07
CEEF	LD HL,$CF04
CEF2	XOR (HL)
CEF3	AND (IX+$1E)
CEF6	XOR (HL)
CEF7	LD (HL),A
CEF8	EX DE,HL
CEF9	LD A,(IX+$13)
CEFC	RET