PSSST: Routine at 26542

26542: Routine at 67AE


26542	CALL 25837
26545	DEC E
26546	JP Z,27251
26549	CALL 27202
26552	DEC E
26553	JR NZ,26560
26555	LD A,C
26556	AND A
26557	JP NZ,26861
26560	BIT 3,(IX+4)
26564	JP NZ,27450
26567	CALL 25677
26570	DEC E
26571	JR Z,26524
26573	BIT 2,(IX+4)
26577	JR Z,26589
26579	DEC (IX+5)
26582	JP NZ,28465
26585	RES 2,(IX+4)
26589	CALL 26895
26592	LD A,(IX+5)
26595	LD B,A
26596	AND 15
26598	LD C,A
26599	LD A,B
26600	AND 240
26602	LD B,A
26603	LD A,(HL)
26604	SUB (IX+1)
26607	JP P,26734
26610	BIT 6,(IX+0)
26614	JP Z,26778
26617	LD A,C
26618	CP 15
26620	JR NC,26623
26622	INC A
26623	LD C,A
26624	LD H,(IX+1)
26627	CALL 26845
26630	AND A
26631	SBC HL,DE
26633	LD A,H
26634	CP 26
26636	JR NC,26642
26638	RES 6,(IX+0)
26642	LD (IX+1),A
26645	LD A,L
26646	AND 240
26648	OR C
26649	LD (IX+5),A
26652	LD A,(IX+1)
26655	CP 24
26657	JP C,28465
26660	CP 208
26662	JP NC,28465
26665	CALL 26895
26668	LD A,(IX+6)
26671	LD B,A
26672	AND 15
26674	LD C,A
26675	LD A,B
26676	AND 240
26678	LD B,A
26679	INC HL
26680	LD A,(HL)
26681	SUB (IX+2)
26684	JP P,26790
26687	BIT 7,(IX+0)
26691	JP Z,26835
26694	LD A,C
26695	DEC A
26696	JR NZ,26803
26698	RES 7,(IX+0)
26702	LD C,A
26703	LD H,(IX+2)
26706	CALL 26845
26709	AND A
26710	SBC HL,DE
26712	LD A,H
26713	CP 40
26715	JR NC,26721
26717	SET 7,(IX+0)
26721	LD (IX+2),A
26724	LD A,L
26725	AND 240
26727	OR C
26728	LD (IX+6),A
26731	JP 28465
26734	BIT 6,(IX+0)
26738	JR Z,26770
26740	LD A,C
26741	DEC A
26742	JP NZ,26623
26745	RES 6,(IX+0)
26749	LD C,A
26750	LD H,(IX+1)
26753	CALL 26845
26756	ADD HL,DE
26757	LD A,H
26758	CP 214
26760	JP C,26642
26763	SET 6,(IX+0)
26767	JP 26642
26770	LD A,C
26771	CP 15
26773	JR NC,26749
26775	INC A
26776	JR 26749
26778	LD A,C
26779	DEC A
26780	JP NZ,26749
26783	SET 6,(IX+0)
26787	JP 26623
26790	BIT 7,(IX+0)
26794	JR Z,26824
26796	LD A,C
26797	CP 15
26799	JP NC,26803
26802	INC A
26803	LD C,A
26804	LD H,(IX+2)
26807	CALL 26845
26810	ADD HL,DE
26811	LD A,H
26812	CP 182
26814	JP C,26721
26817	RES 7,(IX+0)
26821	JP 26721
26824	LD A,C
26825	DEC A
26826	JP NZ,26702
26829	SET 7,(IX+0)
26833	JR 26803
26835	LD A,C
26836	CP 15
26838	JP NC,26702
26841	INC A
26842	JP 26702
26845	LD L,B
26846	LD A,C
26847	RLA
26848	RLA
26849	RLA
26850	RLA
26851	AND 240
26853	LD E,A
26854	LD D,0
26856	SLA E
26858	RL D
26860	RET
26861	AND 63
26863	CP 8
26865	JR Z,26889
26867	CP 18
26869	JP Z,26560
26872	BIT 3,(IX+4)
26876	JP NZ,27450
26879	LD (IX+6),0
26883	CALL 26059
26886	JP 26560
26889	LD BC,80
26892	JP 26073
26895	LD A,(24173)
26898	CP 24
26900	JR C,26983
26902	CP 216
26904	JR NC,26983
26906	SRL A
26908	LD B,A
26909	LD A,(IX+1)
26912	SRL A
26914	SUB B
26915	JP P,26920
26918	NEG
26920	LD B,A
26921	LD A,(24174)
26924	SRL A
26926	LD C,A
26927	LD A,(IX+2)
26930	SRL A
26932	SUB C
26933	JP P,26938
26936	NEG
26938	ADD A,B
26939	LD D,A
26940	LD A,(24205)
26943	SRL A
26945	LD B,A
26946	LD A,(IX+1)
26949	SRL A
26951	SUB B
26952	JP P,26957
26955	NEG
26957	LD B,A
26958	LD A,(24206)
26961	SRL A
26963	LD C,A
26964	LD A,(IX+2)
26967	SRL A
26969	SUB C
26970	JP P,26975
26973	NEG
26975	ADD A,B
26976	CP D
26977	JR C,26983
26979	LD HL,24173
26982	RET
26983	LD HL,24205
26986	RET
This entry point is used by the routines at 27023 and 27288.
26987	INC DE
26988	LD A,(DE)
26989	DEC DE
26990	DEC DE
26991	DEC DE
26992	AND 1
26994	LD A,(DE)
26995	RET
This entry point is used by the routine at 27288.
26996	CALL 26987
26999	JR Z,27013
27001	CP 48
27003	RET C
27004	SUB 12
27006	LD (HL),72
27008	LD B,69
27010	JP 27557
27013	CP 192
27015	RET NC
27016	ADD A,24
27018	LD (HL),8
27020	JP 27008