Chaos: Routine at AECC

AECC: COUNTL


COUNTL	AECC	LD A,(unknown23)
	AECF	OR A
	AED0	JR NZ,COUNTL_2
	AED2	JP COUNTL_5
This entry point is used by the routine at routine23.
COUNTL_0	AED5	LD A,(unknown25)
	AED8	CP $25
	AEDA	JR Z,COUNTL_1
	AEDC	CP $23
	AEDE	JP P,COUNTL_3
COUNTL_1	AEE1	LD A,(unknown27)
	AEE4	AND $07
	AEE6	LD HL,(current_player)
This entry point is used by the routine at routine23.
COUNTL_2	AEE9	CP L
	AEEA	JP NZ,routine25
	AEED	LD A,(unknown26)
	AEF0	OR A
	AEF1	JP Z,routine23_14
	AEF4	LD A,(unknown25)
	AEF7	CP $10
	AEF9	JP M,routine23_14
	AEFC	CP $16
	AEFE	JP P,routine23_14
	AF01	JR COUNTL_5
	AF03	CP $24
	AF05	JR NZ,COUNTL_3
	AF07	LD A,(unknown26)
	AF0A	OR A
	AF0B	JR NZ,COUNTL_5
COUNTL_3	AF0D	LD A,(unknown25)
	AF10	CP $26
	AF12	JP M,COUNTL_4
	AF15	CP $28
	AF17	JP P,COUNTL_4
	AF1A	LD A,(unknown26)
	AF1D	OR A
	AF1E	JR Z,COUNTL_4
	AF20	LD A,(unknown27)
	AF23	AND $07
	AF25	LD HL,(current_player)
	AF28	CP L
	AF29	JR Z,COUNTL_5
COUNTL_4	AF2B	LD A,(unknown25)
	AF2E	CP $29
	AF30	JP M,routine23_14
	AF33	LD HL,(D_ADD)
	AF36	LD A,(HL)
	AF37	CP $29
	AF39	JP P,routine25
	AF3C	LD DE,$01E1
	AF3F	ADD HL,DE
	AF40	LD A,(HL)
	AF41	AND $07
	AF43	LD E,A
	AF44	LD A,(unknown25)
	AF47	SUB $29
	AF49	CP E
	AF4A	JP NZ,routine25
	AF4D	JP routine23_14
This entry point is used by the routines at routine23 and routine25.
COUNTL_5	AF50	LD A,(unknown21)
	AF53	OR A
	AF54	JP NZ,routine23_14
	AF57	LD A,$00
	AF59	LD (unknown29),A
	AF5C	LD BC,(unknown24)
	AF60	LD (cursor_coordinates),BC
	AF64	LD HL,(D_ADD)
	AF67	LD A,(HL)
	AF68	CP $25
	AF6A	JP Z,COUNTL_13
	AF6D	LD (unknown25),A
	AF70	LD E,A
	AF71	LD A,(unknown26)
	AF74	CP E
	AF75	JR Z,COUNTL_6
	AF77	OR A
	AF78	JR Z,COUNTL_6
	AF7A	LD (unknown25),A
	AF7D	LD HL,(D_ADD)
	AF80	LD DE,$0281
	AF83	XOR A
	AF84	ADD HL,DE
	AF85	LD (HL),A
	AF86	JR COUNTL_7
COUNTL_6	AF88	LD HL,(D_ADD)
	AF8B	LD DE,$0321
	AF8E	ADD HL,DE
	AF8F	LD A,(HL)
	AF90	OR A
	AF91	JR Z,COUNTL_8
	AF93	LD HL,(D_ADD)
	AF96	LD (HL),A
	AF97	LD DE,$00A1
	AF9A	ADD HL,DE
	AF9B	LD A,$01
	AF9D	LD (HL),A
	AF9E	DEC E
	AF9F	ADD HL,DE
	AFA0	LD A,$04
	AFA2	LD (HL),A
COUNTL_7	AFA3	LD HL,(D_ADD)
	AFA6	LD DE,$01E1
	AFA9	ADD HL,DE
	AFAA	LD A,(HL)
	AFAB	LD (unknown27),A
	AFAE	LD DE,$00A0
	AFB1	ADD HL,DE
	AFB2	LD A,(HL)
	AFB3	LD (unknown23),A
	AFB6	XOR A
	AFB7	LD (HL),A
	AFB8	JR COUNTL_9
