Sherlock: Routine at 43447

43447: Routine at A9B7

Used by the routines at 41634, 41853, 42445, 42554, 42563, 42806, 43136, 46975, 53506, 54566 and 56428.
43447	PUSH AF
43448	LD A,(40999)
43451	AND A
43452	JR NZ,43536
43454	POP AF
43455	PUSH AF
43456	PUSH HL
43457	LD HL,(43445)
43460	CP 32
43462	JR Z,43487
43464	CP 13
43466	JR Z,43487
43468	CP 34
43470	JR Z,43487
43472	CP 8
43474	JR NZ,43479
43476	DEC HL
43477	JR 43481
43479	LD (HL),A
43480	INC HL
43481	LD (43445),HL
43484	POP HL
43485	POP AF
43486	RET
43487	PUSH DE
43488	LD DE,23563
43491	AND A
43492	SBC HL,DE
43494	JR Z,43531
43496	LD A,(49653)
43499	CP L
43500	PUSH AF
43501	JR NC,43508
43503	LD A,13
43505	CALL 43540
43508	PUSH BC
43509	LD B,L
43510	LD HL,23563
43513	LD (43445),HL
43516	LD A,(HL)
43517	CALL 43540
43520	INC HL
43521	DJNZ 43516
43523	POP BC
43524	POP AF
43525	JR NZ,43531
43527	XOR A
43528	LD (40997),A
43531	POP DE
43532	POP HL
43533	POP AF
43534	JR 43540
43536	POP AF
43537	JP 49633
43540	CP 65
43542	JR C,43550
43544	CP 91
43546	JR NC,43550
43548	OR 32
43550	PUSH AF
43551	LD A,(40997)
43554	AND A
43555	JR NZ,43562
43557	POP AF
43558	CP 32
43560	RET Z
43561	PUSH AF
43562	LD A,1
43564	LD (40997),A
43567	POP AF
43568	PUSH AF
43569	CP 13
43571	JR NZ,43579
43573	XOR A
43574	LD (40997),A
43577	JR 43629
43579	CP 34
43581	JR NZ,43590
43583	LD A,32
43585	CALL 49633
43588	JR 43594
43590	CP 46
43592	JR NZ,43601
43594	LD A,1
43596	LD (40998),A
43599	JR 43629
43601	CP 97
43603	JR C,43629
43605	CP 123
43607	JR NC,43629
43609	LD A,(43089)
43612	AND A
43613	JR NZ,43621
43615	LD A,(40998)
43618	AND A
43619	JR Z,43629
43621	XOR A
43622	LD (40998),A
43625	POP AF
43626	AND 95
43628	PUSH AF
43629	POP AF
43630	JP 49633
43633	SBC A,C
43634	SBC A,D
43635	RES 3,D
43637	AND E
43638	POP HL
43639	LD (992),HL
43642	RET PO
43643	SBC A,L
43644	SBC A,175
43646	SBC A,50
43648	CALL PO,58378
43651	JR Z,43624
43653	RST 0
43654	JP PO,58346
43657	ADC A,L
43658	RET PO
43659	CALL P,57754
43662	SBC A,D
43663	AND B
43664	RET PO
43665	JP P,1248
43668	POP HL
43669	RET PO
43670	RET PO
43671	LD A,(HL)
43672	RST 24
43673	AND A
43674	RST 24
43675	LD A,E
43676	POP HL
43677	RET P
43678	RST 24
43679	JP PE,223
43682	NOP
43683	NOP
43684	NOP
43685	NOP
43686	NOP
43687	NOP
43688	NOP
43689	NOP
43690	NOP
43691	NOP
43692	NOP
43693	NOP
43694	NOP
43695	NOP
43696	NOP
43697	NOP
This entry point is used by the routine at 46975.
43698	XOR A
43699	LD (40986),A
43702	LD (40978),A
43705	LD E,255
43707	LD D,192
43709	LD A,E
43710	OR 199
43712	LD E,A
43713	CALL 44650
43716	LD A,(40987)
43719	AND A
43720	JR Z,43729
43722	LD A,1
43724	LD (40996),A
43727	RES 3,E
This entry point is used by the routine at 45309.
43729	PUSH DE
43730	LD A,(40996)
43733	AND A
43734	JR NZ,43793
43736	LD (43687),A
43739	LD HL,(41003)
43742	PUSH HL
43743	CALL 44068
43746	JR NZ,43784
43748	LD A,(43687)
43751	AND A
43752	JR NZ,43784
43754	LD A,2
43756	LD (40996),A
43759	POP HL
43760	PUSH IY
43762	POP HL
43763	LD DE,24
43766	ADD HL,DE
43767	LD DE,43692
43770	EX DE,HL
43771	LD BC,6
43774	LDIR
43776	LD HL,(41001)
43779	LD (41003),HL
43782	JR 43793
43784	LD A,1
43786	LD (40996),A
43789	POP HL
43790	LD (41003),HL
43793	POP DE
43794	XOR A
43795	LD (43687),A
43798	CALL 43921
43801	JR C,43918
43803	JR Z,43847
43805	CP 144
43807	JP Z,44979
43810	CP 160
43812	JP Z,44236
43815	BIT 3,E
43817	JR Z,43852
43819	LD A,(40978)
43822	AND A
43823	JR NZ,43918
43825	LD A,(40987)
43828	AND A
43829	JR NZ,43852
43831	LD A,(41005)
43834	CP 192
43836	JR NZ,43918
43838	LD A,176
43840	CP D
43841	JR NZ,43918
43843	LD A,2
43845	AND A
43846	RET
43847	BIT 3,E
43849	JP Z,44283
43852	LD HL,(41001)
43855	LD (41003),HL
43858	CALL 44068
43861	JR C,43918
43863	JR NZ,43872
43865	CALL 44198
43868	JR Z,43918
43870	JR 43852
43872	CP 176
43874	JP Z,44375
43877	CP 160
43879	JP Z,44236
43882	CP 144
43884	JP Z,44979
43887	LD HL,(41001)
43890	LD (41003),HL
43893	LD A,(40996)
43896	CP 2
43898	JR NZ,43918
43900	CALL 44019
43903	JR C,43918
43905	JR NZ,43918
43907	LD HL,(41001)
43910	LD (41003),HL
43913	LD D,160
43915	JP 44236
43918	JP 44903
43921	LD A,(40996)
43924	CP 2
43926	JR Z,44019
43928	LD A,E
43929	OR 7
43931	LD E,A
43932	CALL 44671
43935	CP 224
43937	JR Z,43932
43939	CP 48
43941	JR NZ,43959
43943	BIT 1,E
43945	JR Z,43957
43947	RES 1,E
43949	LD (IY+0),C
43952	LD (IY+1),B
43955	JR 43932
43957	SCF
43958	RET
43959	CP 0
43961	JR NZ,43977
43963	BIT 2,E
43965	JR Z,43957
43967	RES 2,E
43969	LD (IY+2),C
43972	LD (IY+3),B
43975	JR 43932
43977	CP 64
43979	JR NZ,43985
43981	RES 0,E
43983	JR 43943
43985	CP 32
43987	JR NZ,44015
43989	BIT 1,E
43991	JR NZ,43943
43993	BIT 0,E
43995	JR NZ,43963
43997	RES 2,E
43999	SET 0,E
44001	LD A,(IY+0)
44004	LD (IY+2),A
44007	LD A,(IY+1)
44010	LD (IY+3),A
44013	JR 43947
44015	OR A
44016	BIT 1,E
44018	RET
44019	CALL 44671
44022	CP 128
44024	CALL Z,44671
44027	LD A,B
44028	AND 15
44030	LD B,A
44031	LD HL,39245
44034	LD A,(HL)
44035	INC HL
44036	OR (HL)
44037	JR Z,44052
44039	LD A,B
44040	CP (HL)
44041	JR NZ,44049
44043	DEC HL
44044	LD A,C
44045	CP (HL)
44046	JR Z,44055
44048	INC HL
44049	INC HL
44050	JR 44034
44052	OR 1
44054	RET
44055	LD (IY+0),C
44058	LD (IY+1),B
44061	RES 1,E
44063	CALL 44671
44066	XOR A
44067	RET
44068	LD HL,43688
44071	LD B,10
44073	CALL 41643
44076	LD A,E
44077	OR 52
44079	LD E,A
44080	CALL 44671
44083	CP 128
44085	JR NZ,44097
44087	BIT 4,E
44089	JR Z,44095
44091	RES 4,E
44093	JR 44080
44095	SCF
44096	RET
44097	CP 16
44099	JR Z,44105
44101	CP 112
44103	JR NZ,44133
44105	BIT 4,E
44107	JR Z,44095
44109	BIT 2,E
44111	JR Z,44095
44113	LD A,(43687)
44116	CP 3
44118	JR NC,44095
44120	INC A
44121	LD (43687),A
44124	CALL 44175
44127	JR NZ,44095
44129	RES 5,E
44131	JR 44080
44133	CP 96
44135	JR NZ,44152
44137	BIT 2,E
44139	JR Z,44095
44141	RES 4,E
44143	RES 5,E
44145	CALL 44180
44148	JR NZ,44095
44150	JR 44080
44152	CP 240
44154	JR Z,44160
44156	CP 80
44158	JR NZ,44171
44160	LD A,E
44161	AND 203
44163	LD E,A
44164	LD (43692),BC
44168	CALL 44671
44171	AND A
44172	BIT 5,E
44174	RET
44175	LD HL,43688
44178	JR 44183
44180	LD HL,43694
44183	LD A,(HL)
44184	INC HL
44185	OR (HL)
44186	JR Z,44193
44188	INC HL
44189	LD A,(HL)
44190	INC HL
44191	OR (HL)
44192	RET NZ
44193	LD (HL),B
44194	DEC HL
44195	LD (HL),C
44196	XOR A
44197	RET
44198	BIT 6,E
44200	JR Z,44210
44202	RES 6,E
44204	PUSH DE
44205	LD DE,4
44208	JR 44219
44210	BIT 7,E
44212	RET Z
44213	RES 7,E
44215	PUSH DE
44216	LD DE,14
44219	PUSH IY
44221	POP HL
44222	ADD HL,DE
44223	LD DE,43688
44226	EX DE,HL
44227	LD BC,10
44230	LDIR
44232	POP DE
44233	OR 1
44235	RET
44236	RES 3,E
44238	PUSH DE
44239	CALL 44671
44242	CP 160
44244	JR Z,44239
44246	LD HL,(41001)
44249	LD (43681),HL
44252	LD (41003),HL
44255	POP DE
44256	LD A,E
44257	LD (43683),A
44260	LD (43684),IY
44264	LD A,(40978)
44267	LD (43686),A
44270	LD A,(40986)
44273	CP 2
44275	JR NZ,44375
44277	SET 6,(IY+1)
44281	JR 44375
44283	LD A,(40996)
44286	CP 2
44288	JR NZ,44323
44290	BIT 6,E
44292	JP NZ,43852
44295	SET 6,E
44297	SET 3,E
44299	PUSH IY
44301	EXX
44302	POP HL
44303	LD DE,8
44306	ADD HL,DE
44307	PUSH HL
44308	LD DE,16
44311	ADD HL,DE
44312	POP DE
44313	EX DE,HL
44314	LD BC,6
44317	LDIR
44319	EXX
44320	JP 43852
44323	LD A,(40987)
44326	AND A
44327	JR Z,44334
44329	SET 3,E
44331	JP 43852
44334	LD HL,(43681)
44337	LD (41003),HL
44340	LD D,176
44342	LD A,(43683)
44345	LD E,A
44346	LD A,(43686)
44349	LD (40978),A
44352	LD IY,(43684)
44356	LD L,(IY-2)
44359	LD H,(IY-1)
44362	PUSH HL
44363	POP IX
44365	CALL 41391
44368	XOR A
44369	LD (IY-2),A
44372	LD (IY-1),A
44375	LD A,(40986)
44378	DEC A
44379	LD HL,40978
44382	DEC A
44383	LD A,D
44384	JR NZ,44390
44386	CP 160
44388	JR Z,44391
44390	INC (HL)
44391	CP 160
44393	JP Z,43709
44396	LD A,(40987)
44399	AND A
44400	JR Z,44500
44402	LD IY,(40944)
44406	CALL 44713
44409	LD A,(IY+1)
44412	AND 127
44414	OR (IY+0)
44417	JR NZ,44472
44419	LD A,(40987)
44422	LD E,A
44423	LD D,0
44425	LD HL,(40944)
44428	LD A,(IY+1)
44431	AND 128
44433	INC HL
44434	OR (HL)
44435	LD (HL),A
44436	DEC HL
44437	ADD HL,DE
44438	LD DE,8
44441	ADD IY,DE
44443	PUSH IY
44445	POP DE
44446	CALL 44633
44449	CALL 44633
44452	JR Z,44463
44454	PUSH DE
44455	PUSH HL
44456	DEC DE
44457	DEC DE
44458	CALL 44633
44461	POP HL
44462	POP DE
44463	CALL 44633
44466	LD IY,(40944)
44470	JR 44476
44472	LD IY,40946
44476	LD L,(IY-2)
44479	LD H,(IY-1)
44482	PUSH HL
44483	POP IX
44485	LD L,(IX-2)
44488	LD H,(IX-1)
44491	LD (IY-2),L
44494	LD (IY-1),H
44497	CALL 41415
44500	LD IY,40946
44504	LD A,(40978)
44507	LD B,A
44508	PUSH BC
44509	CALL 44726
44512	LD A,B
44513	AND A
44514	JR Z,44574
44516	CALL 44726
44519	LD A,(40996)
44522	CP 2
44524	JR NZ,44561
44526	PUSH IY
44528	POP HL
44529	LD DE,24
44532	ADD HL,DE
44533	PUSH HL
44534	LD D,6
44536	XOR A
44537	OR (HL)
44538	INC HL
44539	DEC D
44540	JR NZ,44537
44542	POP HL
44543	AND A
44544	JR NZ,44561
44546	EX DE,HL
44547	PUSH IX
44549	POP HL
44550	PUSH BC
44551	LD BC,24
44554	ADD HL,BC
44555	LD BC,6
44558	LDIR
44560	POP BC
44561	LD A,(IY+1)
44564	AND 127
44566	OR (IY+0)
44569	CALL Z,44785
44572	JR 44512
44574	POP BC
44575	CALL 44778
44578	CALL 44741
44581	LD A,B
44582	AND A
44583	JP Z,44631
44586	CALL 44741
44589	LD A,(IY+18)
44592	OR (IY+19)
44595	JR NZ,44581
44597	LD A,(IY+0)
44600	CP (IX+0)
44603	JR NZ,44581
44605	LD A,(IY+1)
44608	CP (IX+1)
44611	JR NZ,44581
44613	LD A,(IX+14)
44616	OR (IX+15)
44619	JR Z,44581
44621	EXX
44622	LD DE,14
44625	CALL 44839
44628	JP 44581
44631	XOR A
44632	RET
44633	LD A,(HL)
44634	INC HL
44635	OR (HL)
44636	DEC HL
44637	JR NZ,44641
44639	LD A,(DE)
44640	LD (HL),A
44641	INC HL
44642	INC DE
44643	JR NZ,44647
44645	LD A,(DE)
44646	LD (HL),A
44647	INC HL
44648	INC DE
44649	RET
This entry point is used by the routine at 45309.
44650	CALL 44778
44653	LD A,30
44655	CALL 41244
44658	PUSH IX
44660	POP HL
44661	LD (IY-2),L
44664	LD (IY-1),H
44667	PUSH HL
44668	POP IY
44670	RET
This entry point is used by the routine at 46975.
44671	LD HL,(41003)
44674	LD (41001),HL
44677	LD A,D
44678	LD (41005),A
44681	LD A,(HL)
44682	LD D,A
44683	LD BC,0
44686	INC HL
44687	CP 224
44689	JR Z,44703
44691	CP 240
44693	JR Z,44703
44695	CP 144
44697	JR Z,44703
44699	CP 128
44701	JR NC,44708
44703	LD A,(HL)
44704	LD B,A
44705	INC HL
44706	LD C,(HL)
44707	INC HL
44708	LD (41003),HL
44711	LD A,D
44712	RET
This entry point is used by the routines at 45309, 46243 and 46975.
44713	PUSH HL
44714	LD L,(IY-2)
44717	LD H,(IY-1)
44720	LD A,H
44721	OR L
44722	EX (SP),HL
44723	POP IY
44725	RET
44726	DEC B
44727	PUSH IY
44729	POP IX
44731	CALL 44713
44734	BIT 6,(IY+1)
44738	JR NZ,44727
44740	RET
44741	DEC B
This entry point is used by the routine at 45309.
44742	PUSH IY
44744	POP IX
44746	PUSH HL
44747	PUSH DE
44748	PUSH IY
44750	POP DE
44751	LD IY,40944
44755	CALL 41220
44758	PUSH IY
44760	POP HL
44761	LD DE,40946
44764	AND A
44765	SBC HL,DE
44767	JR Z,44775
44769	BIT 6,(IY+1)
44773	JR NZ,44748
44775	POP DE
44776	POP HL
44777	RET
44778	LD IY,0
44782	JP 44742
44785	EXX
44786	LD A,(IX+1)
44789	AND 127
44791	OR (IY+1)
44794	LD (IY+1),A
44797	LD A,(IX+0)
44800	LD (IY+0),A
44803	EXX
44804	LD A,(IX+4)
44807	OR (IX+5)
44810	RET Z
44811	LD A,14
44813	CALL 44856
44816	RET NZ
44817	EXX
44818	PUSH IY
44820	POP HL
44821	LD DE,18
44824	ADD HL,DE
44825	PUSH HL
44826	LD DE,65526
44829	ADD HL,DE
44830	POP DE
44831	LD BC,6
44834	LDIR
44836	LD DE,4
44839	CALL 44882
44842	LD A,(IY+2)
44845	OR (IY+3)
44848	LD DE,2
44851	CALL Z,44886
44854	EXX
44855	RET
44856	PUSH DE
44857	PUSH BC
44858	PUSH HL
44859	LD B,10
44861	PUSH IY
44863	POP HL
44864	LD E,A
44865	LD D,0
44867	ADD HL,DE
44868	XOR A
44869	OR (HL)
44870	INC HL
44871	DJNZ 44869
44873	POP HL
44874	POP BC
44875	POP DE
44876	AND A
44877	RET
44878	LD C,6
44880	JR 44888
44882	LD C,10
44884	JR 44888
44886	LD C,2
44888	PUSH IY
44890	POP HL
44891	ADD HL,DE
44892	PUSH HL
44893	PUSH IX
44895	POP HL
44896	ADD HL,DE
44897	POP DE
44898	LD B,0
44900	LDIR
44902	RET
44903	LD A,1
44905	AND A
44906	RET
44907	NOP
44908	NOP
44909	LD C,C
44910	OR B
44911	LD B,B
44912	NOP
44913	INC SP
44914	OR B
44915	LD E,(HL)
44916	LD BC,45084
44919	PUSH DE
44920	LD B,255
44922	XOR A
44923	CP L
44924	DEC B
44925	DEC BC
44926	OR B
44927	RLCA
44928	DEC B
44929	AND E
44930	OR B
44931	LD (HL),L
44932	RLCA
44933	ADD A,176
44935	LD H,B
44936	LD B,154
44938	OR B
44939	EX (SP),HL
44940	INC BC
44941	DEC (HL)
44942	OR C
44943	ADC A,B
44944	INC B
44945	LD D,C
44946	OR C
44947	OR 6
44949	AND E
44950	OR B
44951	OR E
44952	EX AF,AF'
44953	LD D,C
44954	OR C
44955	SBC A,C
44956	EX AF,AF'
44957	DEFB 253
44958	OR B
44959	EX (SP),HL
44960	INC BC
44961	CCF
44962	OR C
44963	ADC A,B
44964	INC B
44965	LD E,E
44966	OR C
44967	OR E
44968	EX AF,AF'
44969	LD E,E
44970	OR C
44971	PUSH BC
44972	NOP
44973	JP M,44719
44976	EX AF,AF'
44977	JP M,8623
44980	LD L,E
44981	XOR A
44982	LD A,(40996)
44985	CP 2
44987	JR NZ,44992
44989	LD HL,44955
44992	PUSH DE
44993	LD E,12
44995	JR NZ,44999
44997	LD E,6
44999	LD A,(HL)
45000	INC HL
45001	CP C
45002	JR NZ,45008
45004	LD A,(HL)
45005	CP B
45006	JR Z,45018
45008	INC HL
45009	INC HL
45010	INC HL
45011	DEC E
45012	JR NZ,44999
45014	POP DE
45015	JP 44903
45018	INC HL
45019	LD E,(HL)
45020	INC HL
45021	LD D,(HL)
45022	EX DE,HL
45023	POP DE
45024	JP (HL)
This entry point is used by the routine at 45309.
45025	BIT 1,E
45027	RET NZ
45028	POP HL
45029	JP 44903
45032	BIT 1,E
45034	RET Z
45035	LD A,(40978)
45038	AND A
45039	JR NZ,45046
45041	LD A,(40987)
45044	AND A
45045	RET NZ
45046	POP HL
45047	JP 44903
45050	LD D,160
45052	JP 44236
45055	CALL 45025
45058	CALL 49211
45061	JR NZ,45077
45063	LD A,1
45065	JR 45074
45067	CALL 45025
45070	CALL 41622
45073	XOR A
45074	LD (40968),A
45077	LD A,(41005)
45080	LD D,A
45081	JP 43716
45084	LD A,(40986)
45087	CP 1
45089	JP NZ,44903
45092	LD A,2
45094	LD (40986),A
45097	CALL 44650
45100	SET 6,(IY+1)
45104	JP 43858
45107	CALL 45032
45110	LD A,(40986)
45113	AND A
45114	JP NZ,44903
45117	LD A,1
45119	LD (40986),A
45122	SET 7,(IY+1)
45126	JP 43858
45129	BIT 1,E
45131	JR Z,45144
45133	LD HL,2187
45136	LD (IY+0),L
45139	LD (IY+1),H
45142	RES 1,E
45144	PUSH HL
45145	PUSH DE
45146	PUSH IY
45148	PUSH IX
45150	LD IY,40940
45154	LD DE,0
45157	CALL 41220
45160	LD A,2
45162	CALL 41244
45165	LD HL,(41003)
45168	LD (IX+0),L
45171	LD (IX+1),H
45174	PUSH IX
45176	POP HL
45177	LD (IY-2),L
45180	LD (IY-1),H
45183	POP IX
45185	POP IY
45187	POP DE
45188	POP HL
45189	CALL 44671
45192	CP 144
45194	JR NZ,45189
45196	LD A,B
45197	AND 15
45199	OR C
45200	JR NZ,45189
45202	LD HL,(41001)
45205	LD (HL),192
45207	JP 43858
45210	CALL 45025
45213	CALL WaitForKeypress_Loop
45216	JP 45077
45219	CALL 45025
45222	CALL 45228
45225	JP 45077
This entry point is used by the routine at 40522.
45228	LD HL,0
45231	LD (40925),HL
45234	LD IX,39008
45238	LD (IX+6),L
45241	LD (IX+7),H
45244	INC HL
45245	LD (40991),HL
45248	LD A,L
45249	LD (41178),A
45252	AND A
45253	RET
45254	CALL 45025
45257	LD HL,1
45260	LD (40991),HL
45263	LD A,2
45265	LD (41178),A
45268	JP 45077