;SORD m.5, interpretr Basic-I
;============================
;Castecne okomentovany disassemblovany vypis 8KB EPROM
;
;Tento vypis byl vygenerovan na pocitaci DEC PDP11/23+ s bezicim operacnim
;systemem DEC RT-11 programem DIS. Program DIS se ridil ridicim souborem
;BI.RID (coz byl soubor s definicemi datovych oblasti pro dissassembler)
;a data cerpal ze souboru BAI08K.EPR (coz byl binarni soubor s obsahem
;PROM z kartridze Basic-I).
;Soubor BI.RID je k dispozici. Byl sestaven na zaklade analyzy prvniho
;vypisu.
;
;Program DIS byl napsan v jazyce ESI Pascal teamem LZR Soft, posledni verze
;je z 25-Oct-1991. Navod k inplementaci jazyka ESI Pascal pro systemy RT
;a zdrojovy text DIS.PAS jsou k dispozici.
;
;(C) 1987-2001, LZR Soft, Kladno, Czech Republic

2000 :			DB	00	;identifikace slotu - 8KB
2001 :			DW	201A	;startovaci adresa
2003 :			DW	209F	;Initial Program Load - IPL
2005 : C31329		JP	2913		;rutina RST 20
2008 : C31629		JP	2916		;rutina RST 28
200B : 08		EX	AF,AF'
200C : 3AEB71		LD	A,(71EB)
200F : B7		OR	A
2010 : 2004		JR	NZ,2016
2012 : 08		EX	AF,AF'
2013 : C38810		JP	1088
2016 : 08		EX	AF,AF'
2017 : C39917		JP	1799
201A : 210020		LD	HL,2000		;start modulu
201D : CDCA00		CALL	00CA		;kontrola na soucet 0
2020 : 215A70		LD	HL,705A
2023 : CB96		RES	2,(HL)
2025 : 2A1270		LD	HL,(7012)
2028 : 2B		DEC	HL
2029 : 22EF71		LD	(71EF),HL
202C : 22CB71		LD	(71CB),HL
202F : 0100FF		LD	BC,0FF00
2032 : 09		ADD	HL,BC
2033 : 22C571		LD	(71C5),HL
2036 : 218273		LD	HL,7382
2039 : 36FF		LD	(HL),0FF
203B : 23		INC	HL
203C : 22BF71		LD	(71BF),HL
203F : 71		LD	(HL),C
2040 : 23		INC	HL
2041 : 71		LD	(HL),C
2042 : 23		INC	HL
2043 : 22C171		LD	(71C1),HL
2046 : 217233		LD	HL,3372
2049 : 22E171		LD	(71E1),HL
204C : 61		LD	H,C
204D : 69		LD	L,C
204E : 22CD71		LD	(71CD),HL
2051 : 22D571		LD	(71D5),HL
2054 : 22EB71		LD	(71EB),HL
2057 : 211220		LD	HL,2012
205A : 22D771		LD	(71D7),HL
205D : 210104		LD	HL,0401
2060 : 22E971		LD	(71E9),HL
2063 : 3E1A		LD	A,1A
2065 : 32DC70		LD	(70DC),A
2068 : 21AE3F		LD	HL,3FAE
206B : 22DD70		LD	(70DD),HL
206E : CD7D2E		CALL	2E7D
2071 : 32F371		LD	(71F3),A
2074 : 3E3C		LD	A,3C
2076 : CDFB02		CALL	02FB
2079 : 218E20		LD	HL,208E
207C : CD5C10		CALL	105C
207F : 21A63A		LD	HL,3AA6
2082 : 222570		LD	(7025),HL
2085 : 21AF3A		LD	HL,3AAF
2088 : 222770		LD	(7027),HL
208B : C31823		JP	2318
208E :			DB	'Basic-I',0D
2096 : D630		SUB	30
2098 : FE0A		CP	0A
209A : 3F		CCF
209B : D0		RET	NC
209C : C630		ADD	A,30
209E : 37		SCF
209F : C9		RET
20A0 : CD9620		CALL	2096
20A3 : D0		RET	NC
20A4 : CD8500		CALL	0085
20A7 : FE41		CP	41
20A9 : D8		RET	C
20AA : FE47		CP	47
20AC : 3F		CCF
20AD : D8		RET	C
20AE : D637		SUB	37
20B0 : C9		RET
20B1 : C5		PUSH	BC
20B2 : D5		PUSH	DE
20B3 : E5		PUSH	HL
20B4 : E5		PUSH	HL
20B5 : 7E		LD	A,(HL)
20B6 : FE20		CP	20
20B8 : 23		INC	HL
20B9 : 28FA		JR	Z,20B5
20BB : 2B		DEC	HL
20BC : E5		PUSH	HL
20BD : C5		PUSH	BC
20BE : 210C21		LD	HL,210C
20C1 : 010E00		LD	BC,000E
20C4 : EDB1		CPIR
20C6 : C1		POP	BC
20C7 : E1		POP	HL
20C8 : 285D		JR	Z,2127
20CA : 0600		LD	B,00
20CC : 04		INC	B
20CD : 7E		LD	A,(HL)
20CE : 23		INC	HL
20CF : FE24		CP	24
20D1 : 280C		JR	Z,20DF
20D3 : FE41		CP	41
20D5 : 3804		JR	C,20DB
20D7 : FE5B		CP	5B
20D9 : 38F1		JR	C,20CC
20DB : 05		DEC	B
20DC : 2843		JR	Z,2121
20DE : 2B		DEC	HL
20DF : D1		POP	DE
20E0 : E5		PUSH	HL
20E1 : 78		LD	A,B
20E2 : 21D03D		LD	HL,3DD0
20E5 : 01DE01		LD	BC,01DE
20E8 : F5		PUSH	AF
20E9 : C5		PUSH	BC
20EA : E5		PUSH	HL
20EB : E1		POP	HL
20EC : C1		POP	BC
20ED : F1		POP	AF
20EE : EDB1		CPIR
20F0 : 202F		JR	NZ,2121
20F2 : F5		PUSH	AF
20F3 : C5		PUSH	BC
20F4 : E5		PUSH	HL
20F5 : 47		LD	B,A
20F6 : D5		PUSH	DE
20F7 : C5		PUSH	BC
20F8 : 1A		LD	A,(DE)
20F9 : 13		INC	DE
20FA : 4E		LD	C,(HL)
20FB : 23		INC	HL
20FC : 101C		DJNZ	211A
20FE : B9		CP	C
20FF : 201C		JR	NZ,211D
2101 : 7E		LD	A,(HL)
2102 : 210E00		LD	HL,000E
2105 : 39		ADD	HL,SP
2106 : F9		LD	SP,HL
2107 : EB		EX	DE,HL
2108 : D1		POP	DE
2109 : C1		POP	BC
210A : B7		OR	A
210B : C9		RET
210C :			DB	'^*/+-<=>()#,;:'	;k porovnani
211A : B9		CP	C
211B : 28DB		JR	Z,20F8
211D : C1		POP	BC
211E : D1		POP	DE
211F : 18CA		JR	20EB
2121 : E1		POP	HL
2122 : E1		POP	HL
2123 : D1		POP	DE
2124 : C1		POP	BC
2125 : 37		SCF
2126 : C9		RET
2127 : 57		LD	D,A
2128 : 21D03D		LD	HL,3DD0
212B : 01DE01		LD	BC,01DE
212E : EDB1		CPIR
2130 : 20EF		JR	NZ,2121
2132 : 2B		DEC	HL
2133 : 2B		DEC	HL
2134 : 7E		LD	A,(HL)
2135 : FE01		CP	01
2137 : 200A		JR	NZ,2143
2139 : 23		INC	HL
213A : 23		INC	HL
213B : 7E		LD	A,(HL)
213C : E1		POP	HL
213D : E1		POP	HL
213E : 23		INC	HL
213F : D1		POP	DE
2140 : C1		POP	BC
2141 : B7		OR	A
2142 : C9		RET
2143 : 23		INC	HL
2144 : 23		INC	HL
2145 : 7A		LD	A,D
2146 : 18E6		JR	212E
2148 : C5		PUSH	BC
2149 : D5		PUSH	DE
214A : E5		PUSH	HL
214B : 21D03D		LD	HL,3DD0
214E : 46		LD	B,(HL)
214F : 78		LD	A,B
2150 : B7		OR	A
2151 : 28CF		JR	Z,2122
2153 : 23		INC	HL
2154 : C5		PUSH	BC
2155 : E5		PUSH	HL
2156 : 23		INC	HL
2157 : 10FD		DJNZ	2156
2159 : 7E		LD	A,(HL)
215A : B9		CP	C
215B : 2805		JR	Z,2162
215D : 23		INC	HL
215E : C1		POP	BC
215F : C1		POP	BC
2160 : 18EC		JR	214E
2162 : E1		POP	HL
2163 : C1		POP	BC
2164 : D1		POP	DE
2165 : D1		POP	DE
2166 : E3		EX	(SP),HL
2167 : 60		LD	H,B
2168 : E3		EX	(SP),HL
2169 : C1		POP	BC
216A : B7		OR	A
216B : C9		RET
216C : C5		PUSH	BC
216D : E5		PUSH	HL
216E : 0600		LD	B,00
2170 : 7E		LD	A,(HL)
2171 : FE24		CP	24
2173 : 2001		JR	NZ,2176
2175 : 23		INC	HL
2176 : 7E		LD	A,(HL)
2177 : 23		INC	HL
2178 : FE31		CP	31
217A : 3859		JR	C,21D5
217C : FE22		CP	22
217E : 2007		JR	NZ,2187
2180 : CB38		SRL	B
2182 : 3F		CCF
2183 : CB10		RL	B
2185 : 18EF		JR	2176
2187 : CB40		BIT	0,B
2189 : 20EB		JR	NZ,2176
218B : CD8500		CALL	0085
218E : 2B		DEC	HL
218F : 77		LD	(HL),A
2190 : 23		INC	HL
2191 : 18E3		JR	2176
2193 : C5		PUSH	BC
2194 : 0600		LD	B,00
2196 : D5		PUSH	DE
2197 : 116273		LD	DE,7362
219A : 7E		LD	A,(HL)
219B : FE41		CP	41
219D : DC7D33		CALL	C,337D
21A0 : 12		LD	(DE),A
21A1 : 13		INC	DE
21A2 : 04		INC	B
21A3 : 23		INC	HL
21A4 : 7E		LD	A,(HL)
21A5 : FE5E		CP	5E
21A7 : 281C		JR	Z,21C5
21A9 : FE41		CP	41
21AB : 300C		JR	NC,21B9
21AD : FE2E		CP	2E
21AF : 2808		JR	Z,21B9
21B1 : FE30		CP	30
21B3 : 3810		JR	C,21C5
21B5 : FE3A		CP	3A
21B7 : 300C		JR	NC,21C5
21B9 : 23		INC	HL
21BA : 12		LD	(DE),A
21BB : 13		INC	DE
21BC : 78		LD	A,B
21BD : FE20		CP	20
21BF : CC7D33		CALL	Z,337D
21C2 : 04		INC	B
21C3 : 18DF		JR	21A4
21C5 : E3		EX	(SP),HL
21C6 : AF		XOR	A
21C7 : 77		LD	(HL),A
21C8 : 23		INC	HL
21C9 : 77		LD	(HL),A
21CA : 23		INC	HL
21CB : 70		LD	(HL),B
21CC : 23		INC	HL
21CD : 48		LD	C,B
21CE : 47		LD	B,A
21CF : EB		EX	DE,HL
21D0 : 216273		LD	HL,7362
21D3 : EDB0		LDIR
21D5 : E1		POP	HL
21D6 : C1		POP	BC
21D7 : C9		RET
21D8 : F5		PUSH	AF
21D9 : 78		LD	A,B
21DA : B1		OR	C
21DB : 2826		JR	Z,2203
21DD : C5		PUSH	BC
21DE : E5		PUSH	HL
21DF : 5E		LD	E,(HL)
21E0 : 23		INC	HL
21E1 : 56		LD	D,(HL)
21E2 : 23		INC	HL
21E3 : EB		EX	DE,HL
21E4 : 7C		LD	A,H
21E5 : B5		OR	L
21E6 : 280C		JR	Z,21F4
21E8 : ED42		SBC	HL,BC
21EA : 3009		JR	NC,21F5
21EC : EB		EX	DE,HL
21ED : 5E		LD	E,(HL)
21EE : 23		INC	HL
21EF : 56		LD	D,(HL)
21F0 : 23		INC	HL
21F1 : 19		ADD	HL,DE
21F2 : 18EB		JR	21DF
21F4 : 3D		DEC	A
21F5 : 1B		DEC	DE
21F6 : 1B		DEC	DE
21F7 : E1		POP	HL
21F8 : C1		POP	BC
21F9 : 2003		JR	NZ,21FE
21FB : F1		POP	AF
21FC : B7		OR	A
21FD : C9		RET
21FE : F1		POP	AF
21FF : 37		SCF
2200 : 3E01		LD	A,01
2202 : C9		RET
2203 : F1		POP	AF
2204 : AF		XOR	A
2205 : 37		SCF
2206 : C9		RET
2207 : 7A		LD	A,D
2208 : E680		AND	80
220A : B1		OR	C
220B : 4F		LD	C,A
220C : D5		PUSH	DE
220D : FC602B		CALL	M,2B60
2210 : E5		PUSH	HL
2211 : EB		EX	DE,HL
2212 : 13		INC	DE
2213 : 13		INC	DE
2214 : 13		INC	DE
2215 : 13		INC	DE
2216 : 13		INC	DE
2217 : 13		INC	DE
2218 : 13		INC	DE
2219 : AF		XOR	A
221A : 12		LD	(DE),A
221B : C5		PUSH	BC
221C : 0E0A		LD	C,0A
221E : C5		PUSH	BC
221F : CD5201		CALL	0152
2222 : C1		POP	BC
2223 : F630		OR	30
2225 : 1B		DEC	DE
2226 : 12		LD	(DE),A
2227 : 7C		LD	A,H
2228 : B5		OR	L
2229 : 2807		JR	Z,2232
222B : 10F1		DJNZ	221E
222D : C1		POP	BC
222E : 0600		LD	B,00
2230 : 180D		JR	223F
2232 : EB		EX	DE,HL
2233 : 05		DEC	B
2234 : 78		LD	A,B
2235 : C1		POP	BC
2236 : 47		LD	B,A
2237 : 79		LD	A,C
2238 : 17		RLA
2239 : 3004		JR	NC,223F
223B : 2B		DEC	HL
223C : 362D		LD	(HL),2D
223E : 05		DEC	B
223F : D1		POP	DE
2240 : D5		PUSH	DE
2241 : 7E		LD	A,(HL)
2242 : 12		LD	(DE),A
2243 : 13		INC	DE
2244 : 23		INC	HL
2245 : B7		OR	A
2246 : 20F9		JR	NZ,2241
2248 : E1		POP	HL
2249 : CB41		BIT	0,C
224B : C5		PUSH	BC
224C : 0607		LD	B,07
224E : C46310		CALL	NZ,1063
2251 : EB		EX	DE,HL
2252 : 2B		DEC	HL
2253 : C1		POP	BC
2254 : D1		POP	DE
2255 : 7A		LD	A,D
2256 : 17		RLA
2257 : C9		RET
2258 : 14		INC	D
2259 : 15		DEC	D
225A : 2804		JR	Z,2260
225C : 7A		LD	A,D
225D : CD6122		CALL	2261
2260 : 7B		LD	A,E
2261 : F5		PUSH	AF
2262 : 0F		RRCA
2263 : 0F		RRCA
2264 : 0F		RRCA
2265 : 0F		RRCA
2266 : CD6A22		CALL	226A
2269 : F1		POP	AF
226A : E60F		AND	0F
226C : FE0A		CP	0A
226E : 3802		JR	C,2272
2270 : C607		ADD	A,07
2272 : C630		ADD	A,30
2274 : 77		LD	(HL),A
2275 : 23		INC	HL
2276 : C9		RET
2277 : F5		PUSH	AF
2278 : E5		PUSH	HL
2279 : C5		PUSH	BC
227A : FEFC		CP	0FC
227C : 2811		JR	Z,228F
227E : 219322		LD	HL,2293
2281 : 010800		LD	BC,0008
2284 : EDB1		CPIR
2286 : 21F371		LD	HL,71F3
2289 : CB86		RES	0,(HL)
228B : 2002		JR	NZ,228F
228D : CBC6		SET	0,(HL)
228F : C1		POP	BC
2290 : E1		POP	HL
2291 : F1		POP	AF
2292 : C9		RET
2293 :			DB	0A1,0A4,0A5,0AA,0B8,0B9,0BA,0BC
229B : F5		PUSH	AF
229C : C5		PUSH	BC
229D : 7E		LD	A,(HL)
229E : FE20		CP	20
22A0 : 23		INC	HL
22A1 : 28FA		JR	Z,229D
22A3 : 2B		DEC	HL
22A4 : FE23		CP	23
22A6 : 203C		JR	NZ,22E4
22A8 : 23		INC	HL
22A9 : 3EFB		LD	A,0FB
22AB : 12		LD	(DE),A
22AC : 13		INC	DE
22AD : D5		PUSH	DE
22AE : EB		EX	DE,HL
22AF : 010000		LD	BC,0000
22B2 : 60		LD	H,B
22B3 : 69		LD	L,C
22B4 : 1A		LD	A,(DE)
22B5 : CD9620		CALL	2096
22B8 : 380B		JR	C,22C5
22BA : 4F		LD	C,A
22BB : 0600		LD	B,00
22BD : 13		INC	DE
22BE : CD0A23		CALL	230A
22C1 : 2008		JR	NZ,22CB
22C3 : 18EF		JR	22B4
22C5 : 44		LD	B,H
22C6 : 4D		LD	C,L
22C7 : EB		EX	DE,HL
22C8 : D1		POP	DE
22C9 : CB78		BIT	7,B
22CB : C47D33		CALL	NZ,337D
22CE : 78		LD	A,B
22CF : B7		OR	A
22D0 : 2009		JR	NZ,22DB
22D2 : 3E28		LD	A,28
22D4 : 12		LD	(DE),A
22D5 : 13		INC	DE
22D6 : 79		LD	A,C
22D7 : 12		LD	(DE),A
22D8 : 13		INC	DE
22D9 : 1809		JR	22E4
22DB : EB		EX	DE,HL
22DC : 3629		LD	(HL),29
22DE : 23		INC	HL
22DF : 71		LD	(HL),C
22E0 : 23		INC	HL
22E1 : 70		LD	(HL),B
22E2 : 23		INC	HL
22E3 : EB		EX	DE,HL
22E4 : C1		POP	BC
22E5 : F1		POP	AF
22E6 : C9		RET
22E7 : F5		PUSH	AF
22E8 : CDEF22		CALL	22EF
22EB : 28F8		JR	Z,22E5
22ED : 18F9		JR	22E8
22EF : 7E		LD	A,(HL)
22F0 : FE0D		CP	0D
22F2 : C8		RET	Z
22F3 : FE3A		CP	3A
22F5 : 37		SCF
22F6 : C8		RET	Z
22F7 : 23		INC	HL
22F8 : FEFE		CP	0FE
22FA : 30F3		JR	NC,22EF
22FC : 12		LD	(DE),A
22FD : 13		INC	DE
22FE : C9		RET
22FF : F5		PUSH	AF
2300 : CDEF22		CALL	22EF
2303 : 30E0		JR	NC,22E5
2305 : CCF722		CALL	Z,22F7
2308 : 18F6		JR	2300
230A : AF		XOR	A
230B : 29		ADD	HL,HL
230C : 8F		ADC	A,A
230D : E5		PUSH	HL
230E : 29		ADD	HL,HL
230F : 8F		ADC	A,A
2310 : 29		ADD	HL,HL
2311 : 8F		ADC	A,A
2312 : 09		ADD	HL,BC
2313 : 8F		ADC	A,A
2314 : C1		POP	BC
2315 : 09		ADD	HL,BC
2316 : 8F		ADC	A,A
2317 : C9		RET
2318 : 212E23		LD	HL,232E
231B : CD5C10		CALL	105C
231E : 21F371		LD	HL,71F3
2321 : CB9E		RES	3,(HL)
2323 : 3AF371		LD	A,(71F3)
2326 : CB5F		BIT	3,A
2328 : 280B		JR	Z,2335
232A : B7		OR	A
232B : C38A26		JP	268A
232E :			DB	17,'Ready',0D
2335 : 3AF371		LD	A,(71F3)
2338 : E678		AND	78
233A : 32F371		LD	(71F3),A
233D : 210000		LD	HL,0000
2340 : 223670		LD	(7036),HL
2343 : CD8906		CALL	0689
2346 : 1600		LD	D,00
2348 : 067F		LD	B,7F
234A : 21E272		LD	HL,72E2
234D : CD6F06		CALL	066F
2350 : 21F371		LD	HL,71F3
2353 : CBBE		RES	7,(HL)
2355 : 21E272		LD	HL,72E2
2358 : 7E		LD	A,(HL)
2359 : 23		INC	HL
235A : FE20		CP	20
235C : 28FA		JR	Z,2358
235E : 2B		DEC	HL
235F : FE24		CP	24
2361 : CA1924		JP	Z,2419
2364 : CD9620		CALL	2096
2367 : DA1924		JP	C,2419
236A : D5		PUSH	DE
236B : EB		EX	DE,HL
236C : 6F		LD	L,A
236D : 2600		LD	H,00
236F : 13		INC	DE
2370 : 1A		LD	A,(DE)
2371 : CD9620		CALL	2096
2374 : 380B		JR	C,2381
2376 : 4F		LD	C,A
2377 : 0600		LD	B,00
2379 : CD0A23		CALL	230A
237C : 28F1		JR	Z,236F
237E : CD7D33		CALL	337D
2381 : 44		LD	B,H
2382 : 4D		LD	C,L
2383 : CB78		BIT	7,B
2385 : 20F7		JR	NZ,237E
2387 : EB		EX	DE,HL
2388 : D1		POP	DE
2389 : 7E		LD	A,(HL)
238A : FE0D		CP	0D
238C : CAF025		JP	Z,25F0
238F : FE20		CP	20
2391 : 23		INC	HL
2392 : 28F5		JR	Z,2389
2394 : 2B		DEC	HL
2395 : 78		LD	A,B
2396 : B1		OR	C
2397 : 28E5		JR	Z,237E
2399 : ED436272		LD	(7262),BC
239D : 116672		LD	DE,7266
23A0 : 3AF371		LD	A,(71F3)
23A3 : CBD7		SET	2,A
23A5 : 32F371		LD	(71F3),A
23A8 : CD6C21		CALL	216C
23AB : CDB120		CALL	20B1
23AE : 383C		JR	C,23EC
23B0 : 12		LD	(DE),A
23B1 : 13		INC	DE
23B2 : CD7722		CALL	2277
23B5 : FEA5		CP	0A5
23B7 : CC9B22		CALL	Z,229B
23BA : FEAF		CP	0AF
23BC : CCFF22		CALL	Z,22FF
23BF : FEBD		CP	0BD
23C1 : CCE722		CALL	Z,22E7
23C4 : FEFE		CP	0FE
23C6 : 280F		JR	Z,23D7
23C8 : FEF8		CP	0F8
23CA : 280B		JR	Z,23D7
23CC : FEF9		CP	0F9
23CE : 2807		JR	Z,23D7
23D0 : 3AF371		LD	A,(71F3)
23D3 : CB97		RES	2,A
23D5 : 1805		JR	23DC
23D7 : 3AF371		LD	A,(71F3)
23DA : CBD7		SET	2,A
23DC : 32F371		LD	(71F3),A
23DF : 7E		LD	A,(HL)
23E0 : FE0D		CP	0D
23E2 : CA3325		JP	Z,2533
23E5 : FE20		CP	20
23E7 : 20BF		JR	NZ,23A8
23E9 : 23		INC	HL
23EA : 18F3		JR	23DF
23EC : 7E		LD	A,(HL)
23ED : FE0D		CP	0D
23EF : 28E6		JR	Z,23D7
23F1 : FE20		CP	20
23F3 : 23		INC	HL
23F4 : 28F6		JR	Z,23EC
23F6 : 2B		DEC	HL
23F7 : FE24		CP	24
23F9 : 2860		JR	Z,245B
23FB : FE41		CP	41
23FD : D2AD24		JP	NC,24AD
2400 : 3AF371		LD	A,(71F3)
2403 : CB97		RES	2,A
2405 : 32F371		LD	(71F3),A
2408 : 7E		LD	A,(HL)
2409 : FE26		CP	26
240B : 281A		JR	Z,2427
240D : FE27		CP	27
240F : 2855		JR	Z,2466
2411 : FE22		CP	22
2413 : CA8424		JP	Z,2484
2416 : C3D324		JP	24D3
2419 : 3AF371		LD	A,(71F3)
241C : CBCF		SET	1,A
241E : 32F371		LD	(71F3),A
2421 : 116272		LD	DE,7262
2424 : C3A823		JP	23A8
2427 : 23		INC	HL
2428 : 010000		LD	BC,0000
242B : 7E		LD	A,(HL)
242C : CDA020		CALL	20A0
242F : 3815		JR	C,2446
2431 : 23		INC	HL
2432 : F5		PUSH	AF
2433 : 3EF0		LD	A,0F0
2435 : A0		AND	B
2436 : C47D33		CALL	NZ,337D
2439 : F1		POP	AF
243A : C5		PUSH	BC
243B : E3		EX	(SP),HL
243C : 29		ADD	HL,HL
243D : 29		ADD	HL,HL
243E : 29		ADD	HL,HL
243F : 29		ADD	HL,HL
2440 : E3		EX	(SP),HL
2441 : C1		POP	BC
2442 : 81		ADD	A,C
2443 : 4F		LD	C,A
2444 : 18E5		JR	242B
2446 : 78		LD	A,B
2447 : B7		OR	A
2448 : 2808		JR	Z,2452
244A : 3E25		LD	A,25
244C : 12		LD	(DE),A
244D : 13		INC	DE
244E : 79		LD	A,C
244F : 48		LD	C,B
2450 : 1802		JR	2454
2452 : 3E24		LD	A,24
2454 : 12		LD	(DE),A
2455 : 13		INC	DE
2456 : 79		LD	A,C
2457 : 12		LD	(DE),A
2458 : 13		INC	DE
2459 : 1808		JR	2463
245B : 23		INC	HL
245C : 3E2D		LD	A,2D
245E : 12		LD	(DE),A
245F : 13		INC	DE
2460 : CD9321		CALL	2193
2463 : C31625		JP	2516
2466 : 23		INC	HL
2467 : 3E21		LD	A,21
2469 : 12		LD	(DE),A
246A : 13		INC	DE
246B : 7E		LD	A,(HL)
246C : 23		INC	HL
246D : CDA020		CALL	20A0
2470 : 380F		JR	C,2481
2472 : 87		ADD	A,A
2473 : 87		ADD	A,A
2474 : 87		ADD	A,A
2475 : 87		ADD	A,A
2476 : 47		LD	B,A
2477 : 7E		LD	A,(HL)
2478 : 23		INC	HL
2479 : CDA020		CALL	20A0
247C : 3803		JR	C,2481
247E : 80		ADD	A,B
247F : 18D6		JR	2457
2481 : CD7D33		CALL	337D
2484 : 23		INC	HL
2485 : 3E22		LD	A,22
2487 : 12		LD	(DE),A
2488 : 13		INC	DE
2489 : D5		PUSH	DE
248A : 13		INC	DE
248B : 0600		LD	B,00
248D : 7E		LD	A,(HL)
248E : 23		INC	HL
248F : FE0D		CP	0D
2491 : 28EE		JR	Z,2481
2493 : FE22		CP	22
2495 : 2805		JR	Z,249C
2497 : 12		LD	(DE),A
2498 : 13		INC	DE
2499 : 04		INC	B
249A : 18F1		JR	248D
249C : 7E		LD	A,(HL)
249D : FE22		CP	22
249F : 2006		JR	NZ,24A7
24A1 : 23		INC	HL
24A2 : 12		LD	(DE),A
24A3 : 13		INC	DE
24A4 : 04		INC	B
24A5 : 18E6		JR	248D
24A7 : E3		EX	(SP),HL
24A8 : 70		LD	(HL),B
24A9 : E1		POP	HL
24AA : C31625		JP	2516
24AD : 3AF371		LD	A,(71F3)
24B0 : 47		LD	B,A
24B1 : CB97		RES	2,A
24B3 : 32F371		LD	(71F3),A
24B6 : CB50		BIT	2,B
24B8 : 2804		JR	Z,24BE
24BA : 3EB7		LD	A,0B7
24BC : 12		LD	(DE),A
24BD : 13		INC	DE
24BE : D5		PUSH	DE
24BF : 13		INC	DE
24C0 : CD9321		CALL	2193
24C3 : C1		POP	BC
24C4 : 7E		LD	A,(HL)
24C5 : FE24		CP	24
24C7 : 2804		JR	Z,24CD
24C9 : 3E1A		LD	A,1A
24CB : 1803		JR	24D0
24CD : 23		INC	HL
24CE : 3E1B		LD	A,1B
24D0 : 02		LD	(BC),A
24D1 : 1843		JR	2516
24D3 : 7E		LD	A,(HL)
24D4 : 23		INC	HL
24D5 : CD9620		CALL	2096
24D8 : 382D		JR	C,2507
24DA : D5		PUSH	DE
24DB : EB		EX	DE,HL
24DC : 6F		LD	L,A
24DD : 2600		LD	H,00
24DF : 1A		LD	A,(DE)
24E0 : CD9620		CALL	2096
24E3 : 380B		JR	C,24F0
24E5 : 13		INC	DE
24E6 : 4F		LD	C,A
24E7 : 0600		LD	B,00
24E9 : CD0A23		CALL	230A
24EC : 2019		JR	NZ,2507
24EE : 18EF		JR	24DF
24F0 : 44		LD	B,H
24F1 : 4D		LD	C,L
24F2 : EB		EX	DE,HL
24F3 : D1		POP	DE
24F4 : CB78		BIT	7,B
24F6 : 200F		JR	NZ,2507
24F8 : 3AF371		LD	A,(71F3)
24FB : 0F		RRCA
24FC : 3814		JR	C,2512
24FE : 78		LD	A,B
24FF : B7		OR	A
2500 : 2008		JR	NZ,250A
2502 : 3E28		LD	A,28
2504 : C35424		JP	2454
2507 : CD7D33		CALL	337D
250A : 3E29		LD	A,29
250C : 12		LD	(DE),A
250D : 13		INC	DE
250E : 79		LD	A,C
250F : 48		LD	C,B
2510 : 18F2		JR	2504
2512 : 3E2F		LD	A,2F
2514 : 18F6		JR	250C
2516 : E5		PUSH	HL
2517 : 21E172		LD	HL,72E1
251A : B7		OR	A
251B : ED52		SBC	HL,DE
251D : 38E8		JR	C,2507
251F : E1		POP	HL
2520 : 7E		LD	A,(HL)
2521 : FE0D		CP	0D
2523 : 280E		JR	Z,2533
2525 : FE20		CP	20
2527 : C2A823		JP	NZ,23A8
252A : 23		INC	HL
252B : 18F3		JR	2520
252D : 216272		LD	HL,7262
2530 : C3C02C		JP	2CC0
2533 : 3EFF		LD	A,0FF
2535 : 12		LD	(DE),A
2536 : 13		INC	DE
2537 : AF		XOR	A
2538 : 12		LD	(DE),A
2539 : 13		INC	DE
253A : 12		LD	(DE),A
253B : 13		INC	DE
253C : 21E172		LD	HL,72E1
253F : ED52		SBC	HL,DE
2541 : 38C4		JR	C,2507
2543 : EB		EX	DE,HL
2544 : 2B		DEC	HL
2545 : 2B		DEC	HL
2546 : 3AF371		LD	A,(71F3)
2549 : CB4F		BIT	1,A
254B : 20E0		JR	NZ,252D
254D : 22FB71		LD	(71FB),HL
2550 : ED53FD71		LD	(71FD),DE
2554 : CDE22D		CALL	2DE2
2557 : 3AF371		LD	A,(71F3)
255A : CBAF		RES	5,A
255C : 32F371		LD	(71F3),A
255F : ED5BFD71		LD	DE,(71FD)
2563 : 2AFB71		LD	HL,(71FB)
2566 : 016272		LD	BC,7262
2569 : ED42		SBC	HL,BC
256B : 44		LD	B,H
256C : 4D		LD	C,L
256D : 2B		DEC	HL
256E : 2B		DEC	HL
256F : 2B		DEC	HL
2570 : 2B		DEC	HL
2571 : 226472		LD	(7264),HL
2574 : C5		PUSH	BC
2575 : ED4B6272		LD	BC,(7262)
2579 : 2ABF71		LD	HL,(71BF)
257C : CDD821		CALL	21D8
257F : 3806		JR	C,2587
2581 : EB		EX	DE,HL
2582 : 116272		LD	DE,7262
2585 : 183E		JR	25C5
2587 : B7		OR	A
2588 : CC0725		CALL	Z,2507
258B : EB		EX	DE,HL
258C : 116272		LD	DE,7262
258F : C1		POP	BC
2590 : D5		PUSH	DE
2591 : C5		PUSH	BC
2592 : E5		PUSH	HL
2593 : 44		LD	B,H
2594 : 4D		LD	C,L
2595 : 2AC171		LD	HL,(71C1)
2598 : B7		OR	A
2599 : ED42		SBC	HL,BC
259B : 44		LD	B,H
259C : 4D		LD	C,L
259D : E1		POP	HL
259E : D1		POP	DE
259F : D5		PUSH	DE
25A0 : E5		PUSH	HL
25A1 : 19		ADD	HL,DE
25A2 : 09		ADD	HL,BC
25A3 : E5		PUSH	HL
25A4 : FDE5		PUSH	IY
25A6 : D1		POP	DE
25A7 : ED52		SBC	HL,DE
25A9 : D47833		CALL	NC,3378
25AC : E1		POP	HL
25AD : 22C171		LD	(71C1),HL
25B0 : 22C371		LD	(71C3),HL
25B3 : 2B		DEC	HL
25B4 : 54		LD	D,H
25B5 : 5D		LD	E,L
25B6 : E1		POP	HL
25B7 : E5		PUSH	HL
25B8 : 09		ADD	HL,BC
25B9 : 2B		DEC	HL
25BA : EDB8		LDDR
25BC : E1		POP	HL
25BD : C1		POP	BC
25BE : D1		POP	DE
25BF : EB		EX	DE,HL
25C0 : EDB0		LDIR
25C2 : C32323		JP	2323
25C5 : D5		PUSH	DE
25C6 : E5		PUSH	HL
25C7 : 23		INC	HL
25C8 : 23		INC	HL
25C9 : 4E		LD	C,(HL)
25CA : 23		INC	HL
25CB : 46		LD	B,(HL)
25CC : 03		INC	BC
25CD : 03		INC	BC
25CE : 03		INC	BC
25CF : 03		INC	BC
25D0 : D1		POP	DE
25D1 : D5		PUSH	DE
25D2 : 62		LD	H,D
25D3 : 6B		LD	L,E
25D4 : 09		ADD	HL,BC
25D5 : E5		PUSH	HL
25D6 : 2AC171		LD	HL,(71C1)
25D9 : B7		OR	A
25DA : ED52		SBC	HL,DE
25DC : B7		OR	A
25DD : ED42		SBC	HL,BC
25DF : 44		LD	B,H
25E0 : 4D		LD	C,L
25E1 : E1		POP	HL
25E2 : EDB0		LDIR
25E4 : ED53C171		LD	(71C1),DE
25E8 : ED53C371		LD	(71C3),DE
25EC : E1		POP	HL
25ED : D1		POP	DE
25EE : 189F		JR	258F
25F0 : ED43FF71		LD	(71FF),BC
25F4 : CDE22D		CALL	2DE2
25F7 : ED4BFF71		LD	BC,(71FF)
25FB : 3AF371		LD	A,(71F3)
25FE : CB5F		BIT	3,A
2600 : 202F		JR	NZ,2631
2602 : 2ABF71		LD	HL,(71BF)
2605 : CDD821		CALL	21D8
2608 : 3824		JR	C,262E
260A : EB		EX	DE,HL
260B : 23		INC	HL
260C : 23		INC	HL
260D : 5E		LD	E,(HL)
260E : 23		INC	HL
260F : 56		LD	D,(HL)
2610 : 23		INC	HL
2611 : 44		LD	B,H
2612 : 4D		LD	C,L
2613 : 19		ADD	HL,DE
2614 : EB		EX	DE,HL
2615 : 0B		DEC	BC
2616 : 0B		DEC	BC
2617 : 0B		DEC	BC
2618 : 0B		DEC	BC
2619 : 2AC171		LD	HL,(71C1)
261C : B7		OR	A
261D : ED52		SBC	HL,DE
261F : EB		EX	DE,HL
2620 : C5		PUSH	BC
2621 : D5		PUSH	DE
2622 : C1		POP	BC
2623 : D1		POP	DE
2624 : EDB0		LDIR
2626 : ED53C171		LD	(71C1),DE
262A : ED53C371		LD	(71C3),DE
262E : C32323		JP	2323
2631 : CB9F		RES	3,A
2633 : 32F371		LD	(71F3),A
2636 : 18F6		JR	262E
2638 : 216372		LD	HL,7263
263B : 110A00		LD	DE,000A
263E : 42		LD	B,D
263F : 4B		LD	C,E
2640 : 7E		LD	A,(HL)
2641 : FEFF		CP	0FF
2643 : C8		RET	Z
2644 : FE2F		CP	2F
2646 : 201C		JR	NZ,2664
2648 : 23		INC	HL
2649 : 5E		LD	E,(HL)
264A : 23		INC	HL
264B : 56		LD	D,(HL)
264C : 23		INC	HL
264D : 7E		LD	A,(HL)
264E : FEFF		CP	0FF
2650 : C8		RET	Z
2651 : FEFC		CP	0FC
2653 : 200F		JR	NZ,2664
2655 : 23		INC	HL
2656 : 7E		LD	A,(HL)
2657 : FE2F		CP	2F
2659 : 2009		JR	NZ,2664
265B : 23		INC	HL
265C : 4E		LD	C,(HL)
265D : 23		INC	HL
265E : 46		LD	B,(HL)
265F : 23		INC	HL
2660 : 7E		LD	A,(HL)
2661 : FEFF		CP	0FF
2663 : C8		RET	Z
2664 : CD7D33		CALL	337D
2667 : F1		POP	AF
2668 : CD3826		CALL	2638
266B : 21E272		LD	HL,72E2
266E : 3AF371		LD	A,(71F3)
2671 : CBDF		SET	3,A
2673 : 32F371		LD	(71F3),A
2676 : ED43FF71		LD	(71FF),BC
267A : ED530172		LD	(7201),DE
267E : 067F		LD	B,7F
2680 : 0E01		LD	C,01
2682 : CD0722		CALL	2207
2685 : 38DD		JR	C,2664
2687 : C33523		JP	2335
268A : 38A2		JR	C,262E
268C : ED5B0172		LD	DE,(7201)
2690 : 2AFF71		LD	HL,(71FF)
2693 : 44		LD	B,H
2694 : 4D		LD	C,L
2695 : ED5A		ADC	HL,DE
2697 : EB		EX	DE,HL
2698 : F26B26		JP	P,266B
269B : 3AF371		LD	A,(71F3)
269E : 1891		JR	2631
26A0 : F1		POP	AF
26A1 : CDE22D		CALL	2DE2
26A4 : 3AF371		LD	A,(71F3)
26A7 : CBAF		RES	5,A
26A9 : 32F371		LD	(71F3),A
26AC : 216372		LD	HL,7263
26AF : 7E		LD	A,(HL)
26B0 : FE2F		CP	2F
26B2 : 2058		JR	NZ,270C
26B4 : 23		INC	HL
26B5 : 4E		LD	C,(HL)
26B6 : 23		INC	HL
26B7 : 46		LD	B,(HL)
26B8 : 23		INC	HL
26B9 : 7E		LD	A,(HL)
26BA : FEFC		CP	0FC
26BC : 204E		JR	NZ,270C
26BE : 23		INC	HL
26BF : 7E		LD	A,(HL)
26C0 : FE2F		CP	2F
26C2 : 2048		JR	NZ,270C
26C4 : 23		INC	HL
26C5 : 5E		LD	E,(HL)
26C6 : 23		INC	HL
26C7 : 56		LD	D,(HL)
26C8 : 23		INC	HL
26C9 : 7E		LD	A,(HL)
26CA : FEFF		CP	0FF
26CC : 203E		JR	NZ,270C
26CE : D5		PUSH	DE
26CF : 2ABF71		LD	HL,(71BF)
26D2 : CDD821		CALL	21D8
26D5 : 3832		JR	C,2709
26D7 : C1		POP	BC
26D8 : D5		PUSH	DE
26D9 : CDD821		CALL	21D8
26DC : 3831		JR	C,270F
26DE : 13		INC	DE
26DF : 13		INC	DE
26E0 : 1A		LD	A,(DE)
26E1 : 6F		LD	L,A
26E2 : 13		INC	DE
26E3 : 1A		LD	A,(DE)
26E4 : 67		LD	H,A
26E5 : 13		INC	DE
26E6 : EB		EX	DE,HL
26E7 : 19		ADD	HL,DE
26E8 : EB		EX	DE,HL
26E9 : E1		POP	HL
26EA : E5		PUSH	HL
26EB : D5		PUSH	DE
26EC : EB		EX	DE,HL
26ED : B7		OR	A
26EE : ED52		SBC	HL,DE
26F0 : 381A		JR	C,270C
26F2 : D1		POP	DE
26F3 : 2AC171		LD	HL,(71C1)
26F6 : ED52		SBC	HL,DE
26F8 : 44		LD	B,H
26F9 : 4D		LD	C,L
26FA : EB		EX	DE,HL
26FB : D1		POP	DE
26FC : EDB0		LDIR
26FE : ED53C171		LD	(71C1),DE
2702 : ED53C371		LD	(71C3),DE
2706 : C32323		JP	2323
2709 : B7		OR	A
270A : 20CB		JR	NZ,26D7
270C : CD7D33		CALL	337D
270F : B7		OR	A
2710 : 20D7		JR	NZ,26E9
2712 : F1		POP	AF
2713 : AF		XOR	A
2714 : F5		PUSH	AF
2715 : 216372		LD	HL,7263
2718 : 010100		LD	BC,0001
271B : 11FF7F		LD	DE,7FFF
271E : 7E		LD	A,(HL)
271F : 23		INC	HL
2720 : FEFE		CP	0FE
2722 : 3045		JR	NC,2769
2724 : FEFB		CP	0FB
2726 : 2017		JR	NZ,273F
2728 : 7E		LD	A,(HL)
2729 : 23		INC	HL
272A : FE28		CP	28
272C : 20DE		JR	NZ,270C
272E : 7E		LD	A,(HL)
272F : 23		INC	HL
2730 : E3		EX	(SP),HL
2731 : 67		LD	H,A
2732 : E3		EX	(SP),HL
2733 : 7E		LD	A,(HL)
2734 : 23		INC	HL
2735 : FEFE		CP	0FE
2737 : 3030		JR	NC,2769
2739 : FEFC		CP	0FC
273B : 20CF		JR	NZ,270C
273D : 7E		LD	A,(HL)
273E : 23		INC	HL
273F : FEFE		CP	0FE
2741 : 3026		JR	NC,2769
2743 : FEFC		CP	0FC
2745 : 2812		JR	Z,2759
2747 : FE2F		CP	2F
2749 : 20C1		JR	NZ,270C
274B : 4E		LD	C,(HL)
274C : 23		INC	HL
274D : 46		LD	B,(HL)
274E : 23		INC	HL
274F : 7E		LD	A,(HL)
2750 : 23		INC	HL
2751 : FEFE		CP	0FE
2753 : 3014		JR	NC,2769
2755 : FEFC		CP	0FC
2757 : 20B3		JR	NZ,270C
2759 : 7E		LD	A,(HL)
275A : 23		INC	HL
275B : FE2F		CP	2F
275D : 20AD		JR	NZ,270C
275F : 5E		LD	E,(HL)
2760 : 23		INC	HL
2761 : 56		LD	D,(HL)
2762 : 23		INC	HL
2763 : 7E		LD	A,(HL)
2764 : 23		INC	HL
2765 : FEFE		CP	0FE
2767 : 38A3		JR	C,270C
2769 : D5		PUSH	DE
276A : 2ABF71		LD	HL,(71BF)
276D : CDD821		CALL	21D8
2770 : 3003		JR	NC,2775
2772 : B7		OR	A
2773 : 2897		JR	Z,270C
2775 : C1		POP	BC
2776 : D5		PUSH	DE
2777 : CDD821		CALL	21D8
277A : 3005		JR	NC,2781
277C : B7		OR	A
277D : 288D		JR	Z,270C
277F : 1809		JR	278A
2781 : EB		EX	DE,HL
2782 : 23		INC	HL
2783 : 23		INC	HL
2784 : 5E		LD	E,(HL)
2785 : 23		INC	HL
2786 : 56		LD	D,(HL)
2787 : 23		INC	HL
2788 : 19		ADD	HL,DE
2789 : EB		EX	DE,HL
278A : C1		POP	BC
278B : F1		POP	AF
278C : CDC927		CALL	27C9
278F : C31823		JP	2318
2792 : FE80		CP	80
2794 : D8		RET	C
2795 : FE83		CP	83
2797 : 3F		CCF
2798 : D0		RET	NC
2799 : FE84		CP	84
279B : D8		RET	C
279C : FE89		CP	89
279E : 3F		CCF
279F : D0		RET	NC
27A0 : FE8C		CP	8C
27A2 : D8		RET	C
27A3 : FE8E		CP	8E
27A5 : 3F		CCF
27A6 : D0		RET	NC
27A7 : FEFB		CP	0FB
27A9 : C9		RET
27AA : 3E0D		LD	A,0D
27AC : 12		LD	(DE),A
27AD : 13		INC	DE
27AE : 3E61		LD	A,61
27B0 : 93		SUB	E
27B1 : FE80		CP	80
27B3 : D47D33		CALL	NC,337D
27B6 : F1		POP	AF
27B7 : F5		PUSH	AF
27B8 : E5		PUSH	HL
27B9 : 21E272		LD	HL,72E2
27BC : FE02		CP	02
27BE : F5		PUSH	AF
27BF : CCC717		CALL	Z,17C7
27C2 : F1		POP	AF
27C3 : C45B10		CALL	NZ,105B
27C6 : C1		POP	BC
27C7 : F1		POP	AF
27C8 : D1		POP	DE
27C9 : D5		PUSH	DE
27CA : F5		PUSH	AF
27CB : 60		LD	H,B
27CC : 69		LD	L,C
27CD : B7		OR	A
27CE : ED52		SBC	HL,DE
27D0 : 3008		JR	NC,27DA
27D2 : 19		ADD	HL,DE
27D3 : 5E		LD	E,(HL)
27D4 : 23		INC	HL
27D5 : 56		LD	D,(HL)
27D6 : 7A		LD	A,D
27D7 : B3		OR	E
27D8 : 2003		JR	NZ,27DD
27DA : F1		POP	AF
27DB : D1		POP	DE
27DC : C9		RET
27DD : D5		PUSH	DE
27DE : E5		PUSH	HL
27DF : CDAC08		CALL	08AC
27E2 : 380D		JR	C,27F1
27E4 : FE20		CP	20
27E6 : 2009		JR	NZ,27F1
27E8 : CDAC08		CALL	08AC
27EB : 38FB		JR	C,27E8
27ED : FE20		CP	20
27EF : 20F7		JR	NZ,27E8
27F1 : E1		POP	HL
27F2 : D1		POP	DE
27F3 : 23		INC	HL
27F4 : E5		PUSH	HL
27F5 : AF		XOR	A
27F6 : 32FF71		LD	(71FF),A
27F9 : 4F		LD	C,A
27FA : 06FF		LD	B,0FF
27FC : 21E272		LD	HL,72E2
27FF : CD0722		CALL	2207
2802 : EB		EX	DE,HL
2803 : E1		POP	HL
2804 : 23		INC	HL
2805 : 23		INC	HL
2806 : 4E		LD	C,(HL)
2807 : 23		INC	HL
2808 : 79		LD	A,C
2809 : FEFF		CP	0FF
280B : 289D		JR	Z,27AA
280D : CD9227		CALL	2792
2810 : 300D		JR	NC,281F
2812 : 3AFF71		LD	A,(71FF)
2815 : CD9227		CALL	2792
2818 : 3004		JR	NC,281E
281A : 3E20		LD	A,20
281C : 12		LD	(DE),A
281D : 13		INC	DE
281E : 79		LD	A,C
281F : 32FF71		LD	(71FF),A
2822 : E5		PUSH	HL
2823 : CD4821		CALL	2148
2826 : 3814		JR	C,283C
2828 : 7E		LD	A,(HL)
2829 : 12		LD	(DE),A
282A : 23		INC	HL
282B : 13		INC	DE
282C : 10FA		DJNZ	2828
282E : E1		POP	HL
282F : 79		LD	A,C
2830 : FEAF		CP	0AF
2832 : CC0E29		CALL	Z,290E
2835 : FEBD		CP	0BD
2837 : CCFE28		CALL	Z,28FE
283A : 18CA		JR	2806
283C : E1		POP	HL
283D : 79		LD	A,C
283E : D61A		SUB	1A
2840 : 283A		JR	Z,287C
2842 : 3D		DEC	A
2843 : 2835		JR	Z,287A
2845 : D603		SUB	03
2847 : 2845		JR	Z,288E
2849 : 3D		DEC	A
284A : 2844		JR	Z,2890
284C : D602		SUB	02
284E : 284D		JR	Z,289D
2850 : 3D		DEC	A
2851 : 284E		JR	Z,28A1
2853 : D602		SUB	02
2855 : 2864		JR	Z,28BB
2857 : 3D		DEC	A
2858 : 2872		JR	Z,28CC
285A : D603		SUB	03
285C : 2878		JR	Z,28D6
285E : 3D		DEC	A
285F : CAE428		JP	Z,28E4
2862 : D604		SUB	04
2864 : 280B		JR	Z,2871
2866 : 3D		DEC	A
2867 : CAEA28		JP	Z,28EA
286A : 3D		DEC	A
286B : CAF728		JP	Z,28F7
286E : CD7D33		CALL	337D
2871 : 3E24		LD	A,24
2873 : 12		LD	(DE),A
2874 : 13		INC	DE
2875 : 3E00		LD	A,00
2877 : C37C28		JP	287C
287A : 3E24		LD	A,24
287C : F5		PUSH	AF
287D : 23		INC	HL
287E : 23		INC	HL
287F : 4E		LD	C,(HL)
2880 : 0600		LD	B,00
2882 : 23		INC	HL
2883 : EDB0		LDIR
2885 : F1		POP	AF
2886 : B7		OR	A
2887 : 2802		JR	Z,288B
2889 : 12		LD	(DE),A
288A : 13		INC	DE
288B : C30628		JP	2806
288E : AF		XOR	A
288F : 013E24		LD	BC,243E
2892 : F5		PUSH	AF
2893 : 3E46		LD	A,46
2895 : 12		LD	(DE),A
2896 : 13		INC	DE
2897 : 3E4E		LD	A,4E
2899 : 12		LD	(DE),A
289A : 13		INC	DE
289B : 18E0		JR	287D
289D : 3E27		LD	A,27
289F : 181C		JR	28BD
28A1 : 46		LD	B,(HL)
28A2 : 23		INC	HL
28A3 : 3E22		LD	A,22
28A5 : 12		LD	(DE),A
28A6 : 13		INC	DE
28A7 : 78		LD	A,B
28A8 : B7		OR	A
28A9 : 280C		JR	Z,28B7
28AB : 7E		LD	A,(HL)
28AC : 12		LD	(DE),A
28AD : 23		INC	HL
28AE : 13		INC	DE
28AF : FE22		CP	22
28B1 : 2002		JR	NZ,28B5
28B3 : 12		LD	(DE),A
28B4 : 13		INC	DE
28B5 : 10F4		DJNZ	28AB
28B7 : 3E22		LD	A,22
28B9 : 18CB		JR	2886
28BB : 3E26		LD	A,26
28BD : 12		LD	(DE),A
28BE : 13		INC	DE
28BF : D5		PUSH	DE
28C0 : 5E		LD	E,(HL)
28C1 : 1600		LD	D,00
28C3 : 23		INC	HL
28C4 : E3		EX	(SP),HL
28C5 : CD5822		CALL	2258
28C8 : D1		POP	DE
28C9 : EB		EX	DE,HL
28CA : 18BF		JR	288B
28CC : 3E26		LD	A,26
28CE : 12		LD	(DE),A
28CF : 13		INC	DE
28D0 : D5		PUSH	DE
28D1 : 5E		LD	E,(HL)
28D2 : 23		INC	HL
28D3 : 56		LD	D,(HL)
28D4 : 18ED		JR	28C3
28D6 : D5		PUSH	DE
28D7 : 5E		LD	E,(HL)
28D8 : 1600		LD	D,00
28DA : 23		INC	HL
28DB : E3		EX	(SP),HL
28DC : 0100FF		LD	BC,0FF00
28DF : CD0722		CALL	2207
28E2 : 18E4		JR	28C8
28E4 : D5		PUSH	DE
28E5 : 5E		LD	E,(HL)
28E6 : 23		INC	HL
28E7 : 56		LD	D,(HL)
28E8 : 18F0		JR	28DA
28EA : D5		PUSH	DE
28EB : 5E		LD	E,(HL)
28EC : 23		INC	HL
28ED : 56		LD	D,(HL)
28EE : 23		INC	HL
28EF : E5		PUSH	HL
28F0 : EB		EX	DE,HL
28F1 : 5E		LD	E,(HL)
28F2 : 23		INC	HL
28F3 : 56		LD	D,(HL)
28F4 : E1		POP	HL
28F5 : 18E4		JR	28DB
28F7 : D5		PUSH	DE
28F8 : 5E		LD	E,(HL)
28F9 : 23		INC	HL
28FA : 56		LD	D,(HL)
28FB : 23		INC	HL
28FC : 18DD		JR	28DB
28FE : C5		PUSH	BC
28FF : 06FE		LD	B,0FE
2901 : F5		PUSH	AF
2902 : 7E		LD	A,(HL)
2903 : B8		CP	B
2904 : 3005		JR	NC,290B
2906 : 23		INC	HL
2907 : 12		LD	(DE),A
2908 : 13		INC	DE
2909 : 18F7		JR	2902
290B : F1		POP	AF
290C : C1		POP	BC
290D : C9		RET
290E : C5		PUSH	BC
290F : 06FF		LD	B,0FF
2911 : 18EE		JR	2901
2913 : 2ACF71		LD	HL,(71CF)	;rutina RST 20
2916 : 22CF71		LD	(71CF),HL	;rutina RST 28
2919 : 7E		LD	A,(HL)
291A : 23		INC	HL
291B : FE40		CP	40
291D : D0		RET	NC
291E : D9		EXX
291F : 213529		LD	HL,2935
2922 : 010D00		LD	BC,000D
2925 : EDB1		CPIR
2927 : D9		EXX
2928 : C0		RET	NZ
2929 : D9		EXX
292A : 214229		LD	HL,2942
292D : 09		ADD	HL,BC
292E : 09		ADD	HL,BC
292F : 5E		LD	E,(HL)
2930 : 23		INC	HL
2931 : 56		LD	D,(HL)
2932 : D5		PUSH	DE
2933 : D9		EXX
2934 : C9		RET
2935 :			DB	1A,1B,1E,1F,21,22,24,25,28,29,2D,2E,2F
2942 :			DW	2961,2961,2966,2961,295C,2961,295C
2950 :			DW	296A,295C,2966,2966,2966,2966
295C : 5E		LD	E,(HL)
295D : 23		INC	HL
295E : 1600		LD	D,00
2960 : C9		RET
2961 : 5E		LD	E,(HL)
2962 : 23		INC	HL
2963 : 56		LD	D,(HL)
2964 : 23		INC	HL
2965 : C9		RET
2966 : CD6129		CALL	2961
2969 :			DB	01	;LD BC,545D
296A : 5D		LD	E,L
296B : 54		LD	D,H
296C : 4E		LD	C,(HL)
296D : 23		INC	HL
296E : 0600		LD	B,00
2970 : 09		ADD	HL,BC
2971 : C9		RET
2972 : 2AC771		LD	HL,(71C7)
2975 : 22C971		LD	(71C9),HL
2978 : 1600		LD	D,00
297A : D5		PUSH	DE
297B : CD372A		CALL	2A37
297E : CD3D2B		CALL	2B3D
2981 : C1		POP	BC
2982 : 3E02		LD	A,02
2984 : 1F		RRA
2985 : 07		RLCA
2986 : 08		EX	AF,AF'
2987 : D5		PUSH	DE
2988 : E7		RST	20
2989 : D1		POP	DE
298A : FE80		CP	80
298C : D8		RET	C
298D : FE8C		CP	8C
298F : D0		RET	NC
2990 : D680		SUB	80
2992 : D9		EXX
2993 : 21E929		LD	HL,29E9
2996 : 5F		LD	E,A
2997 : 1600		LD	D,00
2999 : 19		ADD	HL,DE
299A : 7E		LD	A,(HL)
299B : D9		EXX
299C : FE04		CP	04
299E : CCC029		CALL	Z,29C0
29A1 : B8		CP	B
29A2 : D8		RET	C
29A3 : C8		RET	Z
29A4 : C5		PUSH	BC
29A5 : 018129		LD	BC,2981
29A8 : C5		PUSH	BC
29A9 : D5		PUSH	DE
29AA : 57		LD	D,A
29AB : D9		EXX
29AC : 21F529		LD	HL,29F5
29AF : 08		EX	AF,AF'
29B0 : 3003		JR	NC,29B5
29B2 : 21192A		LD	HL,2A19
29B5 : 19		ADD	HL,DE
29B6 : 19		ADD	HL,DE
29B7 : 5E		LD	E,(HL)
29B8 : 23		INC	HL
29B9 : 56		LD	D,(HL)
29BA : D5		PUSH	DE
29BB : D9		EXX
29BC : D5		PUSH	DE
29BD : EF		RST	28
29BE : 18BB		JR	297B
29C0 : 7E		LD	A,(HL)
29C1 : D686		SUB	86
29C3 : FE03		CP	03
29C5 : 3E04		LD	A,04
29C7 : D0		RET	NC
29C8 : EF		RST	28
29C9 : D9		EXX
29CA : D680		SUB	80
29CC : BB		CP	E
29CD : CC7333		CALL	Z,3373
29D0 : D606		SUB	06
29D2 : FE01		CP	01
29D4 : 8F		ADC	A,A
29D5 : 57		LD	D,A
29D6 : 7B		LD	A,E
29D7 : D606		SUB	06
29D9 : FE01		CP	01
29DB : 8F		ADC	A,A
29DC : B2		OR	D
29DD : 5F		LD	E,A
29DE : 1600		LD	D,00
29E0 : 21122A		LD	HL,2A12
29E3 : 19		ADD	HL,DE
29E4 : 5E		LD	E,(HL)
29E5 : D9		EXX
29E6 : 3E04		LD	A,04
29E8 : C9		RET
29E9 :			DB	08,07,07,06,05,05,04,04,04,03,01,02
29F5 :			DW	325E,31BD,3255,3259,328F,3299,32F8,32EB
2A05 :			DW	32C4,3303,3319,330E,32B8,32DD,32D3
2A13 :			DB	06,07,0D,08,0E,0C
2A19 :			DW	3252,3252,3252,3252,3324,3252,32FD,32F0
2A29 :			DW	32C9,3252,3252,3252,32BD,32E2,32D8,2AD9
2A39 : C9		RET
2A3A : 71		LD	(HL),C
2A3B : 115000		LD	DE,0050
2A3E : 19		ADD	HL,DE
2A3F : DC7F33		CALL	C,337F
2A42 : ED72		SBC	HL,SP
2A44 : D9		EXX
2A45 : D8		RET	C
2A46 : CD7F33		CALL	337F
2A49 : E5		PUSH	HL
2A4A : D9		EXX
2A4B : E1		POP	HL
2A4C : 1804		JR	2A52
2A4E : D9		EXX
2A4F : 2AC371		LD	HL,(71C3)
2A52 : 116400		LD	DE,0064
2A55 : ED5A		ADC	HL,DE
2A57 : EC7833		CALL	PE,3378
2A5A : FDE5		PUSH	IY
2A5C : D1		POP	DE
2A5D : ED52		SBC	HL,DE
2A5F : D9		EXX
2A60 : D8		RET	C
2A61 : CD7833		CALL	3378
2A64 : CD1929		CALL	2919
2A67 : D68C		SUB	8C
2A69 : FE01		CP	01
2A6B : 9F		SBC	A,A
2A6C : E680		AND	80
2A6E : 2ACF71		LD	HL,(71CF)
2A71 : B6		OR	(HL)
2A72 : 23		INC	HL
2A73 : 23		INC	HL
2A74 : 23		INC	HL
2A75 : CDF42A		CALL	2AF4
2A78 : EB		EX	DE,HL
2A79 : 2AC371		LD	HL,(71C3)
2A7C : B7		OR	A
2A7D : ED52		SBC	HL,DE
2A7F : 2808		JR	Z,2A89
2A81 : 2ACF71		LD	HL,(71CF)
2A84 : 23		INC	HL
2A85 : 73		LD	(HL),E
2A86 : 23		INC	HL
2A87 : 72		LD	(HL),D
2A88 : C9		RET
2A89 : 2AC371		LD	HL,(71C3)
2A8C : 7E		LD	A,(HL)
2A8D : B7		OR	A
2A8E : FC8133		CALL	M,3381
2A91 : 23		INC	HL
2A92 : CD6C29		CALL	296C
2A95 : FE1B		CP	1B
2A97 : 280F		JR	Z,2AA8
2A99 : AF		XOR	A
2A9A : 77		LD	(HL),A
2A9B : 23		INC	HL
2A9C : 77		LD	(HL),A
2A9D : 23		INC	HL
2A9E : ED5BC371		LD	DE,(71C3)
2AA2 : 22C371		LD	(71C3),HL
2AA5 : AF		XOR	A
2AA6 : 18D9		JR	2A81
2AA8 : 3AD771		LD	A,(71D7)
2AAB : 4F		LD	C,A
2AAC : 0600		LD	B,00
2AAE : 71		LD	(HL),C
2AAF : 23		INC	HL
2AB0 : 70		LD	(HL),B
2AB1 : 23		INC	HL
2AB2 : 09		ADD	HL,BC
2AB3 : 18E9		JR	2A9E
2AB5 : 21ED71		LD	HL,71ED
2AB8 : 7E		LD	A,(HL)
2AB9 : B7		OR	A
2ABA : C0		RET	NZ
2ABB : 35		DEC	(HL)
2ABC : 2ABF71		LD	HL,(71BF)
2ABF : 7E		LD	A,(HL)
2AC0 : 23		INC	HL
2AC1 : B6		OR	(HL)
2AC2 : C8		RET	Z
2AC3 : 23		INC	HL
2AC4 : 23		INC	HL
2AC5 : 23		INC	HL
2AC6 : CDE32E		CALL	2EE3
2AC9 : FEFF		CP	0FF
2ACB : 28F2		JR	Z,2ABF
2ACD : FE2D		CP	2D
2ACF : 201B		JR	NZ,2AEC
2AD1 : AF		XOR	A
2AD2 : E5		PUSH	HL
2AD3 : CD6E2A		CALL	2A6E
2AD6 : C48233		CALL	NZ,3382
2AD9 : E1		POP	HL
2ADA : EB		EX	DE,HL
2ADB : 23		INC	HL
2ADC : CD6C29		CALL	296C
2ADF : ED4BCF71		LD	BC,(71CF)
2AE3 : 71		LD	(HL),C
2AE4 : 23		INC	HL
2AE5 : 70		LD	(HL),B
2AE6 : EB		EX	DE,HL
2AE7 : 18DD		JR	2AC6
2AE9 : CDE32E		CALL	2EE3
2AEC : FEFE		CP	0FE
2AEE : 38F9		JR	C,2AE9
2AF0 : 28D4		JR	Z,2AC6
2AF2 : 18CB		JR	2ABF
2AF4 : CD4E2A		CALL	2A4E
2AF7 : ED5BC371		LD	DE,(71C3)
2AFB : 12		LD	(DE),A
2AFC : 13		INC	DE
2AFD : 4E		LD	C,(HL)
2AFE : 0600		LD	B,00
2B00 : 03		INC	BC
2B01 : EDB0		LDIR
2B03 : 2AC171		LD	HL,(71C1)
2B06 : E5		PUSH	HL
2B07 : ED5BC371		LD	DE,(71C3)
2B0B : 1A		LD	A,(DE)
2B0C : BE		CP	(HL)
2B0D : 2011		JR	NZ,2B20
2B0F : 13		INC	DE
2B10 : 23		INC	HL
2B11 : 1A		LD	A,(DE)
2B12 : BE		CP	(HL)
2B13 : 200B		JR	NZ,2B20
2B15 : 47		LD	B,A
2B16 : 13		INC	DE
2B17 : 23		INC	HL
2B18 : 1A		LD	A,(DE)
2B19 : BE		CP	(HL)
2B1A : 2004		JR	NZ,2B20
2B1C : 10F8		DJNZ	2B16
2B1E : E1		POP	HL
2B1F : C9		RET
2B20 : E1		POP	HL
2B21 : 7E		LD	A,(HL)
2B22 : 23		INC	HL
2B23 : CD6C29		CALL	296C
2B26 : FE1B		CP	1B
2B28 : 2008		JR	NZ,2B32
2B2A : 4E		LD	C,(HL)
2B2B : 23		INC	HL
2B2C : 0600		LD	B,00
2B2E : 03		INC	BC
2B2F : 09		ADD	HL,BC
2B30 : 18D4		JR	2B06
2B32 : 4E		LD	C,(HL)
2B33 : 23		INC	HL
2B34 : 46		LD	B,(HL)
2B35 : 23		INC	HL
2B36 : 87		ADD	A,A
2B37 : 30CD		JR	NC,2B06
2B39 : 09		ADD	HL,BC
2B3A : 18CA		JR	2B06
2B3C : EF		RST	28
2B3D : E7		RST	20
2B3E : FE8C		CP	8C
2B40 : 2010		JR	NZ,2B52
2B42 : 22CF71		LD	(71CF),HL
2B45 : CD7829		CALL	2978
2B48 : FE8D		CP	8D
2B4A : C47333		CALL	NZ,3373
2B4D : 22CF71		LD	(71CF),HL
2B50 : 08		EX	AF,AF'
2B51 : C9		RET
2B52 : FE84		CP	84
2B54 : 28E6		JR	Z,2B3C
2B56 : FE85		CP	85
2B58 : 200C		JR	NZ,2B66
2B5A : CD3C2B		CALL	2B3C
2B5D : DC7E33		CALL	C,337E
2B60 : EB		EX	DE,HL
2B61 : CD3E3C		CALL	3C3E
2B64 : EB		EX	DE,HL
2B65 : C9		RET
2B66 : FE8E		CP	8E
2B68 : 200D		JR	NZ,2B77
2B6A : CD3C2B		CALL	2B3C
2B6D : DC7E33		CALL	C,337E
2B70 : 7A		LD	A,D
2B71 : 2F		CPL
2B72 : 57		LD	D,A
2B73 : 7B		LD	A,E
2B74 : 2F		CPL
2B75 : 5F		LD	E,A
2B76 : C9		RET
2B77 : FE7D		CP	7D
2B79 : 3020		JR	NC,2B9B
2B7B : FE41		CP	41
2B7D : 3812		JR	C,2B91
2B7F : D641		SUB	41
2B81 : D9		EXX
2B82 : 5F		LD	E,A
2B83 : 1600		LD	D,00
2B85 : 21772C		LD	HL,2C77
2B88 : 19		ADD	HL,DE
2B89 : 19		ADD	HL,DE
2B8A : 5E		LD	E,(HL)
2B8B : 23		INC	HL
2B8C : 56		LD	D,(HL)
2B8D : D5		PUSH	DE
2B8E : D9		EXX
2B8F : EF		RST	28
2B90 : C9		RET
2B91 : FE2A		CP	2A
2B93 : 3006		JR	NC,2B9B
2B95 : FE28		CP	28
2B97 : 3009		JR	NC,2BA2
2B99 : FE26		CP	26
2B9B : D47333		CALL	NC,3373
2B9E : FE24		CP	24
2BA0 : 3806		JR	C,2BA8
2BA2 : F637		OR	37
2BA4 : 22CF71		LD	(71CF),HL
2BA7 : C9		RET
2BA8 : FE22		CP	22
2BAA : 28F7		JR	Z,2BA3
2BAC : FE21		CP	21
2BAE : 200A		JR	NZ,2BBA
2BB0 : 7B		LD	A,E
2BB1 : 0E01		LD	C,01
2BB3 : CD1E2E		CALL	2E1E
2BB6 : 12		LD	(DE),A
2BB7 : 1B		DEC	DE
2BB8 : 18E9		JR	2BA3
2BBA : FE20		CP	20
2BBC : 30DD		JR	NC,2B9B
2BBE : FE1E		CP	1E
2BC0 : D27333		JP	NC,3373
2BC3 : FE1C		CP	1C
2BC5 : 30D4		JR	NC,2B9B
2BC7 : FE1A		CP	1A
2BC9 : DC7333		CALL	C,3373
2BCC : CDE02B		CALL	2BE0
2BCF : D0		RET	NC
2BD0 : EB		EX	DE,HL
2BD1 : E5		PUSH	HL
2BD2 : 4E		LD	C,(HL)
2BD3 : CD1E2E		CALL	2E1E
2BD6 : 1B		DEC	DE
2BD7 : E1		POP	HL
2BD8 : E5		PUSH	HL
2BD9 : D5		PUSH	DE
2BDA : 03		INC	BC
2BDB : EDB0		LDIR
2BDD : D1		POP	DE
2BDE : E1		POP	HL
2BDF : C9		RET
2BE0 : 7B		LD	A,E
2BE1 : B2		OR	D
2BE2 : E5		PUSH	HL
2BE3 : CC642A		CALL	Z,2A64
2BE6 : E1		POP	HL
2BE7 : 22CF71		LD	(71CF),HL
2BEA : EB		EX	DE,HL
2BEB : 7E		LD	A,(HL)
2BEC : 23		INC	HL
2BED : CD6C29		CALL	296C
2BF0 : FE1A		CP	1A
2BF2 : 2006		JR	NZ,2BFA
2BF4 : 5E		LD	E,(HL)
2BF5 : 23		INC	HL
2BF6 : 56		LD	D,(HL)
2BF7 : 3E02		LD	A,02
2BF9 : C9		RET
2BFA : FE1B		CP	1B
2BFC : 2004		JR	NZ,2C02
2BFE : 23		INC	HL
2BFF : EB		EX	DE,HL
2C00 : 37		SCF
2C01 : C9		RET
2C02 : F5		PUSH	AF
2C03 : 23		INC	HL
2C04 : 23		INC	HL
2C05 : 7E		LD	A,(HL)
2C06 : 23		INC	HL
2C07 : F5		PUSH	AF
2C08 : 22D171		LD	(71D1),HL
2C0B : 210000		LD	HL,0000
2C0E : 22D371		LD	(71D3),HL
2C11 : E7		RST	20
2C12 : EF		RST	28
2C13 : CD3D2E		CALL	2E3D
2C16 : 4E		LD	C,(HL)
2C17 : 23		INC	HL
2C18 : 46		LD	B,(HL)
2C19 : 23		INC	HL
2C1A : 22D171		LD	(71D1),HL
2C1D : C5		PUSH	BC
2C1E : 03		INC	BC
2C1F : D5		PUSH	DE
2C20 : 2AD371		LD	HL,(71D3)
2C23 : EB		EX	DE,HL
2C24 : CDC131		CALL	31C1
2C27 : EB		EX	DE,HL
2C28 : 7A		LD	A,D
2C29 : B7		OR	A
2C2A : FC7A33		CALL	M,337A
2C2D : D1		POP	DE
2C2E : 19		ADD	HL,DE
2C2F : 22D371		LD	(71D3),HL
2C32 : E1		POP	HL
2C33 : B7		OR	A
2C34 : ED52		SBC	HL,DE
2C36 : 380A		JR	C,2C42
2C38 : F1		POP	AF
2C39 : 3D		DEC	A
2C3A : 2809		JR	Z,2C45
2C3C : F5		PUSH	AF
2C3D : E7		RST	20
2C3E : FEFC		CP	0FC
2C40 : 28D0		JR	Z,2C12
2C42 : CD7A33		CALL	337A
2C45 : E7		RST	20
2C46 : FE8D		CP	8D
2C48 : 20F8		JR	NZ,2C42
2C4A : EF		RST	28
2C4B : 2AD371		LD	HL,(71D3)
2C4E : F1		POP	AF
2C4F : FE9B		CP	9B
2C51 : 280D		JR	Z,2C60
2C53 : 29		ADD	HL,HL
2C54 : EB		EX	DE,HL
2C55 : 2AD171		LD	HL,(71D1)
2C58 : 19		ADD	HL,DE
2C59 : 5E		LD	E,(HL)
2C5A : 23		INC	HL
2C5B : 56		LD	D,(HL)
2C5C : 3E02		LD	A,02
2C5E : B7		OR	A
2C5F : C9		RET
2C60 : 0600		LD	B,00
2C62 : EB		EX	DE,HL
2C63 : 2AD171		LD	HL,(71D1)
2C66 : 7A		LD	A,D
2C67 : B3		OR	E
2C68 : 2807		JR	Z,2C71
2C6A : 4E		LD	C,(HL)
2C6B : 23		INC	HL
2C6C : 23		INC	HL
2C6D : 09		ADD	HL,BC
2C6E : 1B		DEC	DE
2C6F : 18F5		JR	2C66
2C71 : 23		INC	HL
2C72 : EB		EX	DE,HL
2C73 : 37		SCF
2C74 : 3E03		LD	A,03
2C76 : C9		RET
2C77 :			DW	3B1E,3B5B,3B7C,3BA0,2D29,3BD8,3BEF,3BE0
2C87 :			DW	3C6F,3C7E,3C9B,2D29,3CAE,3CBD,3D24,3CD8
2C97 :			DW	3CC6,3CCF,2D29,2D29,2D29,3D4B,2D29,2D29
2CA7 :			DW	3D5C,3CE0,3D62,3D6A,3D70
2CB1 : 5E		LD	E,(HL)
2CB2 : 23		INC	HL
2CB3 : 56		LD	D,(HL)
2CB4 : 23		INC	HL
2CB5 : ED53CD71		LD	(71CD),DE
2CB9 : 7A		LD	A,D
2CBA : B3		OR	E
2CBB : CA1823		JP	Z,2318
2CBE : 23		INC	HL
2CBF : 23		INC	HL
2CC0 : 01F22C		LD	BC,2CF2
2CC3 : C5		PUSH	BC
2CC4 : 22D971		LD	(71D9),HL
2CC7 : ED73DB71		LD	(71DB),SP
2CCB : FD22DD71		LD	(71DD),IY
2CCF : CDA933		CALL	33A9
2CD2 : EF		RST	28
2CD3 : FE2D		CP	2D
2CD5 : CC1F2D		CALL	Z,2D1F
2CD8 : FEA1		CP	0A1
2CDA : DA2C2F		JP	C,2F2C
2CDD : FEF6		CP	0F6
2CDF : D0		RET	NC
2CE0 : D9		EXX
2CE1 : D6A1		SUB	0A1
2CE3 : 5F		LD	E,A
2CE4 : 1600		LD	D,00
2CE6 : 212C2D		LD	HL,2D2C
2CE9 : 19		ADD	HL,DE
2CEA : 19		ADD	HL,DE
2CEB : 5E		LD	E,(HL)
2CEC : 23		INC	HL
2CED : 56		LD	D,(HL)
2CEE : D5		PUSH	DE
2CEF : D9		EXX
2CF0 : EF		RST	28
2CF1 : C9		RET
2CF2 : E7		RST	20
2CF3 : FEFE		CP	0FE
2CF5 : 28C9		JR	Z,2CC0
2CF7 : 30B8		JR	NC,2CB1
2CF9 : D6F8		SUB	0F8
2CFB : 28C3		JR	Z,2CC0
2CFD : 3D		DEC	A
2CFE : 2029		JR	NZ,2D29
2D00 : EF		RST	28
2D01 : FEFF		CP	0FF
2D03 : 28AC		JR	Z,2CB1
2D05 : FEAF		CP	0AF
2D07 : 280E		JR	Z,2D17
2D09 : FEBD		CP	0BD
2D0B : 20F3		JR	NZ,2D00
2D0D : 7E		LD	A,(HL)
2D0E : 23		INC	HL
2D0F : FEFE		CP	0FE
2D11 : 38FA		JR	C,2D0D
2D13 : 28EB		JR	Z,2D00
2D15 : 189A		JR	2CB1
2D17 : 7E		LD	A,(HL)
2D18 : 23		INC	HL
2D19 : FEFF		CP	0FF
2D1B : 20FA		JR	NZ,2D17
2D1D : 1892		JR	2CB1
2D1F : ED5BCF71		LD	DE,(71CF)
2D23 : ED53E171		LD	(71E1),DE
2D27 : EF		RST	28
2D28 : C9		RET
2D29 : CD7333		CALL	3373
2D2C :			DW	2667,3102,3A8F,26A0,2712,2D29,35DB,38AE
2D3C :			DW	38B0,2EFE,3949,38AD,2D29,2D29,2F62,311F
2D4C :			DW	33E4,3463,2D29,2D29,2D29,3072,2F2C,30B3
2D5C :			DW	30A4,30BD,3769,31A3,2F6F,3ABE,39E3,34FC
2D6C :			DW	3641,3D79,2D29,2D29,362F,3A13,3A3B,3DAD
2D7C :			DW	3DBE,35F1,35FB,3610,3114,2D29,2F7A
2D8A : A6		AND	(HL)
2D8B : 3D		DEC	A
2D8C : 2831		JR	Z,2DBF
2D8E : FE2E		CP	2E
2D90 : C8		RET	Z
2D91 : FE2F		CP	2F
2D93 : 201B		JR	NZ,2DB0
2D95 : 42		LD	B,D
2D96 : 4B		LD	C,E
2D97 : 2ABF71		LD	HL,(71BF)
2D9A : CDD821		CALL	21D8
2D9D : DC7933		CALL	C,3379
2DA0 : 2ACF71		LD	HL,(71CF)
2DA3 : 362E		LD	(HL),2E
2DA5 : 23		INC	HL
2DA6 : 73		LD	(HL),E
2DA7 : 23		INC	HL
2DA8 : 72		LD	(HL),D
2DA9 : 3EFF		LD	A,0FF
2DAB : 32D571		LD	(71D5),A
2DAE : AF		XOR	A
2DAF : C9		RET
2DB0 : FE2D		CP	2D
2DB2 : C47333		CALL	NZ,3373
2DB5 : 7A		LD	A,D
2DB6 : B3		OR	E
2DB7 : C0		RET	NZ
2DB8 : AF		XOR	A
2DB9 : CD6E2A		CALL	2A6E
2DBC : 2812		JR	Z,2DD0
2DBE : EB		EX	DE,HL
2DBF : 23		INC	HL
2DC0 : CD6C29		CALL	296C
2DC3 : 5E		LD	E,(HL)
2DC4 : 23		INC	HL
2DC5 : 56		LD	D,(HL)
2DC6 : 2ACF71		LD	HL,(71CF)
2DC9 : 23		INC	HL
2DCA : 73		LD	(HL),E
2DCB : 23		INC	HL
2DCC : 72		LD	(HL),D
2DCD : F6FF		OR	0FF
2DCF : C9		RET
2DD0 : EB		EX	DE,HL
2DD1 : 22C371		LD	(71C3),HL
2DD4 : 2ACF71		LD	HL,(71CF)
2DD7 : E5		PUSH	HL
2DD8 : CDB52A		CALL	2AB5
2DDB : C47933		CALL	NZ,3379
2DDE : E1		POP	HL
2DDF : EF		RST	28
2DE0 : 18D6		JR	2DB8
2DE2 : 21D571		LD	HL,71D5
2DE5 : 7E		LD	A,(HL)
2DE6 : B7		OR	A
2DE7 : 2808		JR	Z,2DF1
2DE9 : 3600		LD	(HL),00
2DEB : 2ABF71		LD	HL,(71BF)
2DEE : 7E		LD	A,(HL)
2DEF : 23		INC	HL
2DF0 : B6		OR	(HL)
2DF1 : CA7D2E		JP	Z,2E7D
2DF4 : 23		INC	HL
2DF5 : 23		INC	HL
2DF6 : 23		INC	HL
2DF7 : CDE32E		CALL	2EE3
2DFA : 3C		INC	A
2DFB : 28F1		JR	Z,2DEE
2DFD : D62F		SUB	2F
2DFF : 280E		JR	Z,2E0F
2E01 : 3C		INC	A
2E02 : 20F3		JR	NZ,2DF7
2E04 : E5		PUSH	HL
2E05 : 2ACF71		LD	HL,(71CF)
2E08 : 23		INC	HL
2E09 : 77		LD	(HL),A
2E0A : 23		INC	HL
2E0B : 77		LD	(HL),A
2E0C : E1		POP	HL
2E0D : 18E8		JR	2DF7
2E0F : 2B		DEC	HL
2E10 : 2B		DEC	HL
2E11 : 2B		DEC	HL
2E12 : 362F		LD	(HL),2F
2E14 : 23		INC	HL
2E15 : 1A		LD	A,(DE)
2E16 : 13		INC	DE
2E17 : 77		LD	(HL),A
2E18 : 23		INC	HL
2E19 : 1A		LD	A,(DE)
2E1A : 77		LD	(HL),A
2E1B : 23		INC	HL
2E1C : 18D9		JR	2DF7
2E1E : E5		PUSH	HL
2E1F : 2AC971		LD	HL,(71C9)
2E22 : 71		LD	(HL),C
2E23 : 23		INC	HL
2E24 : 5D		LD	E,L
2E25 : 54		LD	D,H
2E26 : 0600		LD	B,00
2E28 : 09		ADD	HL,BC
2E29 : DC7F33		CALL	C,337F
2E2C : 22C971		LD	(71C9),HL
2E2F : E1		POP	HL
2E30 : C3372A		JP	2A37
2E33 : EF		RST	28
2E34 : CD7229		CALL	2972
2E37 : 08		EX	AF,AF'
2E38 : DC7E33		CALL	C,337E
2E3B : 08		EX	AF,AF'
2E3C : C9		RET
2E3D : 2AD171		LD	HL,(71D1)
2E40 : E5		PUSH	HL
2E41 : 2AD371		LD	HL,(71D3)
2E44 : E5		PUSH	HL
2E45 : CD7829		CALL	2978
2E48 : CD372E		CALL	2E37
2E4B : 7A		LD	A,D
2E4C : B7		OR	A
2E4D : FC7633		CALL	M,3376
2E50 : E1		POP	HL
2E51 : 22D371		LD	(71D3),HL
2E54 : E1		POP	HL
2E55 : C9		RET
2E56 : EF		RST	28
2E57 : FE8C		CP	8C
2E59 : 2005		JR	NZ,2E60
2E5B : CD332E		CALL	2E33
2E5E : FE8D		CP	8D
2E60 : C47333		CALL	NZ,3373
2E63 : 22CF71		LD	(71CF),HL
2E66 : C9		RET
2E67 : CD562E		CALL	2E56
2E6A : 7A		LD	A,D
2E6B : B7		OR	A
2E6C : C47733		CALL	NZ,3377
2E6F : 7B		LD	A,E
2E70 : C9		RET
2E71 : CDE02B		CALL	2BE0
2E74 : 3001		JR	NC,2E77
2E76 : EB		EX	DE,HL
2E77 : 2B		DEC	HL
2E78 : 3E02		LD	A,02
2E7A : 1F		RRA
2E7B : 07		RLCA
2E7C : C9		RET
2E7D : C1		POP	BC
2E7E : 2ABF71		LD	HL,(71BF)
2E81 : 2B		DEC	HL
2E82 : 22DF71		LD	(71DF),HL
2E85 : 2AC171		LD	HL,(71C1)
2E88 : 22C371		LD	(71C3),HL
2E8B : FD2AC571		LD	IY,(71C5)
2E8F : FD22C771		LD	(71C7),IY
2E93 : FD2B		DEC	IY
2E95 : 21FFFF		LD	HL,0FFFF
2E98 : FD7400		LD	(IY+00),H
2E9B : 22F171		LD	(71F1),HL
2E9E : 22E571		LD	(71E5),HL
2EA1 : 217233		LD	HL,3372
2EA4 : 22E771		LD	(71E7),HL
2EA7 : AF		XOR	A
2EA8 : 32ED71		LD	(71ED),A
2EAB : 32E371		LD	(71E3),A
2EAE : 3AF371		LD	A,(71F3)
2EB1 : E61F		AND	1F
2EB3 : 32F371		LD	(71F3),A
2EB6 : 2ACB71		LD	HL,(71CB)
2EB9 : F9		LD	SP,HL
2EBA : C5		PUSH	BC
2EBB : ED73DB71		LD	(71DB),SP
2EBF : FD22DD71		LD	(71DD),IY
2EC3 : 2ABF71		LD	HL,(71BF)
2EC6 : 7E		LD	A,(HL)
2EC7 : 23		INC	HL
2EC8 : B6		OR	(HL)
2EC9 : C8		RET	Z
2ECA : 23		INC	HL
2ECB : 23		INC	HL
2ECC : 23		INC	HL
2ECD : CDE32E		CALL	2EE3
2ED0 : 3C		INC	A
2ED1 : 28F3		JR	Z,2EC6
2ED3 : FE21		CP	21
2ED5 : 30F6		JR	NC,2ECD
2ED7 : E5		PUSH	HL
2ED8 : 2ACF71		LD	HL,(71CF)
2EDB : 23		INC	HL
2EDC : AF		XOR	A
2EDD : 77		LD	(HL),A
2EDE : 23		INC	HL
2EDF : 77		LD	(HL),A
2EE0 : E1		POP	HL
2EE1 : 18EA		JR	2ECD
2EE3 : EF		RST	28
2EE4 : FEAF		CP	0AF
2EE6 : 280D		JR	Z,2EF5
2EE8 : FEBD		CP	0BD
2EEA : C0		RET	NZ
2EEB : 7E		LD	A,(HL)
2EEC : 23		INC	HL
2EED : FEFE		CP	0FE
2EEF : 38FA		JR	C,2EEB
2EF1 : 3EBD		LD	A,0BD
2EF3 : 2B		DEC	HL
2EF4 : C9		RET
2EF5 : 7E		LD	A,(HL)
2EF6 : 23		INC	HL
2EF7 : 3C		INC	A
2EF8 : 20FB		JR	NZ,2EF5
2EFA : 3EAF		LD	A,0AF
2EFC : 2B		DEC	HL
2EFD : C9		RET
2EFE : 2ACF71		LD	HL,(71CF)
2F01 : 22D371		LD	(71D3),HL
2F04 : 32D571		LD	(71D5),A
2F07 : CDE22D		CALL	2DE2
2F0A : 2AD371		LD	HL,(71D3)
2F0D : EF		RST	28
2F0E : 2ABF71		LD	HL,(71BF)
2F11 : FEF7		CP	0F7
2F13 : 3007		JR	NC,2F1C
2F15 : CD8E2D		CALL	2D8E
2F18 : EB		EX	DE,HL
2F19 : C2C02C		JP	NZ,2CC0
2F1C : C3B12C		JP	2CB1
2F1F : FEFC		CP	0FC
2F21 : 203C		JR	NZ,2F5F
2F23 : EF		RST	28
2F24 : FE1C		CP	1C
2F26 : 3037		JR	NC,2F5F
2F28 : 01412F		LD	BC,2F41
2F2B : C5		PUSH	BC
2F2C : FE1C		CP	1C
2F2E : 302F		JR	NC,2F5F
2F30 : CD712E		CALL	2E71
2F33 : E5		PUSH	HL
2F34 : 9F		SBC	A,A
2F35 : F5		PUSH	AF
2F36 : E7		RST	20
2F37 : FE87		CP	87
2F39 : 20E4		JR	NZ,2F1F
2F3B : EF		RST	28
2F3C : CD7229		CALL	2972
2F3F : 08		EX	AF,AF'
2F40 : 9F		SBC	A,A
2F41 : C1		POP	BC
2F42 : B8		CP	B
2F43 : C47E33		CALL	NZ,337E
2F46 : E1		POP	HL
2F47 : B7		OR	A
2F48 : 2004		JR	NZ,2F4E
2F4A : 73		LD	(HL),E
2F4B : 23		INC	HL
2F4C : 72		LD	(HL),D
2F4D : C9		RET
2F4E : D5		PUSH	DE
2F4F : EB		EX	DE,HL
2F50 : 1A		LD	A,(DE)
2F51 : 13		INC	DE
2F52 : BE		CP	(HL)
2F53 : DC8033		CALL	C,3380
2F56 : 4F		LD	C,A
2F57 : 0600		LD	B,00
2F59 : 03		INC	BC
2F5A : EDB0		LDIR
2F5C : D1		POP	DE
2F5D : 37		SCF
2F5E : C9		RET
2F5F : CD7333		CALL	3373
2F62 : 2ACF71		LD	HL,(71CF)
2F65 : 7E		LD	A,(HL)
2F66 : 23		INC	HL
2F67 : 3C		INC	A
2F68 : 20FB		JR	NZ,2F65
2F6A : 2B		DEC	HL
2F6B : 22CF71		LD	(71CF),HL
2F6E : C9		RET
2F6F : 2ACF71		LD	HL,(71CF)
2F72 : 7E		LD	A,(HL)
2F73 : 23		INC	HL
2F74 : FEFE		CP	0FE
2F76 : 38FA		JR	C,2F72
2F78 : 18F0		JR	2F6A
2F7A : CD4630		CALL	3046
2F7D : E7		RST	20
2F7E : FEFC		CP	0FC
2F80 : 282C		JR	Z,2FAE
2F82 : FEFD		CP	0FD
2F84 : 2837		JR	Z,2FBD
2F86 : FEF7		CP	0F7
2F88 : 303E		JR	NC,2FC8
2F8A : FE7E		CP	7E
2F8C : 2842		JR	Z,2FD0
2F8E : FE7F		CP	7F
2F90 : 2851		JR	Z,2FE3
2F92 : CD7229		CALL	2972
2F95 : 08		EX	AF,AF'
2F96 : F5		PUSH	AF
2F97 : D41230		CALL	NC,3012
2F9A : 1A		LD	A,(DE)
2F9B : 13		INC	DE
2F9C : B7		OR	A
2F9D : 2809		JR	Z,2FA8
2F9F : F5		PUSH	AF
2FA0 : 1A		LD	A,(DE)
2FA1 : CD0B20		CALL	200B
2FA4 : F1		POP	AF
2FA5 : 3D		DEC	A
2FA6 : 18F3		JR	2F9B
2FA8 : F1		POP	AF
2FA9 : D40930		CALL	NC,3009
2FAC : 18CF		JR	2F7D
2FAE : CDB733		CALL	33B7
2FB1 : 2F		CPL
2FB2 : E607		AND	07
2FB4 : 3C		INC	A
2FB5 : F5		PUSH	AF
2FB6 : CD0930		CALL	3009
2FB9 : F1		POP	AF
2FBA : 3D		DEC	A
2FBB : 20F8		JR	NZ,2FB5
2FBD : EF		RST	28
2FBE : FEF9		CP	0F9
2FC0 : 2809		JR	Z,2FCB
2FC2 : FEFE		CP	0FE
2FC4 : 38B7		JR	C,2F7D
2FC6 : 1803		JR	2FCB
2FC8 : CD0D30		CALL	300D
2FCB : AF		XOR	A
2FCC : 32EB71		LD	(71EB),A
2FCF : C9		RET
2FD0 : CD672E		CALL	2E67
2FD3 : F5		PUSH	AF
2FD4 : CDB733		CALL	33B7
2FD7 : 47		LD	B,A
2FD8 : F1		POP	AF
2FD9 : 90		SUB	B
2FDA : 28E1		JR	Z,2FBD
2FDC : 30D7		JR	NC,2FB5
2FDE : CD0D30		CALL	300D
2FE1 : 18DA		JR	2FBD
2FE3 : 3AEB71		LD	A,(71EB)
2FE6 : B7		OR	A
2FE7 : C47333		CALL	NZ,3373
2FEA : EF		RST	28
2FEB : FE8C		CP	8C
2FED : 200E		JR	NZ,2FFD
2FEF : CD6830		CALL	3068
2FF2 : FEFC		CP	0FC
2FF4 : 2007		JR	NZ,2FFD
2FF6 : 7B		LD	A,E
2FF7 : F5		PUSH	AF
2FF8 : CD6830		CALL	3068
2FFB : FE8D		CP	8D
2FFD : C47333		CALL	NZ,3373
3000 : F1		POP	AF
3001 : 57		LD	D,A
3002 : E5		PUSH	HL
3003 : CDDD13		CALL	13DD
3006 : E1		POP	HL
3007 : 18B4		JR	2FBD
3009 : 3AD871		LD	A,(71D8)
300C : 013E0D		LD	BC,0D3E
300F : C30B20		JP	200B
3012 : E5		PUSH	HL
3013 : 2AC971		LD	HL,(71C9)
3016 : E5		PUSH	HL
3017 : 23		INC	HL
3018 : 3620		LD	(HL),20
301A : 7A		LD	A,D
301B : B7		OR	A
301C : F22C30		JP	P,302C
301F : 362D		LD	(HL),2D
3021 : 2F		CPL
3022 : 57		LD	D,A
3023 : 7B		LD	A,E
3024 : 2F		CPL
3025 : 5F		LD	E,A
3026 : 13		INC	DE
3027 : 7A		LD	A,D
3028 : B7		OR	A
3029 : FA3930		JP	M,3039
302C : 23		INC	HL
302D : 0100FF		LD	BC,0FF00
3030 : CD0722		CALL	2207
3033 : D1		POP	DE
3034 : AF		XOR	A
3035 : 90		SUB	B
3036 : 12		LD	(DE),A
3037 : E1		POP	HL
3038 : C9		RET
3039 : D1		POP	DE
303A : 113F30		LD	DE,303F
303D : E1		POP	HL
303E : C9		RET
303F :			DW	2D06,3233,3637
3045 : 3808		JR	C,304F
3047 : AF		XOR	A
3048 : 32EB71		LD	(71EB),A
304B : 08		EX	AF,AF'
304C : FEFB		CP	0FB
304E : C0		RET	NZ
304F : CD5E30		CALL	305E
3052 : FEFC		CP	0FC
3054 : 2021		JR	NZ,3077
3056 : 7B		LD	A,E
3057 : 32EB71		LD	(71EB),A
305A : 22CF71		LD	(71CF),HL
305D : C9		RET
305E : EF		RST	28
305F : CD342E		CALL	2E34
3062 : 14		INC	D
3063 : 15		DEC	D
3064 : C8		RET	Z
3065 : CD7633		CALL	3376
3068 : EF		RST	28
3069 : CD342E		CALL	2E34
306C : 14		INC	D
306D : C8		RET	Z
306E : 15		DEC	D
306F : C8		RET	Z
3070 : 18F3		JR	3065
3072 : CD342E		CALL	2E34
3075 : FEF8		CP	0F8
3077 : C47333		CALL	NZ,3373
307A : 7A		LD	A,D
307B : B3		OR	E
307C : C0		RET	NZ
307D : 3E01		LD	A,01
307F : F5		PUSH	AF
3080 : CDE32E		CALL	2EE3
3083 : FEF9		CP	0F9
3085 : 280C		JR	Z,3093
3087 : FEFF		CP	0FF
3089 : 2817		JR	Z,30A2
308B : FEB6		CP	0B6
308D : 20F1		JR	NZ,3080
308F : F1		POP	AF
3090 : 3C		INC	A
3091 : 18EC		JR	307F
3093 : F1		POP	AF
3094 : 3D		DEC	A
3095 : 20E8		JR	NZ,307F
3097 : C1		POP	BC
3098 : EF		RST	28
3099 : FEFF		CP	0FF
309B : 281D		JR	Z,30BA
309D : 2ACF71		LD	HL,(71CF)
30A0 : 182C		JR	30CE
30A2 : F1		POP	AF
30A3 : C9		RET
30A4 : 01FBFF		LD	BC,0FFFB
30A7 : FD09		ADD	IY,BC
30A9 : CD4E2A		CALL	2A4E
30AC : FD3600B9		LD	(IY+00),0B9
30B0 : CD1F36		CALL	361F
30B3 : C1		POP	BC
30B4 : CD8E2D		CALL	2D8E
30B7 : EB		EX	DE,HL
30B8 : 2014		JR	NZ,30CE
30BA : C3B12C		JP	2CB1
30BD : FEF7		CP	0F7
30BF : F5		PUSH	AF
30C0 : 3EB9		LD	A,0B9
30C2 : CDD130		CALL	30D1
30C5 : 010500		LD	BC,0005
30C8 : FD09		ADD	IY,BC
30CA : F1		POP	AF
30CB : 38E6		JR	C,30B3
30CD : C1		POP	BC
30CE : C3C02C		JP	2CC0
30D1 : FDBE00		CP	(IY+00)
30D4 : 3008		JR	NC,30DE
30D6 : FEB1		CP	0B1
30D8 : CC7233		CALL	Z,3372
30DB : CD7433		CALL	3374
30DE : 2812		JR	Z,30F2
30E0 : 08		EX	AF,AF'
30E1 : FD7E00		LD	A,(IY+00)
30E4 : 010B00		LD	BC,000B
30E7 : FEB1		CP	0B1
30E9 : 2802		JR	Z,30ED
30EB : 0E05		LD	C,05
30ED : FD09		ADD	IY,BC
30EF : 08		EX	AF,AF'
30F0 : 18DF		JR	30D1
30F2 : FD6E03		LD	L,(IY+03)
30F5 : FD6604		LD	H,(IY+04)
30F8 : 22CD71		LD	(71CD),HL
30FB : FD6E01		LD	L,(IY+01)
30FE : FD6602		LD	H,(IY+02)
3101 : C9		RET
3102 : F3		DI			;TAPE
3103 : 216501		LD	HL,0165		;inicializace systemovych
3106 : 110070		LD	DE,7000		;promennych
3109 : 015D00		LD	BC,005D
310C : EDB0		LDIR
310E : 310073		LD	SP,7300		;nastaveni zasobniku
3111 : C30D01		JP	010D		;a skok do rutiny TAPE
3114 : 1E00		LD	E,00
3116 : FEF7		CP	0F7
3118 : DC5F30		CALL	C,305F
311B : 7B		LD	A,E
311C : C39413		JP	1394
311F : FEF7		CP	0F7
3121 : DC7333		CALL	C,3373
3124 : C1		POP	BC
3125 : C31823		JP	2318
3128 : FEF7		CP	0F7
312A : DC3F31		CALL	C,313F
312D : 2ACF71		LD	HL,(71CF)
3130 : 22D171		LD	(71D1),HL
3133 : CD7D2E		CALL	2E7D
3136 : 2AD171		LD	HL,(71D1)
3139 : 22CF71		LD	(71CF),HL
313C : C3F22C		JP	2CF2
313F : E5		PUSH	HL
3140 : 2ACB71		LD	HL,(71CB)
3143 : ED5BC571		LD	DE,(71C5)
3147 : B7		OR	A
3148 : ED52		SBC	HL,DE
314A : E3		EX	(SP),HL
314B : FEFC		CP	0FC
314D : 2811		JR	Z,3160
314F : D1		POP	DE
3150 : CD342E		CALL	2E34
3153 : 7A		LD	A,D
3154 : B7		OR	A
3155 : FC7633		CALL	M,3376
3158 : 2846		JR	Z,31A0
315A : D5		PUSH	DE
315B : E7		RST	20
315C : FEFC		CP	0FC
315E : 2025		JR	NZ,3185
3160 : CD332E		CALL	2E33
3163 : FEFE		CP	0FE
3165 : 38BA		JR	C,3121
3167 : 2AEF71		LD	HL,(71EF)
316A : ED52		SBC	HL,DE
316C : 3832		JR	C,31A0
316E : 2AC171		LD	HL,(71C1)
3171 : 019001		LD	BC,0190
3174 : 09		ADD	HL,BC
3175 : ED52		SBC	HL,DE
3177 : 3027		JR	NC,31A0
3179 : EB		EX	DE,HL
317A : 22CB71		LD	(71CB),HL
317D : D1		POP	DE
317E : B7		OR	A
317F : ED52		SBC	HL,DE
3181 : 22C571		LD	(71C5),HL
3184 : C9		RET
3185 : FEFE		CP	0FE
3187 : 3898		JR	C,3121
3189 : 2ACB71		LD	HL,(71CB)
318C : D1		POP	DE
318D : ED52		SBC	HL,DE
318F : EB		EX	DE,HL
3190 : 2AC171		LD	HL,(71C1)
3193 : 016400		LD	BC,0064
3196 : 09		ADD	HL,BC
3197 : ED52		SBC	HL,DE
3199 : 3005		JR	NC,31A0
319B : ED53C571		LD	(71C5),DE
319F : C9		RET
31A0 : CD7633		CALL	3376
31A3 : FEF7		CP	0F7
31A5 : 3010		JR	NC,31B7
31A7 : E5		PUSH	HL
31A8 : CD8E2D		CALL	2D8E
31AB : E1		POP	HL
31AC : 22CF71		LD	(71CF),HL
31AF : 2001		JR	NZ,31B2
31B1 : 1B		DEC	DE
31B2 : ED53DF71		LD	(71DF),DE
31B6 : C9		RET
31B7 : ED5BBF71		LD	DE,(71BF)
31BB : 18F4		JR	31B1
31BD : CD5032		CALL	3250
31C0 : C1		POP	BC
31C1 : 210000		LD	HL,0000
31C4 : CB18		RR	B
31C6 : CB19		RR	C
31C8 : D9		EXX
31C9 : 060F		LD	B,0F
31CB : D9		EXX
31CC : 7C		LD	A,H
31CD : 3C		INC	A
31CE : 3D		DEC	A
31CF : 3002		JR	NC,31D3
31D1 : AA		XOR	D
31D2 : 19		ADD	HL,DE
31D3 : F2D731		JP	P,31D7
31D6 : 3F		CCF
31D7 : CB1C		RR	H
31D9 : CB1D		RR	L
31DB : CB18		RR	B
31DD : CB19		RR	C
31DF : D9		EXX
31E0 : 10E9		DJNZ	31CB
31E2 : D9		EXX
31E3 : CD602B		CALL	2B60
31E6 : 7C		LD	A,H
31E7 : 3C		INC	A
31E8 : 3D		DEC	A
31E9 : 3002		JR	NC,31ED
31EB : AA		XOR	D
31EC : 19		ADD	HL,DE
31ED : F2F131		JP	P,31F1
31F0 : 3F		CCF
31F1 : CB1C		RR	H
31F3 : CB1D		RR	L
31F5 : CB18		RR	B
31F7 : CB19		RR	C
31F9 : 7C		LD	A,H
31FA : B5		OR	L
31FB : 2806		JR	Z,3203
31FD : 7C		LD	A,H
31FE : A5		AND	L
31FF : 3C		INC	A
3200 : C47733		CALL	NZ,3377
3203 : 50		LD	D,B
3204 : 59		LD	E,C
3205 : C9		RET
3206 : CD5032		CALL	3250
3209 : C1		POP	BC
320A : E1		POP	HL
320B : C5		PUSH	BC
320C : E5		PUSH	HL
320D : 7C		LD	A,H
320E : AA		XOR	D
320F : 08		EX	AF,AF'
3210 : CB7C		BIT	7,H
3212 : C43E3C		CALL	NZ,3C3E
3215 : CB7A		BIT	7,D
3217 : C4602B		CALL	NZ,2B60
321A : CD2732		CALL	3227
321D : 08		EX	AF,AF'
321E : FC602B		CALL	M,2B60
3221 : F1		POP	AF
3222 : B7		OR	A
3223 : FC3E3C		CALL	M,3C3E
3226 : C9		RET
3227 : 7A		LD	A,D
3228 : B3		OR	E
3229 : CC7C33		CALL	Z,337C
322C : AF		XOR	A
322D : 4F		LD	C,A
322E : 0610		LD	B,10
3230 : 29		ADD	HL,HL
3231 : CB11		RL	C
3233 : 17		RLA
3234 : E5		PUSH	HL
3235 : 67		LD	H,A
3236 : 69		LD	L,C
3237 : B7		OR	A
3238 : ED52		SBC	HL,DE
323A : 3F		CCF
323B : 3002		JR	NC,323F
323D : 7C		LD	A,H
323E : 4D		LD	C,L
323F : E1		POP	HL
3240 : ED6A		ADC	HL,HL
3242 : 10ED		DJNZ	3231
3244 : EB		EX	DE,HL
3245 : 67		LD	H,A
3246 : 69		LD	L,C
3247 : C9		RET
3248 : 78		LD	A,B
3249 : 2F		CPL
324A : 47		LD	B,A
324B : 79		LD	A,C
324C : 2F		CPL
324D : 4F		LD	C,A
324E : 03		INC	BC
324F : C9		RET
3250 : 08		EX	AF,AF'
3251 : D0		RET	NC
3252 : CD7E33		CALL	337E
3255 : CD0632		CALL	3206
3258 : C9		RET
3259 : CD0632		CALL	3206
325C : EB		EX	DE,HL
325D : C9		RET
325E : CD5032		CALL	3250
3261 : C1		POP	BC
3262 : 7A		LD	A,D
3263 : B7		OR	A
3264 : FC7D32		CALL	M,327D
3267 : B3		OR	E
3268 : 13		INC	DE
3269 : C8		RET	Z
326A : 1B		DEC	DE
326B : 62		LD	H,D
326C : 6B		LD	L,E
326D : 110100		LD	DE,0001
3270 : C5		PUSH	BC
3271 : E5		PUSH	HL
3272 : CDC131		CALL	31C1
3275 : E1		POP	HL
3276 : C1		POP	BC
3277 : 2B		DEC	HL
3278 : 7C		LD	A,H
3279 : B5		OR	L
327A : 20F4		JR	NZ,3270
327C : C9		RET
327D : 03		INC	BC
327E : 79		LD	A,C
327F : B0		OR	B
3280 : 0B		DEC	BC
3281 : 2804		JR	Z,3287
3283 : 0B		DEC	BC
3284 : 79		LD	A,C
3285 : B0		OR	B
3286 : 03		INC	BC
3287 : CA602B		JP	Z,2B60
328A : 110000		LD	DE,0000
328D : C1		POP	BC
328E : C9		RET
328F : CD5032		CALL	3250
3292 : E1		POP	HL
3293 : AF		XOR	A
3294 : ED5A		ADC	HL,DE
3296 : EB		EX	DE,HL
3297 : B7		OR	A
3298 : C9		RET
3299 : CD5032		CALL	3250
329C : E1		POP	HL
329D : AF		XOR	A
329E : ED52		SBC	HL,DE
32A0 : 18F4		JR	3296
32A2 : CD5032		CALL	3250
32A5 : C1		POP	BC
32A6 : E1		POP	HL
32A7 : C5		PUSH	BC
32A8 : 7C		LD	A,H
32A9 : AA		XOR	D
32AA : F2AE32		JP	P,32AE
32AD : EB		EX	DE,HL
32AE : 7C		LD	A,H
32AF : BA		CP	D
32B0 : 2002		JR	NZ,32B4
32B2 : 7D		LD	A,L
32B3 : BB		CP	E
32B4 : 110000		LD	DE,0000
32B7 : C9		RET
32B8 : CDA232		CALL	32A2
32BB : 1803		JR	32C0
32BD : CD4F33		CALL	334F
32C0 : 3F		CCF
32C1 : D0		RET	NC
32C2 : 180C		JR	32D0
32C4 : CDA232		CALL	32A2
32C7 : 1803		JR	32CC
32C9 : CD4F33		CALL	334F
32CC : 3F		CCF
32CD : D0		RET	NC
32CE : 3F		CCF
32CF : C8		RET	Z
32D0 : 1B		DEC	DE
32D1 : B7		OR	A
32D2 : C9		RET
32D3 : CDA232		CALL	32A2
32D6 : 18F7		JR	32CF
32D8 : CD4F33		CALL	334F
32DB : 18F2		JR	32CF
32DD : CDA232		CALL	32A2
32E0 : 1803		JR	32E5
32E2 : CD4F33		CALL	334F
32E5 : 1B		DEC	DE
32E6 : 3F		CCF
32E7 : D0		RET	NC
32E8 : 3F		CCF
32E9 : 1809		JR	32F4
32EB : CDA232		CALL	32A2
32EE : 1803		JR	32F3
32F0 : CD4F33		CALL	334F
32F3 : 1B		DEC	DE
32F4 : C8		RET	Z
32F5 : 13		INC	DE
32F6 : B7		OR	A
32F7 : C9		RET
32F8 : CDA232		CALL	32A2
32FB : 1803		JR	3300
32FD : CD4F33		CALL	334F
3300 : D0		RET	NC
3301 : 18CD		JR	32D0
3303 : CD5032		CALL	3250
3306 : E1		POP	HL
3307 : 7C		LD	A,H
3308 : A2		AND	D
3309 : 57		LD	D,A
330A : 7D		LD	A,L
330B : A3		AND	E
330C : 5F		LD	E,A
330D : C9		RET
330E : CD5032		CALL	3250
3311 : E1		POP	HL
3312 : 7C		LD	A,H
3313 : B2		OR	D
3314 : 57		LD	D,A
3315 : 7D		LD	A,L
3316 : B3		OR	E
3317 : 5F		LD	E,A
3318 : C9		RET
3319 : CD5032		CALL	3250
331C : E1		POP	HL
331D : 7C		LD	A,H
331E : AA		XOR	D
331F : 57		LD	D,A
3320 : 7D		LD	A,L
3321 : AB		XOR	E
3322 : 5F		LD	E,A
3323 : C9		RET
3324 : 08		EX	AF,AF'
3325 : D47E33		CALL	NC,337E
3328 : E1		POP	HL
3329 : 1A		LD	A,(DE)
332A : 86		ADD	A,(HL)
332B : DC8033		CALL	C,3380
332E : 4F		LD	C,A
332F : D5		PUSH	DE
3330 : E5		PUSH	HL
3331 : CD1E2E		CALL	2E1E
3334 : D5		PUSH	DE
3335 : D9		EXX
3336 : D1		POP	DE
3337 : E1		POP	HL
3338 : 4E		LD	C,(HL)
3339 : 23		INC	HL
333A : CD4733		CALL	3347
333D : E1		POP	HL
333E : 4E		LD	C,(HL)
333F : 23		INC	HL
3340 : CD4733		CALL	3347
3343 : D9		EXX
3344 : 1B		DEC	DE
3345 : 37		SCF
3346 : C9		RET
3347 : 79		LD	A,C
3348 : B7		OR	A
3349 : C8		RET	Z
334A : 0600		LD	B,00
334C : EDB0		LDIR
334E : C9		RET
334F : 08		EX	AF,AF'
3350 : D47E33		CALL	NC,337E
3353 : C1		POP	BC
3354 : E1		POP	HL
3355 : C5		PUSH	BC
3356 : EB		EX	DE,HL
3357 : 1A		LD	A,(DE)
3358 : BE		CP	(HL)
3359 : F5		PUSH	AF
335A : 08		EX	AF,AF'
335B : F1		POP	AF
335C : 3801		JR	C,335F
335E : 7E		LD	A,(HL)
335F : 47		LD	B,A
3360 : B7		OR	A
3361 : 280A		JR	Z,336D
3363 : 23		INC	HL
3364 : 13		INC	DE
3365 : 1A		LD	A,(DE)
3366 : BE		CP	(HL)
3367 : 2005		JR	NZ,336E
3369 : 23		INC	HL
336A : 13		INC	DE
336B : 10F8		DJNZ	3365
336D : 08		EX	AF,AF'
336E : 110000		LD	DE,0000
3371 : C9		RET
3372 : 00		NOP			;Err 1
3373 : 00		NOP			;Err 2
3374 : 00		NOP			;Err 3
3375 : 00		NOP			;Err 4
3376 : 00		NOP			;Err 5
3377 : 00		NOP			;Err 6
3378 : 00		NOP			;Err 7
3379 : 00		NOP			;Err 8
337A : 00		NOP			;Err 9
337B : 00		NOP			;Err 10
337C : 00		NOP			;Err 11
337D : 00		NOP			;Err 12
337E : 00		NOP			;Err 13
337F : 00		NOP			;Err 14
3380 : 00		NOP			;Err 15
3381 : 00		NOP			;Err 16
3382 : 00		NOP			;Err 17
3383 : 00		NOP			;Err 18
3384 : E1		POP	HL
3385 : 2B		DEC	HL
3386 : 2B		DEC	HL
3387 : 7E		LD	A,(HL)
3388 : D671		SUB	71
338A : 5F		LD	E,A
338B : 32E371		LD	(71E3),A
338E : 2ACD71		LD	HL,(71CD)
3391 : 22E571		LD	(71E5),HL
3394 : 2AE171		LD	HL,(71E1)
3397 : 22E771		LD	(71E7),HL
339A : AF		XOR	A
339B : 32EB71		LD	(71EB),A
339E : ED7BDB71		LD	SP,(71DB)
33A2 : FD2ADD71		LD	IY,(71DD)
33A6 : C1		POP	BC
33A7 : 181A		JR	33C3
33A9 : 3AF371		LD	A,(71F3)
33AC : 87		ADD	A,A
33AD : D0		RET	NC
33AE : 0F		RRCA
33AF : CBEF		SET	5,A
33B1 : 32F371		LD	(71F3),A
33B4 : C3EE39		JP	39EE
33B7 : 3AEB71		LD	A,(71EB)
33BA : B7		OR	A
33BB : 3AA770		LD	A,(70A7)
33BE : C8		RET	Z
33BF : 3A5C70		LD	A,(705C)
33C2 : C9		RET
33C3 : 21DA33		LD	HL,33DA
33C6 : CD5C10		CALL	105C
33C9 : 010104		LD	BC,0401
33CC : 1600		LD	D,00
33CE : 216273		LD	HL,7362
33D1 : CD0722		CALL	2207
33D4 : 21DF33		LD	HL,33DF
33D7 : C3F839		JP	39F8
33DA :			DB	'Err ',00,' in ',00
33E4 : FE1A		CP	1A
33E6 : C47E33		CALL	NZ,337E
33E9 : CD712E		CALL	2E71
33EC : E5		PUSH	HL
33ED : E5		PUSH	HL
33EE : E7		RST	20
33EF : FE87		CP	87
33F1 : 200B		JR	NZ,33FE
33F3 : CD332E		CALL	2E33
33F6 : E3		EX	(SP),HL
33F7 : 73		LD	(HL),E
33F8 : 23		INC	HL
33F9 : 72		LD	(HL),D
33FA : 2B		DEC	HL
33FB : E3		EX	(SP),HL
33FC : FEFA		CP	0FA
33FE : C47333		CALL	NZ,3373
3401 : CD332E		CALL	2E33
3404 : C1		POP	BC
3405 : D5		PUSH	DE
3406 : C5		PUSH	BC
3407 : 110100		LD	DE,0001
340A : FEF6		CP	0F6
340C : CC332E		CALL	Z,2E33
340F : C1		POP	BC
3410 : D5		PUSH	DE
3411 : C5		PUSH	BC
3412 : FDE5		PUSH	IY
3414 : E1		POP	HL
3415 : 7E		LD	A,(HL)
3416 : FEB1		CP	0B1
3418 : 2013		JR	NZ,342D
341A : 010900		LD	BC,0009
341D : 09		ADD	HL,BC
341E : 5E		LD	E,(HL)
341F : 23		INC	HL
3420 : 56		LD	D,(HL)
3421 : 23		INC	HL
3422 : E3		EX	(SP),HL
3423 : E5		PUSH	HL
3424 : B7		OR	A
3425 : ED52		SBC	HL,DE
3427 : E1		POP	HL
3428 : E3		EX	(SP),HL
3429 : 281F		JR	Z,344A
342B : 18E8		JR	3415
342D : 11F5FF		LD	DE,0FFF5
3430 : FD19		ADD	IY,DE
3432 : C1		POP	BC
3433 : 2ACD71		LD	HL,(71CD)
3436 : E5		PUSH	HL
3437 : 2ACF71		LD	HL,(71CF)
343A : E5		PUSH	HL
343B : FDE5		PUSH	IY
343D : E1		POP	HL
343E : 0605		LD	B,05
3440 : 36B1		LD	(HL),0B1
3442 : D1		POP	DE
3443 : 23		INC	HL
3444 : 73		LD	(HL),E
3445 : 23		INC	HL
3446 : 72		LD	(HL),D
3447 : 10F9		DJNZ	3442
3449 : C9		RET
344A : E5		PUSH	HL
344B : 11F5FF		LD	DE,0FFF5
344E : 19		ADD	HL,DE
344F : 54		LD	D,H
3450 : 5D		LD	E,L
3451 : FDE5		PUSH	IY
3453 : C1		POP	BC
3454 : B7		OR	A
3455 : ED42		SBC	HL,BC
3457 : 44		LD	B,H
3458 : 4D		LD	C,L
3459 : E1		POP	HL
345A : 2B		DEC	HL
345B : 1B		DEC	DE
345C : EB		EX	DE,HL
345D : 28D3		JR	Z,3432
345F : EDB8		LDDR
3461 : 18CF		JR	3432
3463 : FE1A		CP	1A
3465 : 200C		JR	NZ,3473
3467 : CD712E		CALL	2E71
346A : E5		PUSH	HL
346B : E7		RST	20
346C : FEF7		CP	0F7
346E : 300E		JR	NC,347E
3470 : CD7333		CALL	3373
3473 : FEF7		CP	0F7
3475 : 38F9		JR	C,3470
3477 : FD6E09		LD	L,(IY+09)
347A : FD660A		LD	H,(IY+0A)
347D : E5		PUSH	HL
347E : FDE5		PUSH	IY
3480 : E1		POP	HL
3481 : 7E		LD	A,(HL)
3482 : FEB1		CP	0B1
3484 : C47233		CALL	NZ,3372
3487 : 010900		LD	BC,0009
348A : 09		ADD	HL,BC
348B : 5E		LD	E,(HL)
348C : 23		INC	HL
348D : 56		LD	D,(HL)
348E : 23		INC	HL
348F : E3		EX	(SP),HL
3490 : 44		LD	B,H
3491 : 4D		LD	C,L
3492 : B7		OR	A
3493 : ED52		SBC	HL,DE
3495 : 2805		JR	Z,349C
3497 : 60		LD	H,B
3498 : 69		LD	L,C
3499 : E3		EX	(SP),HL
349A : 18E5		JR	3481
349C : E1		POP	HL
349D : 2B		DEC	HL
349E : 2B		DEC	HL
349F : 2B		DEC	HL
34A0 : 56		LD	D,(HL)
34A1 : 2B		DEC	HL
34A2 : 5E		LD	E,(HL)
34A3 : D5		PUSH	DE
34A4 : 2B		DEC	HL
34A5 : 56		LD	D,(HL)
34A6 : 2B		DEC	HL
34A7 : 5E		LD	E,(HL)
34A8 : E3		EX	(SP),HL
34A9 : E5		PUSH	HL
34AA : 0A		LD	A,(BC)
34AB : 6F		LD	L,A
34AC : 03		INC	BC
34AD : 0A		LD	A,(BC)
34AE : 67		LD	H,A
34AF : 0B		DEC	BC
34B0 : B7		OR	A
34B1 : ED5A		ADC	HL,DE
34B3 : EB		EX	DE,HL
34B4 : 7B		LD	A,E
34B5 : 02		LD	(BC),A
34B6 : 03		INC	BC
34B7 : 7A		LD	A,D
34B8 : 02		LD	(BC),A
34B9 : 44		LD	B,H
34BA : E1		POP	HL
34BB : EAEE34		JP	PE,34EE
34BE : B7		OR	A
34BF : ED52		SBC	HL,DE
34C1 : EAE934		JP	PE,34E9
34C4 : 2805		JR	Z,34CB
34C6 : 78		LD	A,B
34C7 : AC		XOR	H
34C8 : FAEE34		JP	M,34EE
34CB : E1		POP	HL
34CC : 2B		DEC	HL
34CD : 56		LD	D,(HL)
34CE : 2B		DEC	HL
34CF : 5E		LD	E,(HL)
34D0 : ED53CD71		LD	(71CD),DE
34D4 : 2B		DEC	HL
34D5 : 56		LD	D,(HL)
34D6 : 2B		DEC	HL
34D7 : 5E		LD	E,(HL)
34D8 : ED53CF71		LD	(71CF),DE
34DC : 2B		DEC	HL
34DD : E5		PUSH	HL
34DE : FDE1		POP	IY
34E0 : C9		RET
34E1 : EF		RST	28
34E2 : FE1A		CP	1A
34E4 : 2023		JR	NZ,3509
34E6 : C36334		JP	3463
34E9 : 78		LD	A,B
34EA : AC		XOR	H
34EB : FACB34		JP	M,34CB
34EE : 110600		LD	DE,0006
34F1 : E1		POP	HL
34F2 : 19		ADD	HL,DE
34F3 : E5		PUSH	HL
34F4 : FDE1		POP	IY
34F6 : E7		RST	20
34F7 : FEFC		CP	0FC
34F9 : 28E6		JR	Z,34E1
34FB : C9		RET
34FC : 2ACF71		LD	HL,(71CF)
34FF : FD75FF		LD	(IY-01),L
3502 : FD74FE		LD	(IY-02),H
3505 : EF		RST	28
3506 : EF		RST	28
3507 : FE8C		CP	8C
3509 : C47333		CALL	NZ,3373
350C : FD36FD00		LD	(IY-03),00
3510 : CD332E		CALL	2E33
3513 : 08		EX	AF,AF'
3514 : 7A		LD	A,D
3515 : B7		OR	A
3516 : FC7A33		CALL	M,337A
3519 : B3		OR	E
351A : CC7A33		CALL	Z,337A
351D : D5		PUSH	DE
351E : CB02		RLC	D
3520 : DC7A33		CALL	C,337A
3523 : 08		EX	AF,AF'
3524 : FD34FD		INC	(IY-03)
3527 : FEFC		CP	0FC
3529 : 28E5		JR	Z,3510
352B : FE8D		CP	8D
352D : 20DA		JR	NZ,3509
352F : 22CF71		LD	(71CF),HL
3532 : FD6EFF		LD	L,(IY-01)
3535 : FD66FE		LD	H,(IY-02)
3538 : 7E		LD	A,(HL)
3539 : 23		INC	HL
353A : 23		INC	HL
353B : 23		INC	HL
353C : F680		OR	80
353E : CDF42A		CALL	2AF4
3541 : EB		EX	DE,HL
3542 : 2AC371		LD	HL,(71C3)
3545 : B7		OR	A
3546 : ED52		SBC	HL,DE
3548 : C47B33		CALL	NZ,337B
354B : EB		EX	DE,HL
354C : 23		INC	HL
354D : CD6C29		CALL	296C
3550 : 23		INC	HL
3551 : 23		INC	HL
3552 : 22D371		LD	(71D3),HL
3555 : FD4EFD		LD	C,(IY-03)
3558 : 71		LD	(HL),C
3559 : 0600		LD	B,00
355B : 09		ADD	HL,BC
355C : 09		ADD	HL,BC
355D : D1		POP	DE
355E : 72		LD	(HL),D
355F : 2B		DEC	HL
3560 : 73		LD	(HL),E
3561 : 2B		DEC	HL
3562 : FD35FD		DEC	(IY-03)
3565 : 20F6		JR	NZ,355D
3567 : CD7035		CALL	3570
356A : E7		RST	20
356B : FEFC		CP	0FC
356D : 2890		JR	Z,34FF
356F : C9		RET
3570 : 2AD371		LD	HL,(71D3)
3573 : 7E		LD	A,(HL)
3574 : 23		INC	HL
3575 : 4E		LD	C,(HL)
3576 : 23		INC	HL
3577 : 46		LD	B,(HL)
3578 : 23		INC	HL
3579 : 03		INC	BC
357A : 3D		DEC	A
357B : 2813		JR	Z,3590
357D : 5E		LD	E,(HL)
357E : 23		INC	HL
357F : 56		LD	D,(HL)
3580 : 23		INC	HL
3581 : E5		PUSH	HL
3582 : F5		PUSH	AF
3583 : 13		INC	DE
3584 : CDC131		CALL	31C1
3587 : 7D		LD	A,L
3588 : A8		XOR	B
3589 : FC7A33		CALL	M,337A
358C : F1		POP	AF
358D : E1		POP	HL
358E : 18EA		JR	357A
3590 : E5		PUSH	HL
3591 : 2AC371		LD	HL,(71C3)
3594 : 7E		LD	A,(HL)
3595 : FE9A		CP	9A
3597 : 2029		JR	NZ,35C2
3599 : 60		LD	H,B
359A : 69		LD	L,C
359B : 29		ADD	HL,HL
359C : DC7833		CALL	C,3378
359F : 44		LD	B,H
35A0 : 4D		LD	C,L
35A1 : E1		POP	HL
35A2 : 54		LD	D,H
35A3 : 5D		LD	E,L
35A4 : 3600		LD	(HL),00
35A6 : 13		INC	DE
35A7 : E5		PUSH	HL
35A8 : 09		ADD	HL,BC
35A9 : DC7833		CALL	C,3378
35AC : CD492A		CALL	2A49
35AF : E1		POP	HL
35B0 : EDB0		LDIR
35B2 : 22C371		LD	(71C3),HL
35B5 : ED5BD371		LD	DE,(71D3)
35B9 : B7		OR	A
35BA : ED52		SBC	HL,DE
35BC : EB		EX	DE,HL
35BD : 2B		DEC	HL
35BE : 72		LD	(HL),D
35BF : 2B		DEC	HL
35C0 : 73		LD	(HL),E
35C1 : C9		RET
35C2 : E1		POP	HL
35C3 : 3AD771		LD	A,(71D7)
35C6 : 5F		LD	E,A
35C7 : 1600		LD	D,00
35C9 : 73		LD	(HL),E
35CA : 23		INC	HL
35CB : 72		LD	(HL),D
35CC : 23		INC	HL
35CD : 19		ADD	HL,DE
35CE : DC7833		CALL	C,3378
35D1 : CD492A		CALL	2A49
35D4 : 0B		DEC	BC
35D5 : 78		LD	A,B
35D6 : B1		OR	C
35D7 : 20F0		JR	NZ,35C9
35D9 : 18D7		JR	35B2
35DB : CDE135		CALL	35E1
35DE : C31823		JP	2318
35E1 : FEF7		CP	0F7
35E3 : 2ABF71		LD	HL,(71BF)
35E6 : AF		XOR	A
35E7 : 77		LD	(HL),A
35E8 : 23		INC	HL
35E9 : 77		LD	(HL),A
35EA : 23		INC	HL
35EB : 22C171		LD	(71C1),HL
35EE : C37D2E		JP	2E7D
35F1 : CD0736		CALL	3607
35F4 : D5		PUSH	DE
35F5 : CD5E30		CALL	305E
35F8 : E1		POP	HL
35F9 : 73		LD	(HL),E
35FA : C9		RET
35FB : CD0736		CALL	3607
35FE : D5		PUSH	DE
35FF : CD5E30		CALL	305E
3602 : E1		POP	HL
3603 : 7B		LD	A,E
3604 : D7		RST	10
3605 : C9		RET
3606 : EF		RST	28
3607 : CD342E		CALL	2E34
360A : FEFC		CP	0FC
360C : C8		RET	Z
360D : CD7333		CALL	3373
3610 : CD5F30		CALL	305F
3613 : D5		PUSH	DE
3614 : FEFC		CP	0FC
3616 : 20F5		JR	NZ,360D
3618 : CD5E30		CALL	305E
361B : C1		POP	BC
361C : ED59		OUT	(C),E
361E : C9		RET
361F : FD7501		LD	(IY+01),L
3622 : FD7402		LD	(IY+02),H
3625 : 2ACD71		LD	HL,(71CD)
3628 : FD7503		LD	(IY+03),L
362B : FD7404		LD	(IY+04),H
362E : C9		RET
362F : 110104		LD	DE,0401
3632 : FEF7		CP	0F7
3634 : DC342E		CALL	C,2E34
3637 : 7A		LD	A,D
3638 : B7		OR	A
3639 : FC7633		CALL	M,3376
363C : ED53E971		LD	(71E9),DE
3640 : C9		RET
3641 : ED5BCF71		LD	DE,(71CF)
3645 : ED53F571		LD	(71F5),DE
3649 : FE22		CP	22
364B : CC2537		CALL	Z,3725
364E : FEFC		CP	0FC
3650 : 2827		JR	Z,3679
3652 : FEFD		CP	0FD
3654 : 2001		JR	NZ,3657
3656 : EF		RST	28
3657 : FE1A		CP	1A
3659 : 2804		JR	Z,365F
365B : FE1B		CP	1B
365D : 206E		JR	NZ,36CD
365F : 211F37		LD	HL,371F
3662 : CD5C10		CALL	105C
3665 : 06FF		LD	B,0FF
3667 : 21E272		LD	HL,72E2
366A : CDA907		CALL	07A9
366D : 0D		DEC	C
366E : 41		LD	B,C
366F : 2011		JR	NZ,3682
3671 : 211E37		LD	HL,371E
3674 : CD5C10		CALL	105C
3677 : 18EC		JR	3665
3679 : EF		RST	28
367A : D61A		SUB	1A
367C : FE02		CP	02
367E : 38E5		JR	C,3665
3680 : 184B		JR	36CD
3682 : 21E272		LD	HL,72E2
3685 : 22F771		LD	(71F7),HL
3688 : ED43F971		LD	(71F9),BC
368C : E7		RST	20
368D : CD712E		CALL	2E71
3690 : 3853		JR	C,36E5
3692 : E5		PUSH	HL
3693 : 2AF771		LD	HL,(71F7)
3696 : ED4BF971		LD	BC,(71F9)
369A : 110000		LD	DE,0000
369D : CD003C		CALL	3C00
36A0 : 22F771		LD	(71F7),HL
36A3 : ED43F971		LD	(71F9),BC
36A7 : E1		POP	HL
36A8 : 73		LD	(HL),E
36A9 : 23		INC	HL
36AA : 72		LD	(HL),D
36AB : CD5A37		CALL	375A
36AE : 78		LD	A,B
36AF : B7		OR	A
36B0 : 281E		JR	Z,36D0
36B2 : 7E		LD	A,(HL)
36B3 : FE2C		CP	2C
36B5 : 2057		JR	NZ,370E
36B7 : 23		INC	HL
36B8 : 22F771		LD	(71F7),HL
36BB : 05		DEC	B
36BC : 2850		JR	Z,370E
36BE : ED43F971		LD	(71F9),BC
36C2 : E7		RST	20
36C3 : FEFC		CP	0FC
36C5 : C0		RET	NZ
36C6 : EF		RST	28
36C7 : D61A		SUB	1A
36C9 : FE02		CP	02
36CB : 38BF		JR	C,368C
36CD : CD7333		CALL	3373
36D0 : E7		RST	20
36D1 : FEFC		CP	0FC
36D3 : C0		RET	NZ
36D4 : EF		RST	28
36D5 : D61A		SUB	1A
36D7 : 2803		JR	Z,36DC
36D9 : 3D		DEC	A
36DA : 20F1		JR	NZ,36CD
36DC : 211E37		LD	HL,371E
36DF : CD5C10		CALL	105C
36E2 : C36536		JP	3665
36E5 : 3AFA71		LD	A,(71FA)
36E8 : 47		LD	B,A
36E9 : B7		OR	A
36EA : 281D		JR	Z,3709
36EC : 4E		LD	C,(HL)
36ED : C5		PUSH	BC
36EE : E5		PUSH	HL
36EF : 23		INC	HL
36F0 : 23		INC	HL
36F1 : CD2E37		CALL	372E
36F4 : E1		POP	HL
36F5 : 51		LD	D,C
36F6 : C1		POP	BC
36F7 : 7E		LD	A,(HL)
36F8 : 92		SUB	D
36F9 : 47		LD	B,A
36FA : 23		INC	HL
36FB : 70		LD	(HL),B
36FC : 23		INC	HL
36FD : CD4937		CALL	3749
3700 : 2AF771		LD	HL,(71F7)
3703 : ED4BF971		LD	BC,(71F9)
3707 : 18A5		JR	36AE
3709 : 23		INC	HL
370A : AF		XOR	A
370B : 77		LD	(HL),A
370C : 18C2		JR	36D0
370E : 212237		LD	HL,3722
3711 : CD5C10		CALL	105C
3714 : 2AF571		LD	HL,(71F5)
3717 : 22CF71		LD	(71CF),HL
371A : E7		RST	20
371B : C34136		JP	3641
371E : 3F		CCF
371F : 3F		CCF
3720 : 2000		JR	NZ,3722
3722 : 2D		DEC	L
3723 : 3F		CCF
3724 : 00		NOP
3725 : EB		EX	DE,HL
3726 : 23		INC	HL
3727 : 46		LD	B,(HL)
3728 : 23		INC	HL
3729 : CD6310		CALL	1063
372C : EF		RST	28
372D : C9		RET
372E : ED5BF771		LD	DE,(71F7)
3732 : 1A		LD	A,(DE)
3733 : FE2C		CP	2C
3735 : 2809		JR	Z,3740
3737 : 77		LD	(HL),A
3738 : 0D		DEC	C
3739 : FC8033		CALL	M,3380
373C : 13		INC	DE
373D : 23		INC	HL
373E : 10F2		DJNZ	3732
3740 : ED53F771		LD	(71F7),DE
3744 : ED43F971		LD	(71F9),BC
3748 : C9		RET
3749 : E5		PUSH	HL
374A : 48		LD	C,B
374B : 0600		LD	B,00
374D : 09		ADD	HL,BC
374E : 2B		DEC	HL
374F : 41		LD	B,C
3750 : 7E		LD	A,(HL)
3751 : FE20		CP	20
3753 : 2001		JR	NZ,3756
3755 : 2B		DEC	HL
3756 : E1		POP	HL
3757 : 2B		DEC	HL
3758 : 70		LD	(HL),B
3759 : C9		RET
375A : 2AF771		LD	HL,(71F7)
375D : ED4BF971		LD	BC,(71F9)
3761 : 7E		LD	A,(HL)
3762 : FE20		CP	20
3764 : C0		RET	NZ
3765 : 23		INC	HL
3766 : 10F9		DJNZ	3761
3768 : C9		RET
3769 : 2ACF71		LD	HL,(71CF)
376C : E5		PUSH	HL
376D : CD7F38		CALL	387F
3770 : E3		EX	(SP),HL
3771 : EF		RST	28
3772 : FE1C		CP	1C
3774 : D47333		CALL	NC,3373
3777 : CD712E		CALL	2E71
377A : E3		EX	(SP),HL
377B : DAF637		JP	C,37F6
377E : 110000		LD	DE,0000
3781 : 7E		LD	A,(HL)
3782 : FE26		CP	26
3784 : 2857		JR	Z,37DD
3786 : FE20		CP	20
3788 : 2016		JR	NZ,37A0
378A : 23		INC	HL
378B : 18F4		JR	3781
378D : CD9620		CALL	2096
3790 : D8		RET	C
3791 : EB		EX	DE,HL
3792 : 4F		LD	C,A
3793 : 0600		LD	B,00
3795 : CD0A23		CALL	230A
3798 : C47733		CALL	NZ,3377
379B : EB		EX	DE,HL
379C : 23		INC	HL
379D : 7E		LD	A,(HL)
379E : 18ED		JR	378D
37A0 : FE2D		CP	2D
37A2 : 2016		JR	NZ,37BA
37A4 : 23		INC	HL
37A5 : 7E		LD	A,(HL)
37A6 : CD8D37		CALL	378D
37A9 : E5		PUSH	HL
37AA : 210000		LD	HL,0000
37AD : B7		OR	A
37AE : ED52		SBC	HL,DE
37B0 : EB		EX	DE,HL
37B1 : E1		POP	HL
37B2 : FE20		CP	20
37B4 : 2009		JR	NZ,37BF
37B6 : 23		INC	HL
37B7 : 7E		LD	A,(HL)
37B8 : 18F8		JR	37B2
37BA : CD8D37		CALL	378D
37BD : 18F3		JR	37B2
37BF : FE2C		CP	2C
37C1 : 280D		JR	Z,37D0
37C3 : FEFE		CP	0FE
37C5 : 3009		JR	NC,37D0
37C7 : FE20		CP	20
37C9 : C47333		CALL	NZ,3373
37CC : 23		INC	HL
37CD : 7E		LD	A,(HL)
37CE : 18EF		JR	37BF
37D0 : 22DF71		LD	(71DF),HL
37D3 : E1		POP	HL
37D4 : 73		LD	(HL),E
37D5 : 23		INC	HL
37D6 : 72		LD	(HL),D
37D7 : E7		RST	20
37D8 : FEFC		CP	0FC
37DA : C0		RET	NZ
37DB : 188F		JR	376C
37DD : 23		INC	HL
37DE : 7E		LD	A,(HL)
37DF : CDA020		CALL	20A0
37E2 : 38DB		JR	C,37BF
37E4 : F5		PUSH	AF
37E5 : 3EF0		LD	A,0F0
37E7 : A2		AND	D
37E8 : C47733		CALL	NZ,3377
37EB : F1		POP	AF
37EC : EB		EX	DE,HL
37ED : 29		ADD	HL,HL
37EE : 29		ADD	HL,HL
37EF : 29		ADD	HL,HL
37F0 : 29		ADD	HL,HL
37F1 : EB		EX	DE,HL
37F2 : 83		ADD	A,E
37F3 : 5F		LD	E,A
37F4 : 18E7		JR	37DD
37F6 : 7E		LD	A,(HL)
37F7 : FE20		CP	20
37F9 : 2003		JR	NZ,37FE
37FB : 23		INC	HL
37FC : 18F8		JR	37F6
37FE : FE22		CP	22
3800 : 2043		JR	NZ,3845
3802 : 23		INC	HL
3803 : D1		POP	DE
3804 : D5		PUSH	DE
3805 : EB		EX	DE,HL
3806 : 46		LD	B,(HL)
3807 : 23		INC	HL
3808 : 23		INC	HL
3809 : 0E00		LD	C,00
380B : 1A		LD	A,(DE)
380C : FE22		CP	22
380E : 2017		JR	NZ,3827
3810 : 13		INC	DE
3811 : 1A		LD	A,(DE)
3812 : FE22		CP	22
3814 : 2811		JR	Z,3827
3816 : FE2C		CP	2C
3818 : 2822		JR	Z,383C
381A : FEFE		CP	0FE
381C : 301E		JR	NC,383C
381E : FE20		CP	20
3820 : C47333		CALL	NZ,3373
3823 : 13		INC	DE
3824 : 1A		LD	A,(DE)
3825 : 18EF		JR	3816
3827 : 77		LD	(HL),A
3828 : 0C		INC	C
3829 : 13		INC	DE
382A : 23		INC	HL
382B : 10DE		DJNZ	380B
382D : 1A		LD	A,(DE)
382E : FE22		CP	22
3830 : C48033		CALL	NZ,3380
3833 : 13		INC	DE
3834 : 1A		LD	A,(DE)
3835 : FE22		CP	22
3837 : CC8033		CALL	Z,3380
383A : 18DA		JR	3816
383C : E1		POP	HL
383D : 23		INC	HL
383E : 71		LD	(HL),C
383F : ED53DF71		LD	(71DF),DE
3843 : 1892		JR	37D7
3845 : D1		POP	DE
3846 : D5		PUSH	DE
3847 : EB		EX	DE,HL
3848 : 46		LD	B,(HL)
3849 : 23		INC	HL
384A : 23		INC	HL
384B : 0E00		LD	C,00
384D : 1A		LD	A,(DE)
384E : FE2C		CP	2C
3850 : 281B		JR	Z,386D
3852 : FEFE		CP	0FE
3854 : 3017		JR	NC,386D
3856 : 77		LD	(HL),A
3857 : 0C		INC	C
3858 : 23		INC	HL
3859 : 13		INC	DE
385A : 10F1		DJNZ	384D
385C : 1A		LD	A,(DE)
385D : FE2C		CP	2C
385F : 280C		JR	Z,386D
3861 : FEFE		CP	0FE
3863 : 3008		JR	NC,386D
3865 : FE20		CP	20
3867 : C48033		CALL	NZ,3380
386A : 13		INC	DE
386B : 18EF		JR	385C
386D : 2B		DEC	HL
386E : 7E		LD	A,(HL)
386F : FE20		CP	20
3871 : 2003		JR	NZ,3876
3873 : 0D		DEC	C
3874 : 18F7		JR	386D
3876 : E1		POP	HL
3877 : 23		INC	HL
3878 : 71		LD	(HL),C
3879 : ED53DF71		LD	(71DF),DE
387D : 18C4		JR	3843
387F : 2ADF71		LD	HL,(71DF)
3882 : 7E		LD	A,(HL)
3883 : 23		INC	HL
3884 : FE2C		CP	2C
3886 : C8		RET	Z
3887 : 3C		INC	A
3888 : 2010		JR	NZ,389A
388A : 5E		LD	E,(HL)
388B : 23		INC	HL
388C : 56		LD	D,(HL)
388D : ED53F171		LD	(71F1),DE
3891 : 7A		LD	A,D
3892 : B3		OR	E
3893 : CC7533		CALL	Z,3375
3896 : 23		INC	HL
3897 : 23		INC	HL
3898 : 23		INC	HL
3899 : 3E2B		LD	A,2B
389B : EF		RST	28
389C : FEAF		CP	0AF
389E : 2005		JR	NZ,38A5
38A0 : CDF52E		CALL	2EF5
38A3 : 18DD		JR	3882
38A5 : FEBD		CP	0BD
38A7 : C8		RET	Z
38A8 : 3C		INC	A
38A9 : 20F0		JR	NZ,389B
38AB : 18DD		JR	388A
38AD : F6AF		OR	0AF
38AF : 01AF37		LD	BC,37AF
38B2 : F5		PUSH	AF
38B3 : E7		RST	20
38B4 : FEF7		CP	0F7
38B6 : 3017		JR	NC,38CF
38B8 : CDD039		CALL	39D0
38BB : 216273		LD	HL,7362
38BE : 13		INC	DE
38BF : EB		EX	DE,HL
38C0 : 4F		LD	C,A
38C1 : 0600		LD	B,00
38C3 : EDB0		LDIR
38C5 : AF		XOR	A
38C6 : EB		EX	DE,HL
38C7 : 77		LD	(HL),A
38C8 : 3E3F		LD	A,3F
38CA : 326B73		LD	(736B),A
38CD : 1805		JR	38D4
38CF : 3E3F		LD	A,3F
38D1 : 326273		LD	(7362),A
38D4 : 210372		LD	HL,7203
38D7 : 116273		LD	DE,7362
38DA : CD8715		CALL	1587
38DD : 08		EX	AF,AF'
38DE : 7E		LD	A,(HL)
38DF : E6E0		AND	0E0
38E1 : FE20		CP	20
38E3 : 2006		JR	NZ,38EB
38E5 : 2ABF71		LD	HL,(71BF)
38E8 : 220D72		LD	(720D),HL
38EB : 08		EX	AF,AF'
38EC : F5		PUSH	AF
38ED : 210472		LD	HL,7204
38F0 : 0609		LD	B,09
38F2 : CD6310		CALL	1063
38F5 : F1		POP	AF
38F6 : F5		PUSH	AF
38F7 : 3E2A		LD	A,2A
38F9 : D48810		CALL	NC,1088
38FC : CDED10		CALL	10ED
38FF : F1		POP	AF
3900 : 3007		JR	NC,3909
3902 : FE83		CP	83
3904 : C48333		CALL	NZ,3383
3907 : 18CB		JR	38D4
3909 : 211B02		LD	HL,021B
390C : 222570		LD	(7025),HL
390F : F1		POP	AF
3910 : F5		PUSH	AF
3911 : 210372		LD	HL,7203
3914 : CD3B15		CALL	153B
3917 : F3		DI
3918 : 21A63A		LD	HL,3AA6
391B : 222570		LD	(7025),HL
391E : 381E		JR	C,393E
3920 : F1		POP	AF
3921 : 08		EX	AF,AF'
3922 : C2B839		JP	NZ,39B8
3925 : 2A0D72		LD	HL,(720D)
3928 : ED5B0F72		LD	DE,(720F)
392C : 19		ADD	HL,DE
392D : 22C171		LD	(71C1),HL
3930 : CDE22D		CALL	2DE2
3933 : 2ABF71		LD	HL,(71BF)
3936 : 08		EX	AF,AF'
3937 : FB		EI
3938 : DAB12C		JP	C,2CB1
393B : C31823		JP	2318
393E : F1		POP	AF
393F : 2004		JR	NZ,3945
3941 : 08		EX	AF,AF'
3942 : CCE135		CALL	Z,35E1
3945 : FB		EI
3946 : CD8333		CALL	3383
3949 : CDD039		CALL	39D0
394C : 13		INC	DE
394D : 4F		LD	C,A
394E : 0600		LD	B,00
3950 : EB		EX	DE,HL
3951 : 110472		LD	DE,7204
3954 : EDB0		LDIR
3956 : AF		XOR	A
3957 : 12		LD	(DE),A
3958 : E7		RST	20
3959 : FEFC		CP	0FC
395B : 202A		JR	NZ,3987
395D : CD0636		CALL	3606
3960 : ED530D72		LD	(720D),DE
3964 : D5		PUSH	DE
3965 : CD0636		CALL	3606
3968 : E1		POP	HL
3969 : EB		EX	DE,HL
396A : ED52		SBC	HL,DE
396C : 23		INC	HL
396D : 220F72		LD	(720F),HL
3970 : E7		RST	20
3971 : CD5E30		CALL	305E
3974 : FEF7		CP	0F7
3976 : DC7333		CALL	C,3373
3979 : 7B		LD	A,E
397A : FE02		CP	02
397C : D47333		CALL	NC,3373
397F : 87		ADD	A,A
3980 : 87		ADD	A,A
3981 : 87		ADD	A,A
3982 : 320372		LD	(7203),A
3985 : 181B		JR	39A2
3987 : CDE22D		CALL	2DE2
398A : 011823		LD	BC,2318
398D : C5		PUSH	BC
398E : 3E20		LD	A,20
3990 : 320372		LD	(7203),A
3993 : 2ABF71		LD	HL,(71BF)
3996 : 220D72		LD	(720D),HL
3999 : EB		EX	DE,HL
399A : 2AC171		LD	HL,(71C1)
399D : ED52		SBC	HL,DE
399F : 220F72		LD	(720F),HL
39A2 : 210372		LD	HL,7203
39A5 : F3		DI
39A6 : CD311A		CALL	1A31
39A9 : E5		PUSH	HL
39AA : CDC315		CALL	15C3
39AD : E1		POP	HL
39AE : D8		RET	C
39AF : CD5615		CALL	1556
39B2 : CDBA39		CALL	39BA
39B5 : CD7E17		CALL	177E
39B8 : FB		EI
39B9 : C9		RET
39BA : AF		XOR	A
39BB : 04		INC	B
39BC : 05		DEC	B
39BD : 2003		JR	NZ,39C2
39BF : 79		LD	A,C
39C0 : B7		OR	A
39C1 : C8		RET	Z
39C2 : C5		PUSH	BC
39C3 : 47		LD	B,A
39C4 : 0E02		LD	C,02
39C6 : CDEB15		CALL	15EB
39C9 : C1		POP	BC
39CA : D8		RET	C
39CB : 05		DEC	B
39CC : F2BA39		JP	P,39BA
39CF : C9		RET
39D0 : CD4630		CALL	3046
39D3 : CD7229		CALL	2972
39D6 : 08		EX	AF,AF'
39D7 : D47E33		CALL	NC,337E
39DA : 1A		LD	A,(DE)
39DB : 3D		DEC	A
39DC : FE09		CP	09
39DE : D47633		CALL	NC,3376
39E1 : 3C		INC	A
39E2 : C9		RET
39E3 : 3AF371		LD	A,(71F3)
39E6 : CBEF		SET	5,A
39E8 : 32F371		LD	(71F3),A
39EB : 2ACF71		LD	HL,(71CF)
39EE : E5		PUSH	HL
39EF : E5		PUSH	HL
39F0 : ED73DB71		LD	(71DB),SP
39F4 : E1		POP	HL
39F5 : 210A3A		LD	HL,3A0A
39F8 : CD5C10		CALL	105C
39FB : ED5BCD71		LD	DE,(71CD)
39FF : 216273		LD	HL,7362
3A02 : 0E01		LD	C,01
3A04 : CD0722		CALL	2207
3A07 : C31823		JP	2318
3A0A :			DB	'Stop at ',00
3A13 : CD5F30		CALL	305F
3A16 : FEFA		CP	0FA
3A18 : 2026		JR	NZ,3A40
3A1A : 7B		LD	A,E
3A1B : F5		PUSH	AF
3A1C : EF		RST	28
3A1D : CD0736		CALL	3607
3A20 : D5		PUSH	DE
3A21 : CD332E		CALL	2E33
3A24 : 2AA070		LD	HL,(70A0)
3A27 : AF		XOR	A
3A28 : 67		LD	H,A
3A29 : 29		ADD	HL,HL
3A2A : 29		ADD	HL,HL
3A2B : 29		ADD	HL,HL
3A2C : 19		ADD	HL,DE
3A2D : EB		EX	DE,HL
3A2E : 2AA170		LD	HL,(70A1)
3A31 : 67		LD	H,A
3A32 : 29		ADD	HL,HL
3A33 : 29		ADD	HL,HL
3A34 : 29		ADD	HL,HL
3A35 : C1		POP	BC
3A36 : 09		ADD	HL,BC
3A37 : F1		POP	AF
3A38 : C3CE03		JP	03CE
3A3B : CD7229		CALL	2972
3A3E : FEFA		CP	0FA
3A40 : C47333		CALL	NZ,3373
3A43 : 08		EX	AF,AF'
3A44 : D47E33		CALL	NC,337E
3A47 : E5		PUSH	HL
3A48 : EB		EX	DE,HL
3A49 : 7E		LD	A,(HL)
3A4A : B7		OR	A
3A4B : 283F		JR	Z,3A8C
3A4D : 0F		RRCA
3A4E : 0F		RRCA
3A4F : 0F		RRCA
3A50 : 0F		RRCA
3A51 : F5		PUSH	AF
3A52 : FE10		CP	10
3A54 : 3036		JR	NC,3A8C
3A56 : 46		LD	B,(HL)
3A57 : 11E272		LD	DE,72E2
3A5A : 23		INC	HL
3A5B : 7E		LD	A,(HL)
3A5C : CDA020		CALL	20A0
3A5F : 382B		JR	C,3A8C
3A61 : 87		ADD	A,A
3A62 : 87		ADD	A,A
3A63 : 87		ADD	A,A
3A64 : 87		ADD	A,A
3A65 : 4F		LD	C,A
3A66 : 23		INC	HL
3A67 : 7E		LD	A,(HL)
3A68 : CDA020		CALL	20A0
3A6B : 381F		JR	C,3A8C
3A6D : B1		OR	C
3A6E : 12		LD	(DE),A
3A6F : 13		INC	DE
3A70 : 05		DEC	B
3A71 : 10E7		DJNZ	3A5A
3A73 : F1		POP	AF
3A74 : E1		POP	HL
3A75 : F5		PUSH	AF
3A76 : CD5E30		CALL	305E
3A79 : D5		PUSH	DE
3A7A : 1E00		LD	E,00
3A7C : FEFC		CP	0FC
3A7E : CC5E30		CALL	Z,305E
3A81 : C1		POP	BC
3A82 : F1		POP	AF
3A83 : 47		LD	B,A
3A84 : 7B		LD	A,E
3A85 : 21E272		LD	HL,72E2
3A88 : CD590E		CALL	0E59
3A8B : D0		RET	NC
3A8C : CD7633		CALL	3376
3A8F : FEF7		CP	0F7
3A91 : 38AD		JR	C,3A40
3A93 : 3AF371		LD	A,(71F3)
3A96 : CB6F		BIT	5,A
3A98 : CC7D33		CALL	Z,337D
3A9B : CBAF		RES	5,A
3A9D : 32F371		LD	(71F3),A
3AA0 : F1		POP	AF
3AA1 : E1		POP	HL
3AA2 : 22CF71		LD	(71CF),HL
3AA5 : C9		RET
3AA6 : CD7D2E		CALL	2E7D
3AA9 : 32F371		LD	(71F3),A
3AAC : C31823		JP	2318
3AAF : 3AF371		LD	A,(71F3)
3AB2 : F680		OR	80
3AB4 : E6E7		AND	0E7
3AB6 : 32F371		LD	(71F3),A
3AB9 : E1		POP	HL
3ABA : D1		POP	DE
3ABB : C1		POP	BC
3ABC : F1		POP	AF
3ABD : C9		RET
3ABE : CD342E		CALL	2E34
3AC1 : EB		EX	DE,HL
3AC2 : E9		JP	(HL)
3AC3 : CDCF3A		CALL	3ACF
3AC6 : FE8D		CP	8D
3AC8 : C47333		CALL	NZ,3373
3ACB : D5		PUSH	DE
3ACC : EF		RST	28
3ACD : D1		POP	DE
3ACE : C9		RET
3ACF : E7		RST	20
3AD0 : FE8C		CP	8C
3AD2 : 20F4		JR	NZ,3AC8
3AD4 : EF		RST	28
3AD5 : CD7829		CALL	2978
3AD8 : 08		EX	AF,AF'
3AD9 : DC7E33		CALL	C,337E
3ADC : 08		EX	AF,AF'
3ADD : C9		RET
3ADE : CDE33A		CALL	3AE3
3AE1 : 18E3		JR	3AC6
3AE3 : E7		RST	20
3AE4 : FE8C		CP	8C
3AE6 : 20E0		JR	NZ,3AC8
3AE8 : EF		RST	28
3AE9 : CDD53A		CALL	3AD5
3AEC : F5		PUSH	AF
3AED : 7A		LD	A,D
3AEE : B7		OR	A
3AEF : C47633		CALL	NZ,3376
3AF2 : F1		POP	AF
3AF3 : C9		RET
3AF4 : E7		RST	20
3AF5 : FEFC		CP	0FC
3AF7 : 20CF		JR	NZ,3AC8
3AF9 : EF		RST	28
3AFA : CDE93A		CALL	3AE9
3AFD : F5		PUSH	AF
3AFE : 7B		LD	A,E
3AFF : B7		OR	A
3B00 : CC7633		CALL	Z,3376
3B03 : F1		POP	AF
3B04 : C9		RET
3B05 : CDF43A		CALL	3AF4
3B08 : 18BC		JR	3AC6
3B0A : CD0F3B		CALL	3B0F
3B0D : 18B7		JR	3AC6
3B0F : E7		RST	20
3B10 : FE8C		CP	8C
3B12 : 20B4		JR	NZ,3AC8
3B14 : EF		RST	28
3B15 : CD7829		CALL	2978
3B18 : 08		EX	AF,AF'
3B19 : D47E33		CALL	NC,337E
3B1C : 08		EX	AF,AF'
3B1D : C9		RET
3B1E : CD0F3B		CALL	3B0F
3B21 : D5		PUSH	DE
3B22 : CDF43A		CALL	3AF4
3B25 : 08		EX	AF,AF'
3B26 : E1		POP	HL
3B27 : E5		PUSH	HL
3B28 : 7E		LD	A,(HL)
3B29 : D5		PUSH	DE
3B2A : 93		SUB	E
3B2B : 3C		INC	A
3B2C : 5F		LD	E,A
3B2D : 08		EX	AF,AF'
3B2E : FE8D		CP	8D
3B30 : C4F43A		CALL	NZ,3AF4
3B33 : D5		PUSH	DE
3B34 : E7		RST	20
3B35 : CDC63A		CALL	3AC6
3B38 : D1		POP	DE
3B39 : 4B		LD	C,E
3B3A : E1		POP	HL
3B3B : D1		POP	DE
3B3C : 1A		LD	A,(DE)
3B3D : B7		OR	A
3B3E : 2819		JR	Z,3B59
3B40 : 95		SUB	L
3B41 : 3805		JR	C,3B48
3B43 : 3C		INC	A
3B44 : B9		CP	C
3B45 : 3003		JR	NC,3B4A
3B47 : FEAF		CP	0AF
3B49 : 4F		LD	C,A
3B4A : 19		ADD	HL,DE
3B4B : E5		PUSH	HL
3B4C : CD1E2E		CALL	2E1E
3B4F : E1		POP	HL
3B50 : 1B		DEC	DE
3B51 : D5		PUSH	DE
3B52 : 1A		LD	A,(DE)
3B53 : 4F		LD	C,A
3B54 : 13		INC	DE
3B55 : CD4733		CALL	3347
3B58 : D1		POP	DE
3B59 : 37		SCF
3B5A : C9		RET
3B5B : CD0F3B		CALL	3B0F
3B5E : D5		PUSH	DE
3B5F : CD053B		CALL	3B05
3B62 : 4B		LD	C,E
3B63 : D1		POP	DE
3B64 : 1A		LD	A,(DE)
3B65 : B7		OR	A
3B66 : 2812		JR	Z,3B7A
3B68 : B9		CP	C
3B69 : 3001		JR	NC,3B6C
3B6B : 4F		LD	C,A
3B6C : D5		PUSH	DE
3B6D : C5		PUSH	BC
3B6E : CD1E2E		CALL	2E1E
3B71 : C1		POP	BC
3B72 : E1		POP	HL
3B73 : 23		INC	HL
3B74 : D5		PUSH	DE
3B75 : CD4733		CALL	3347
3B78 : D1		POP	DE
3B79 : 1B		DEC	DE
3B7A : 37		SCF
3B7B : C9		RET
3B7C : CD0F3B		CALL	3B0F
3B7F : D5		PUSH	DE
3B80 : CD053B		CALL	3B05
3B83 : 4B		LD	C,E
3B84 : D1		POP	DE
3B85 : 1A		LD	A,(DE)
3B86 : B7		OR	A
3B87 : 28F1		JR	Z,3B7A
3B89 : 91		SUB	C
3B8A : 3003		JR	NC,3B8F
3B8C : 1A		LD	A,(DE)
3B8D : 4F		LD	C,A
3B8E : AF		XOR	A
3B8F : 3C		INC	A
3B90 : C5		PUSH	BC
3B91 : 0600		LD	B,00
3B93 : 4F		LD	C,A
3B94 : EB		EX	DE,HL
3B95 : 09		ADD	HL,BC
3B96 : C1		POP	BC
3B97 : C5		PUSH	BC
3B98 : E5		PUSH	HL
3B99 : CD1E2E		CALL	2E1E
3B9C : E1		POP	HL
3B9D : C1		POP	BC
3B9E : 18D4		JR	3B74
3BA0 : CDE33A		CALL	3AE3
3BA3 : D5		PUSH	DE
3BA4 : FEFC		CP	0FC
3BA6 : C47333		CALL	NZ,3373
3BA9 : EF		RST	28
3BAA : CD153B		CALL	3B15
3BAD : CDC63A		CALL	3AC6
3BB0 : C1		POP	BC
3BB1 : 79		LD	A,C
3BB2 : B7		OR	A
3BB3 : CC7633		CALL	Z,3376
3BB6 : 47		LD	B,A
3BB7 : D5		PUSH	DE
3BB8 : F5		PUSH	AF
3BB9 : 1A		LD	A,(DE)
3BBA : 4F		LD	C,A
3BBB : AF		XOR	A
3BBC : 81		ADD	A,C
3BBD : DC7633		CALL	C,3376
3BC0 : 10FA		DJNZ	3BBC
3BC2 : 4F		LD	C,A
3BC3 : CD1E2E		CALL	2E1E
3BC6 : F1		POP	AF
3BC7 : E1		POP	HL
3BC8 : D5		PUSH	DE
3BC9 : E5		PUSH	HL
3BCA : 4E		LD	C,(HL)
3BCB : 23		INC	HL
3BCC : 0600		LD	B,00
3BCE : EDB0		LDIR
3BD0 : E1		POP	HL
3BD1 : 3D		DEC	A
3BD2 : 20F5		JR	NZ,3BC9
3BD4 : D1		POP	DE
3BD5 : 1B		DEC	DE
3BD6 : 37		SCF
3BD7 : C9		RET
3BD8 : CD0A3B		CALL	3B0A
3BDB : EB		EX	DE,HL
3BDC : 1600		LD	D,00
3BDE : 180C		JR	3BEC
3BE0 : CD0A3B		CALL	3B0A
3BE3 : EB		EX	DE,HL
3BE4 : 7E		LD	A,(HL)
3BE5 : B7		OR	A
3BE6 : 11FFFF		LD	DE,0FFFF
3BE9 : C8		RET	Z
3BEA : 23		INC	HL
3BEB : 13		INC	DE
3BEC : 5E		LD	E,(HL)
3BED : B7		OR	A
3BEE : C9		RET
3BEF : CD0A3B		CALL	3B0A
3BF2 : CDF73B		CALL	3BF7
3BF5 : B7		OR	A
3BF6 : C9		RET
3BF7 : EB		EX	DE,HL
3BF8 : 110000		LD	DE,0000
3BFB : 7E		LD	A,(HL)
3BFC : B7		OR	A
3BFD : C8		RET	Z
3BFE : 47		LD	B,A
3BFF : 23		INC	HL
3C00 : 7E		LD	A,(HL)
3C01 : FE20		CP	20
3C03 : 2004		JR	NZ,3C09
3C05 : 23		INC	HL
3C06 : 10F8		DJNZ	3C00
3C08 : C9		RET
3C09 : FE26		CP	26
3C0B : 2850		JR	Z,3C5D
3C0D : FE2D		CP	2D
3C0F : 280C		JR	Z,3C1D
3C11 : FE2B		CP	2B
3C13 : 2808		JR	Z,3C1D
3C15 : FE30		CP	30
3C17 : D8		RET	C
3C18 : FE3A		CP	3A
3C1A : D0		RET	NC
3C1B : 1805		JR	3C22
3C1D : D62C		SUB	2C
3C1F : 23		INC	HL
3C20 : 05		DEC	B
3C21 : C8		RET	Z
3C22 : F5		PUSH	AF
3C23 : 7E		LD	A,(HL)
3C24 : CD9620		CALL	2096
3C27 : 3810		JR	C,3C39
3C29 : C5		PUSH	BC
3C2A : 4F		LD	C,A
3C2B : 0600		LD	B,00
3C2D : EB		EX	DE,HL
3C2E : CD0A23		CALL	230A
3C31 : EB		EX	DE,HL
3C32 : C47733		CALL	NZ,3377
3C35 : C1		POP	BC
3C36 : 23		INC	HL
3C37 : 10EA		DJNZ	3C23
3C39 : F1		POP	AF
3C3A : D4602B		CALL	NC,2B60
3C3D : C9		RET
3C3E : F5		PUSH	AF
3C3F : 7C		LD	A,H
3C40 : 2F		CPL
3C41 : 67		LD	H,A
3C42 : 7D		LD	A,L
3C43 : 2F		CPL
3C44 : 6F		LD	L,A
3C45 : 23		INC	HL
3C46 : F1		POP	AF
3C47 : C9		RET
3C48 : 23		INC	HL
3C49 : C5		PUSH	BC
3C4A : E5		PUSH	HL
3C4B : 7E		LD	A,(HL)
3C4C : CDA020		CALL	20A0
3C4F : 380F		JR	C,3C60
3C51 : CD633C		CALL	3C63
3C54 : 6F		LD	L,A
3C55 : 2600		LD	H,00
3C57 : 19		ADD	HL,DE
3C58 : 380F		JR	C,3C69
3C5A : EB		EX	DE,HL
3C5B : E1		POP	HL
3C5C : C1		POP	BC
3C5D : 10E9		DJNZ	3C48
3C5F : C9		RET
3C60 : E1		POP	HL
3C61 : C1		POP	BC
3C62 : C9		RET
3C63 : 0604		LD	B,04
3C65 : CB23		SLA	E
3C67 : CB12		RL	D
3C69 : DC7733		CALL	C,3377
3C6C : 10F7		DJNZ	3C65
3C6E : C9		RET
3C6F : CDDE3A		CALL	3ADE
3C72 : 7B		LD	A,E
3C73 : 0E01		LD	C,01
3C75 : F5		PUSH	AF
3C76 : CD1E2E		CALL	2E1E
3C79 : F1		POP	AF
3C7A : 12		LD	(DE),A
3C7B : 1B		DEC	DE
3C7C : 37		SCF
3C7D : C9		RET
3C7E : CDC33A		CALL	3AC3
3C81 : 0E06		LD	C,06
3C83 : D5		PUSH	DE
3C84 : CD1E2E		CALL	2E1E
3C87 : EB		EX	DE,HL
3C88 : D1		POP	DE
3C89 : 010006		LD	BC,0600
3C8C : E5		PUSH	HL
3C8D : CD0722		CALL	2207
3C90 : CB02		RLC	D
3C92 : 3E03		LD	A,03
3C94 : 17		RLA
3C95 : D1		POP	DE
3C96 : 1B		DEC	DE
3C97 : 90		SUB	B
3C98 : 12		LD	(DE),A
3C99 : 37		SCF
3C9A : C9		RET
3C9B : CDC33A		CALL	3AC3
3C9E : D5		PUSH	DE
3C9F : 0E04		LD	C,04
3CA1 : CD1E2E		CALL	2E1E
3CA4 : EB		EX	DE,HL
3CA5 : D1		POP	DE
3CA6 : E5		PUSH	HL
3CA7 : CD5C22		CALL	225C
3CAA : D1		POP	DE
3CAB : 1B		DEC	DE
3CAC : 37		SCF
3CAD : C9		RET
3CAE : CDC33A		CALL	3AC3
3CB1 : 7A		LD	A,D
3CB2 : B3		OR	E
3CB3 : C8		RET	Z
3CB4 : 7A		LD	A,D
3CB5 : B7		OR	A
3CB6 : 110100		LD	DE,0001
3CB9 : F0		RET	P
3CBA : 1B		DEC	DE
3CBB : 1B		DEC	DE
3CBC : C9		RET
3CBD : CDC33A		CALL	3AC3
3CC0 : 7A		LD	A,D
3CC1 : B7		OR	A
3CC2 : FC602B		CALL	M,2B60
3CC5 : C9		RET
3CC6 : CDC33A		CALL	3AC3
3CC9 : 1A		LD	A,(DE)
3CCA : 5F		LD	E,A
3CCB : 1600		LD	D,00
3CCD : B7		OR	A
3CCE : C9		RET
3CCF : CDC33A		CALL	3AC3
3CD2 : EB		EX	DE,HL
3CD3 : CD1800		CALL	0018
3CD6 : 18F2		JR	3CCA
3CD8 : CDDE3A		CALL	3ADE
3CDB : 4B		LD	C,E
3CDC : ED58		IN	E,(C)
3CDE : 18EB		JR	3CCB
3CE0 : CDDE3A		CALL	3ADE
3CE3 : 7B		LD	A,E
3CE4 : B7		OR	A
3CE5 : 282C		JR	Z,3D13
3CE7 : 3D		DEC	A
3CE8 : 2820		JR	Z,3D0A
3CEA : 3D		DEC	A
3CEB : 2818		JR	Z,3D05
3CED : 3D		DEC	A
3CEE : 2806		JR	Z,3CF6
3CF0 : 3D		DEC	A
3CF1 : 282C		JR	Z,3D1F
3CF3 : C47633		CALL	NZ,3376
3CF6 : CD0A3D		CALL	3D0A
3CF9 : EB		EX	DE,HL
3CFA : 39		ADD	HL,SP
3CFB : AF		XOR	A
3CFC : ED5BC971		LD	DE,(71C9)
3D00 : ED52		SBC	HL,DE
3D02 : EB		EX	DE,HL
3D03 : B7		OR	A
3D04 : C9		RET
3D05 : 210000		LD	HL,0000
3D08 : 18F0		JR	3CFA
3D0A : ED5BC371		LD	DE,(71C3)
3D0E : FDE5		PUSH	IY
3D10 : E1		POP	HL
3D11 : 1807		JR	3D1A
3D13 : 2ACB71		LD	HL,(71CB)
3D16 : ED5BC571		LD	DE,(71C5)
3D1A : AF		XOR	A
3D1B : ED52		SBC	HL,DE
3D1D : 18E3		JR	3D02
3D1F : 2ACB71		LD	HL,(71CB)
3D22 : 18DE		JR	3D02
3D24 : CDC33A		CALL	3AC3
3D27 : 7A		LD	A,D
3D28 : B7		OR	A
3D29 : FC7633		CALL	M,3376
3D2C : B3		OR	E
3D2D : CC7633		CALL	Z,3376
3D30 : 2AE971		LD	HL,(71E9)
3D33 : 7D		LD	A,L
3D34 : 84		ADD	A,H
3D35 : 67		LD	H,A
3D36 : 23		INC	HL
3D37 : ED5F		LD	A,R
3D39 : 85		ADD	A,L
3D3A : 6F		LD	L,A
3D3B : 7C		LD	A,H
3D3C : E67F		AND	7F
3D3E : 67		LD	H,A
3D3F : 22E971		LD	(71E9),HL
3D42 : 13		INC	DE
3D43 : 7A		LD	A,D
3D44 : B7		OR	A
3D45 : F42732		CALL	P,3227
3D48 : EB		EX	DE,HL
3D49 : B7		OR	A
3D4A : C9		RET
3D4B : CDAC08		CALL	08AC
3D4E : F5		PUSH	AF
3D4F : 0E01		LD	C,01
3D51 : CD1E2E		CALL	2E1E
3D54 : F1		POP	AF
3D55 : 12		LD	(DE),A
3D56 : 1B		DEC	DE
3D57 : 9F		SBC	A,A
3D58 : 3C		INC	A
3D59 : 12		LD	(DE),A
3D5A : 37		SCF
3D5B : C9		RET
3D5C : 2A4370		LD	HL,(7043)
3D5F : EB		EX	DE,HL
3D60 : B7		OR	A
3D61 : C9		RET
3D62 : 3AE371		LD	A,(71E3)
3D65 : 5F		LD	E,A
3D66 : 1600		LD	D,00
3D68 : B7		OR	A
3D69 : C9		RET
3D6A : ED5BE571		LD	DE,(71E5)
3D6E : B7		OR	A
3D6F : C9		RET
3D70 : 2AE771		LD	HL,(71E7)
3D73 : 23		INC	HL
3D74 : 23		INC	HL
3D75 : 23		INC	HL
3D76 : EB		EX	DE,HL
3D77 : 37		SCF
3D78 : C9		RET
3D79 : FEF7		CP	0F7
3D7B : D25313		JP	NC,1353
3D7E : CD5F30		CALL	305F
3D81 : FEFC		CP	0FC
3D83 : 200E		JR	NZ,3D93
3D85 : D5		PUSH	DE
3D86 : CD5E30		CALL	305E
3D89 : FEFC		CP	0FC
3D8B : 2006		JR	NZ,3D93
3D8D : D5		PUSH	DE
3D8E : CD5E30		CALL	305E
3D91 : FEFC		CP	0FC
3D93 : C47333		CALL	NZ,3373
3D96 : D5		PUSH	DE
3D97 : CD5E30		CALL	305E
3D9A : E1		POP	HL
3D9B : C1		POP	BC
3D9C : 51		LD	D,C
3D9D : C1		POP	BC
3D9E : 61		LD	H,C
3D9F : CD5C13		CALL	135C
3DA2 : DC7633		CALL	C,3376
3DA5 : C9		RET
3DA6 : CD5F30		CALL	305F
3DA9 : 7B		LD	A,E
3DAA : C35C04		JP	045C
3DAD : CD5F30		CALL	305F
3DB0 : D5		PUSH	DE
3DB1 : FEFC		CP	0FC
3DB3 : 200F		JR	NZ,3DC4
3DB5 : CD5E30		CALL	305E
3DB8 : 43		LD	B,E
3DB9 : D1		POP	DE
3DBA : 7B		LD	A,E
3DBB : C34504		JP	0445
3DBE : CD5F30		CALL	305F
3DC1 : D5		PUSH	DE
3DC2 : FEFC		CP	0FC
3DC4 : C47333		CALL	NZ,3373
3DC7 : CD5E30		CALL	305E
3DCA : 4B		LD	C,E
3DCB : D1		POP	DE
3DCC : 7B		LD	A,E
3DCD : C35404		JP	0454
3DD0 :			DB	04,'MID$',41
3DD6 :			DB	05,'LEFT$',42
3DDD :			DB	06,'RIGHT$',43
3DE5 :			DB	04,'RPT$',44
3DEB :			DB	03,'LEN',46
3DF0 :			DB	03,'VAL',47
3DF5 :			DB	05,'ASCII',48
3DFC :			DB	04,'CHR$',49
3E02 :			DB	04,'NUM$',4A
3E08 :			DB	04,'HEX$',4B
3E0E :			DB	03,'SGN',4D
3E13 :			DB	03,'ABS',4E
3E18 :			DB	03,'RND',4F
3E1D :			DB	03,'INP',50
3E22 :			DB	04,'PEEK',51
3E28 :			DB	05,'VPEEK',52
3E2F :			DB	06,'INKEY$',56
3E37 :			DB	04,'TIME',59
3E3D :			DB	03,'FRE',5A
3E42 :			DB	03,'ERR',5B
3E47 :			DB	04,'ERRL',5C
3E4D :			DB	05,'ERRL$',5D
3E54 :			DB	03,'TAB',7E
3E59 :			DB	06,'CURSOR',7F
3E61 :			DB	01,'^',80
3E64 :			DB	01,'*',81
3E67 :			DB	01,'/',82
3E6A :			DB	03,'MOD',83
3E6F :			DB	01,'+',84
3E72 :			DB	01,'-',85
3E75 :			DB	01,'<',86
3E78 :			DB	01,'=',87
3E7B :			DB	01,'>',88
3E7E :			DB	03,'AND',89
3E83 :			DB	03,'XOR',8A
3E88 :			DB	02,'OR',8B
3E8C :			DB	01,'(',8C
3E8F :			DB	01,')',8D
3E92 :			DB	03,'NOT',8E
3E97 :			DB	04,'AUTO',0A1
3E9D :			DB	04,'TAPE',0A2
3EA3 :			DB	04,'CONT',0A3
3EA9 :			DB	03,'DEL',0A4
3EAE :			DB	04,'LIST',0A5
3EB4 :			DB	03,'NEW',0A7
3EB9 :			DB	03,'OLD',0A8
3EBE :			DB	05,'CHAIN',0A9
3EC5 :			DB	03,'RUN',0AA
3ECA :			DB	04,'SAVE',0AB
3ED0 :			DB	06,'VERIFY',0AC
3ED8 :			DB	03,'REM',0AF
3EDD :			DB	03,'END',0B0
3EE2 :			DB	03,'FOR',0B1
3EE7 :			DB	04,'NEXT',0B2
3EED :			DB	02,'IF',0B6
3EF1 :			DB	03,'LET',0B7
3EF6 :			DB	04,'GOTO',0B8
3EFC :			DB	05,'GOSUB',0B9
3F03 :			DB	06,'RETURN',0BA
3F0B :			DB	04,'READ',0BB
3F11 :			DB	07,'RESTORE',0BC
3F1A :			DB	04,'DATA',0BD
3F20 :			DB	04,'CALL',0BE
3F26 :			DB	04,'STOP',0BF
3F2C :			DB	03,'DIM',0C0
3F31 :			DB	05,'INPUT',0C1
3F38 :			DB	04,'VIEW',0C2
3F3E :			DB	09,'RANDOMIZE',0C5
3F49 :			DB	03,'LOC',0C6
3F4E :			DB	05,'STCHR',0C7
3F55 :			DB	04,'SCOL',0C8
3F5B :			DB	04,'SCOD',0C9
3F61 :			DB	04,'POKE',0CA
3F67 :			DB	05,'VPOKE',0CB
3F6E :			DB	03,'OUT',0CC
3F73 :			DB	03,'CLS',0CD
3F78 :			DB	05,'PRINT',0CF
3F7F :			DB	03,'MAG',0D0
3F84 :			DB	05,'CLEAR',0D1
3F8B :			DB	04,'STEP',0F6
3F91 :			DB	04,'THEN',0F8
3F97 :			DB	04,'ELSE',0F9
3F9D :			DB	02,'TO',0FA
3FA1 :			DB	01,'#',0FB
3FA4 :			DB	01,',',0FC
3FA7 :			DB	01,';',0FD
3FAA :			DB	01,':',0FE
3FAD :			DB	00
3FAE :			DW	3E97,3FAD,3EA3,3F1A,3EDD,3EE2,3EF6,3E08
3FBE :			DW	3F31,3FAD,3E2F,3EAE,3FAD,3EE7,3F6E,3F78
3FCE :			DW	3FAD,3EC5,3F8B,3EFC,3E1D,3F38,3F0B,3F20
3FDE :			DW	3F03,3E59
3FE2 :			DB	0CF	;pro kontrolni soucet
3FE3 :			DB	0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF
3FED :			DB	0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF
3FF7 :			DB	0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF,0FF
4000 : End of disassembly