COUNTL_8	AFBA	LD HL,(D_ADD)
	AFBD	LD A,$01
	AFBF	LD (HL),A
	AFC0	LD DE,$00A1
	AFC3	ADD HL,DE
	AFC4	LD (HL),A
	AFC5	JR COUNTL_7
COUNTL_9	AFC7	LD HL,(object_table_entry_pointer)
	AFCA	LD A,(HL)
	AFCB	OR A
	AFCC	JR Z,COUNTL_10
	AFCE	LD DE,$0141
	AFD1	ADD HL,DE
	AFD2	LD A,(HL)
	AFD3	CP $04
	AFD5	JR Z,COUNTL_10
	AFD7	DEC E
	AFD8	LD A,(unknown26)
	AFDB	ADD HL,DE
	AFDC	LD (HL),A
	AFDD	JR COUNTL_11
COUNTL_10	AFDF	LD HL,(object_table_entry_pointer)
	AFE2	LD A,(HL)
	AFE3	PUSH AF
	AFE4	LD A,(unknown25)
	AFE7	LD (HL),A
	AFE8	POP AF
	AFE9	LD DE,$0321
	AFEC	ADD HL,DE
	AFED	LD (HL),A
	AFEE	LD DE,$0280
	AFF1	SBC HL,DE
	AFF3	LD A,$01
	AFF5	LD (HL),A
	AFF6	LD DE,$00A0
	AFF9	ADD HL,DE
	AFFA	LD A,$00
	AFFC	LD (HL),A
	AFFD	ADD HL,DE
	AFFE	LD A,(unknown27)
	B001	LD (HL),A
	B002	ADD HL,DE
	B003	LD A,(unknown23)
	B006	LD (HL),A
COUNTL_11	B007	LD HL,sound_effect_11
	B00A	CALL play_sound_effect_in_HL
	B00D	EI
	B00E	LD HL,(object_table_entry_pointer)
	B011	LD (D_ADD),HL
	B014	LD A,(unknown39)
	B017	OR A
	B018	JR NZ,COUNTL_13
	B01A	LD A,(HL)
	B01B	CP $24
	B01D	JR Z,COUNTL_12
	B01F	CALL routine45
	B022	LD A,(unknown20)
	B025	OR A
	B026	CALL NZ,routine47
	B029	CALL wait_no_key_seed
	B02C	LD A,(unknown21)
	B02F	OR A
	B030	JP NZ,routine23_14
	B033	LD A,(unknown18)
	B036	OR A
	B037	JR NZ,COUNTL_13
COUNTL_12	B039	CALL wait_no_key_seed
	B03C	LD A,(movement_x2)
	B03F	LD E,A
	B040	LD A,(unknown17)
	B043	SUB E
	B044	JP M,COUNTL_13
	B047	JR Z,COUNTL_13
	B049	LD (unknown17),A
	B04C	CALL clear_bottom_row
	B04F	LD A,$44
	B051	LD ($5C8F),A
	B054	LD BC,$1600
	B057	LD A,$38
	B059	CALL MPRINT
	B05C	LD A,$46
	B05E	LD ($5C8F),A
	B061	LD A,(unknown17)
	B064	INC A
	B065	SRA A
	B067	ADD A,$30
	B069	CALL DH_P
	B06C	JP routine23_14
This entry point is used by the routines at routine23, routine24 and routine25.
COUNTL_13	B06F	LD HL,(D_ADD)
	B072	LD DE,$01E1
	B075	ADD HL,DE
	B076	SET 7,(HL)
	B078	CALL clear_bottom_row
	B07B	LD HL,(D_ADD)
	B07E	LD A,(HL)
	B07F	CP $25
	B081	RET Z
	B082	LD A,$01
	B084	LD (unknown30),A
	B087	XOR A
	B088	LD (unknown34),A
	B08B	LD (unknown29),A
	B08E	LD (unknown39),A
	B091	LD HL,(D_ADD)
	B094	LD A,(HL)
	B095	OR A
	B096	RET Z
	B097	LD D,(HL)
	B098	LD E,$0F
	B09A	CALL GETCHR
	B09D	OR A
	B09E	RET Z
	B09F	LD (unknown13),A
	B0A2	CALL wait_no_key_seed
	B0A5	JP routine35