;
		ORG	0EA00
;
;
		JP	LEA4C
		JP	LEA4C
		JP	LEAAE
		JP	LEAB7
		JP	LEAD5
		JP	LF1C8
		JP	LF1E3
		JP	LF1ED
		JP	LF1F5
		JP	LF1FA
		JP	LF2D6
		JP	LF2DB
		JP	LF2E0
		JP	LF2E5
		JP	LF32B
		JP	LF1DD
		JP	LF3C0
LEA33:		DEFB	0F7
LEA34:		DEFB	1
LEA35:		DEFB	5
LEA36:		DEFB	1
LEA37:		DEFB	3,2,3,2
LEA3B:		DEFB	0F4,1
LEA3D:		DEFB	00F
LEA3E:		DEFB	6
LEA3F:		DEFB	010
LEA40:		DEFB	081,0
LEA42:		DEFB	0
LEA43:		DEFB	0A5
LEA44:		DEFB	0C3,3,0EA
		DEFB	0,0,0C3,6
		DEFB	0DC
LEA4C:		LD	SP,0100
		DI
		IN	A,(0E0)
		CALL	LF753
		IN	A,(0E1)
		EI
		XOR	A
		LD	(LFBE7),A
		LD	BC,0D400
		LD	DE,01C02
LEA62:		CALL	LF2E0
		LD	HL,080
		ADD	HL,BC
		LD	(LFBE8),DE
		PUSH	DE
		PUSH	HL
		CALL	LF2E5
		JR	NZ,LEA9D
		POP	BC
		POP	DE
		INC	D
		LD	A,024
		XOR	D
		JR	NZ,LEA62
		LD	D,A
		INC	E
		BIT	2,E
		JR	Z,LEA62
		LD	BC,080
		CALL	LF2E0
		LD	A,(4)
		LD	C,8
		LD	D,B
		LD	E,B
		LD	HL,LEA44
		LDIR
		LD	C,A
		LD	A,(0D400)
		XOR	0C3
		JP	Z,0D403
LEA9D:		LD	DE,LF7C0
		CALL	LF8E5
		CALL	LF9F2
		JR	NC,LEA4C
		XOR	A
		LD	(LFBF4),A
		JR	LEA4C
LEAAE:		LD	HL,(LFBD6)
		LD	A,H
		XOR	L
		RET	Z
		LD	A,0FF
		RET
LEAB7:		EI
LEAB8:		CALL	LEAAE
		JR	NZ,LEAC0
		HALT
		JR	LEAB8
LEAC0:		DI
		IN	A,(0E0)
		LD	HL,LFBD7
		LD	D,0BF
		LD	E,(HL)
		LD	A,(DE)
		INC	(HL)
		LD	B,A
		IN	A,(0E1)
		EI
		LD	A,B
		CP	00D
		RET	NZ
		INC	(HL)
		RET
LEAD5:		LD	(LFC14),SP
		LD	SP,LFC2E
		LD	HL,LFBDA
		SET	0,(HL)
		SET	2,(HL)
		IN	A,(0E0)
		LD	A,C
		LD	HL,(LFBDB)
		JP	(HL)
LEAEA:		LD	HL,(LFBDB)
		LD	(LFBDD),HL
		CALL	LF63B
		LD	HL,LEB1A
		PUSH	HL
		LD	HL,(LFBE1)
		LD	DE,(LFBDF)
		CP	7
		JR	Z,LEB1F
		CP	8
		JR	Z,LEB31
		CP	00A
		JR	Z,LEB4B
		CP	00D
		JR	Z,LEB57
		CP	017
		JR	Z,LEB5F
		CP	01A
		JR	Z,LEB70
		CP	01B
		JR	Z,LEB8B
LEB1A:		LD	A,0FA
		JP	LECF5
LEB1F:		XOR	A
		OUT	(0D4),A
		LD	A,4
		OUT	(0D4),A
		LD	A,1
		OUT	(0D3),A
		RRCA
		CALL	LFAE2
		OUT	(0D3),A
		RET
LEB31:		DEC	HL
		INC	E
		LD	A,050
		CP	E
		JR	NC,LEB43
		LD	BC,LFDD0
		ADD	HL,BC
		LD	E,1
		INC	D
		LD	A,018
		CP	D
		RET	C
LEB43:		LD	(LFBE1),HL
		LD	(LFBDF),DE
		RET
LEB4B:		LD	BC,0280
		ADD	HL,BC
		DEC	D
		JR	NZ,LEB43
		LD	H,018
		JP	LF699
LEB57:		LD	A,D
		CALL	LF745
		LD	E,050
		JR	LEB43
LEB5F:		LD	HL,LEB66
		LD	(LFBDB),HL
		RET
LEB66:		SET	7,C
		LD	A,C
		LD	HL,(LFBDD)
		LD	(LFBDB),HL
		JP	(HL)
LEB70:		XOR	A
		LD	HL,0BC50
LEB74:		DEC	L
		LD	(HL),A
		DEC	L
		LD	(HL),A
		DEC	L
		LD	(HL),A
		DEC	L
		LD	(HL),A
		JP	NZ,LEB74
		DEC	H
		JP	M,LEB74
		LD	HL,08000
		LD	DE,01850
		JR	LEB43
LEB8B:		LD	HL,LEB96
		LD	(LFBDB),HL
		LD	A,0FB
		JP	LECF5
LEB96:		LD	HL,LEBC3
		PUSH	HL
		CP	028
		JR	Z,LEBCC
		CP	029
		JR	Z,LEBD1
		CP	02A
		JR	Z,LEB70
		CP	030
		JR	Z,LEBD6
		CP	031
		JR	Z,LEBDA
		CP	03D
		JR	Z,LEBEE
		LD	HL,(LFBDF)
		CP	045
		JP	Z,LF659
		CP	052
		JP	Z,LF699
		CP	054
		JR	Z,LEC2C
LEBC3:		LD	HL,(LFBDD)
LEBC6:		LD	(LFBDB),HL
		JP	LEB1A
LEBCC:		LD	HL,LEC49
		JR	LEBC6
LEBD1:		LD	HL,LEC74
		JR	LEBC6
LEBD6:		LD	A,02F
		JR	LEBDB
LEBDA:		XOR	A
LEBDB:		LD	B,8
		LD	DE,5
		LD	HL,LECA8
LEBE3:		LD	(HL),A
		ADD	HL,DE
		DJNZ	LEBE3
		LD	(LF72D),A
		LD	(LF738),A
		RET
LEBEE:		LD	HL,LEBF9
		LD	(LFBDB),HL
LEBF4:		LD	A,0FB
		JP	LECF5
LEBF9:		ADD	A,0E0
		LD	(LFBE6),A
		CP	018
		LD	HL,LEC0D
		JR	C,LEC08
		LD	HL,LEBC3
LEC08:		LD	(LFBDB),HL
		JR	LEBF4
LEC0D:		ADD	A,0E0
		CP	050
		JR	NC,LEBC3
		LD	B,0
		LD	E,A
		LD	A,(LFBE6)
		LD	D,A
		CALL	LF748
		LD	C,E
		ADD	HL,BC
		LD	(LFBE1),HL
		LD	HL,01850
		SBC	HL,DE
		LD	(LFBDF),HL
		JR	LEBC3
LEC2C:		LD	B,L
		LD	HL,(LFBE1)
LEC30:		LD	DE,050
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		ADD	HL,DE
		LD	(HL),D
		LD	DE,LFDD1
		ADD	HL,DE
		DJNZ	LEC30
		RET
LEC49:		CP	020
		JP	C,LEAEA
		CP	0C0
		JR	C,LEC66
		LD	DE,LF0C8
		CALL	LF722
		LD	C,A
		LD	HL,LED07-020
		ADD	HL,BC
		LD	L,(HL)
		LD	H,2
		ADD	HL,HL
		ADD	HL,HL
		INC	L
		ADD	HL,HL
		JR	LEC90
LEC66:		LD	B,0
		LD	HL,LED07-020
		ADD	HL,BC
		LD	L,(HL)
		LD	H,2
		ADD	HL,HL
		ADD	HL,HL
		ADD	HL,HL
		JR	LECA0
LEC74:		CP	020
		JP	C,LEAEA
		CP	080
		JR	C,LEC96
		CP	0C0
		JR	C,LEC66
		LD	DE,LF048
		CALL	LF722
		ADD	A,A
		LD	H,B
		LD	L,A
		ADD	HL,HL
		ADD	HL,HL
		LD	BC,LECCA
		ADD	HL,BC
LEC90:		EX	DE,HL
		LD	BC,050
		JR	LECB0
LEC96:		LD	H,0
		LD	L,A
		ADD	HL,HL
		ADD	HL,HL
		ADD	HL,HL
		LD	DE,LECC8
		ADD	HL,DE
LECA0:		EX	DE,HL
		LD	HL,(LFBE1)
		LD	BC,050
		LD	A,(DE)
LECA8:		NOP	
		INC	E
		LD	(HL),A
		ADD	HL,BC
		LD	A,(DE)
		NOP	
		INC	E
		LD	(HL),A
LECB0:		ADD	HL,BC
		LD	A,(DE)
		NOP	
		INC	E
		LD	(HL),A
		ADD	HL,BC
		LD	A,(DE)
		NOP
		INC	E
		LD	(HL),A
		ADD	HL,BC
		LD	A,(DE)
		NOP	
		INC	E
		LD	(HL),A
		ADD	HL,BC
		LD	A,(DE)
		NOP
		INC	E
		LD	(HL),A
		ADD	HL,BC
		LD	A,(DE)
		NOP	
LECC7:		INC	E
LECC8:		LD	(HL),A
		ADD	HL,BC
LECCA:		LD	A,(DE)
		NOP
		LD	(HL),A
		LD	HL,(LFBE1)
		LD	DE,(LFBDF)
		INC	HL
		DEC	E
		JR	NZ,LECEC
		LD	BC,0230
		ADD	HL,BC
		LD	E,050
		DEC	D
		JR	NZ,LECEC
		LD	H,018
		CALL	LF699
		LD	HL,0B980
		LD	DE,0150
LECEC:		LD	(LFBE1),HL
		LD	(LFBDF),DE
		LD	A,0F8
LECF5:		LD	HL,LFBDA
		AND	(HL)
		LD	(HL),A
		IN	A,(0E1)
		XOR	A
		OUT	(0D0),A
		DEC	A
		OUT	(0D0),A
		LD	SP,(LFC14)
		RET
LED07:		DEFB	0,061,062,063
		DEFB	064,065,066,067
		DEFB	068,069,06B,06A
		DEFB	02F
		DEFB	02A,02E,02D,020
		DEFB	021,022,023,024
		DEFB	025,026,027,028
		DEFB	029,04F,02C,051
		DEFB	02B,057,049,055
		DEFB	1,2,3,4
		DEFB	5,6,7,8
		DEFB	9,00A,00B,00C
		DEFB	00D,00E,00F,010
		DEFB	011,012,013,014
		DEFB	015,016,017,018
		DEFB	019
		DEFB	01A,052,059,054
		DEFB	0BE,0BF,0A4,081
		DEFB	082,083,084,085
		DEFB	086,087,088,089
		DEFB	08A,08B,08C,08D
		DEFB	08E,08F,090,091
		DEFB	092,093,094,095
		DEFB	096,097,098,099
		DEFB	09A,0BC,080,040
		DEFB	0A5,0C0,0F0,078
		DEFB	079,0BD,01C,01D
		DEFB	05D,05C,01F,05E
		DEFB	05F,01E,070,071
		DEFB	03C,03D,073,072
		DEFB	032,033,077,076
		DEFB	06D,047,036,037
		DEFB	03E,03F,07A,07B
		DEFB	03A,03B,06C,05B
		DEFB	043,0EF,042,056
		DEFB	04D,04E,0D3,0D2
		DEFB	0D4,0D1,0D6,0D5
		DEFB	0D7,0D8,0D0,0A6
		DEFB	0DC,0E5,041,044
		DEFB	046,053,05A,050
		DEFB	045,058,0E3,01B
		DEFB	060,0DB,020,041
		DEFB	045,043,044,045
		DEFB	052,020,055,049
		DEFB	055,04C,04C,04F
		DEFB	04E,04F,04F,041
		DEFB	052,053,054,055
		DEFB	020,045,041,059
		DEFB	05A,020,020,020
		DEFB	020,020
LEDC7:		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,030,030,030
		DEFB	030,030,0,030
		DEFB	0,06C,06C,06C
		DEFB	0,0,0,0
		DEFB	0,06C,06C,0FE
		DEFB	06C,0FE,06C,06C
		DEFB	0,030,0F8,02C
		DEFB	078,0D0,07C,030
		DEFB	0,0,0C6,066
		DEFB	030,018,0CC,0C6
		DEFB	0,01C,036,036
		DEFB	01C,0D6,066,0DC
		DEFB	0,060,030,018
		DEFB	0,0,0,0
		DEFB	0,060,030,018
		DEFB	018,018,030,060
		DEFB	0,00C,018,030
		DEFB	030,030,018,00C
		DEFB	0,030,0B4,078
		DEFB	0FC,078,0B4,030
		DEFB	0,0,030,030
		DEFB	0FC,030,030,0
		DEFB	0,0,0,0
		DEFB	0,0,030,030
		DEFB	018,0,0,0
		DEFB	0FE,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,038,038
		DEFB	0,0,0C0,060
		DEFB	030,018,00C,6
		DEFB	0,07C,0C6,0E6
		DEFB	0D6,0CE,0C6,07C
		DEFB	0,030,038,03C
		DEFB	030,030,030,0FC
		DEFB	0,07C,0C6,0C0
		DEFB	070,01C,6,0FE
		DEFB	0,07C,0C6,0C0
		DEFB	07C,0C0,0C6,07C
		DEFB	0,060,070,058
		DEFB	06C,0FE,060,060
		DEFB	0,0FE,6,03E
		DEFB	060,0C0,066,03C
		DEFB	0,078,00C,6
		DEFB	07E,0C6,0C6,07C
		DEFB	0,0FE,0C6,060
		DEFB	030,018,018,018
		DEFB	0,07C,0C6,0C6
		DEFB	07C,0C6,0C6,07C
		DEFB	0,07C,0C6,0C6
		DEFB	0FC,0C0,060,03C
		DEFB	0,0,0,030
		DEFB	0,0,030,0
		DEFB	0,0,0,030
		DEFB	0,0,030,030
		DEFB	018,070,018,00C
		DEFB	6,00C,018,070
		DEFB	0,0,0,0FE
		DEFB	0,0FE,0,0
		DEFB	0,00E,018,030
		DEFB	060,030,018,00E
		DEFB	0,07C,0C6,0C0
		DEFB	070,018,0,018
		DEFB	0,078,0CC,0E6
		DEFB	0D6,066,00C,078
		DEFB	0,038,06C,0C6
		DEFB	0FE,0C6,0C6,0C6
		DEFB	0,07E,0CC,0CC
		DEFB	07C,0CC,0CC,07E
		DEFB	0,078,0CC,6
		DEFB	6,6,0CC,078
		DEFB	0,03E,06C,0CC
		DEFB	0CC,0CC,06C,03E
		DEFB	0,0FE,6,6
		DEFB	03E,6,6,0FE
		DEFB	0,0FE,6,6
		DEFB	03E,6,6,6
		DEFB	0,078,0CC,6
		DEFB	0E6,0C6,0CC,078
		DEFB	0,0C6,0C6,0C6
		DEFB	0FE,0C6,0C6,0C6
		DEFB	0,078,030,030
		DEFB	030,030,030,078
		DEFB	0,0F0,060,060
		DEFB	060,060,066,03C
		DEFB	0,0C6,066,036
		DEFB	01E,036,066,0C6
		DEFB	0,6,6,6
		DEFB	6,6,6,0FE
		DEFB	0,0C6,0EE,0FE
		DEFB	0D6,0C6,0C6,0C6
		DEFB	0,0C6,0CE,0DE
		DEFB	0F6,0E6,0C6,0C6
		DEFB	0,038,06C,0C6
		DEFB	0C6,0C6,06C,038
		DEFB	0,07E,0C6,0C6
		DEFB	07E,6,6,6
		DEFB	0,038,06C,0C6
		DEFB	0C6,0B6,06C,0D8
		DEFB	0,07E,0C6,0C6
		DEFB	07E,036,066,0C6
		DEFB	0,07C,0C6,6
		DEFB	07C,0C0,0C6,07C
		DEFB	0,0FC,030,030
		DEFB	030,030,030,030
		DEFB	0,0C6,0C6,0C6
		DEFB	0C6,0C6,0C6,07C
		DEFB	0,0C6,0C6,0C6
		DEFB	06C,06C,038,038
		DEFB	0,0C6,0C6,0C6
		DEFB	0D6,0FE,0EE,0C6
		DEFB	0,0C6,0C6,06C
		DEFB	038,06C,0C6,0C6
		DEFB	0,0CC,0CC,0CC
		DEFB	078,030,030,030
		DEFB	0,0FE,0C0,060
		DEFB	038,00C,6,0FE
		DEFB	0,07C,00C,00C
		DEFB	00C,00C,00C,07C
		DEFB	0,0,6,00C
		DEFB	018,030,060,0C0
		DEFB	0,07C,060,060
		DEFB	060,060,060,07C
		DEFB	0,030,078,0CC
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0FE
		DEFB	0,00C,018,030
		DEFB	0,0,0,0
		DEFB	0,0,0,03C
		DEFB	060,07C,066,0DC
		DEFB	0,6,6,076
		DEFB	0CE,0C6,0CE,076
		DEFB	0,0,0,07C
		DEFB	0C6,6,0C6,07C
		DEFB	0,0C0,0C0,0DC
		DEFB	0E6,0C6,0E6,0DC
		DEFB	0,0,0,07C
		DEFB	0C6,0FE,6,07C
		DEFB	0,070,0D8,018
		DEFB	07E,018,018,018
		DEFB	0,0,0,0DC
		DEFB	0E6,0E6,0DC,0C0
		DEFB	07C,6,6,076
		DEFB	0CE,0C6,0C6,0C6
		DEFB	0,030,0,038
		DEFB	030,030,030,078
		DEFB	0,060,0,070
		DEFB	060,060,060,066
		DEFB	03C,6,6,066
		DEFB	036,01E,03E,066
		DEFB	0,038,030,030
		DEFB	030,030,030,078
		DEFB	0,0,0,06E
		DEFB	0D6,0D6,0D6,0C6
		DEFB	0,0,0,076
		DEFB	0CE,0C6,0C6,0C6
		DEFB	0,0,0,07C
		DEFB	0C6,0C6,0C6,07C
		DEFB	0
LF048:		DEFB	0,0,076
		DEFB	0CE,0CE,076,6
		DEFB	6,0,0,0DC
		DEFB	0E6,0E6,0DC,0C0
		DEFB	0C0,0,0,076
		DEFB	0CE,6,6,6
		DEFB	0,0,0,0FC
		DEFB	6,07C,0C0,07E
		DEFB	0,018,018,07E
		DEFB	018,018,0D8,070
		DEFB	0,0,0,0C6
		DEFB	0C6,0C6,0E6,0DC
		DEFB	0,0,0,0C6
		DEFB	0C6,0C6,06C,038
		DEFB	0,0,0,0C6
		DEFB	0D6,0D6,0FE,06C
		DEFB	0,0,0,0C6
		DEFB	06C,038,06C,0C6
		DEFB	0,0,0,0C6
		DEFB	0C6,0E6,0DC,0C0
		DEFB	07C,0,0,0FE
		DEFB	060,038,00C,0FE
		DEFB	0,030,018,018
		DEFB	00C,018,018,030
		DEFB	0,018,018,018
		DEFB	018,018,018,018
		DEFB	0,018,030,030
		DEFB	060,030,030,018
		DEFB	0,0,0,0
		DEFB	0DC,076,0,0
		DEFB	0,038,038,07C
		DEFB	038,010,0,07C
		DEFB	0
LF0C8:		DEFB	0,0,060
		DEFB	030,066,0,06C
		DEFB	018,0EC,0D8,06C
		DEFB	018,060,030,0
		DEFB	0,066,0,060
		DEFB	030,038,038,0D8
		DEFB	070,0F8,0D0,066
		DEFB	0,06C,018,060
		DEFB	030,07C,0,066
		DEFB	0,06C,018,06C
		DEFB	018,0D8,078,060
		DEFB	030,0,0,060
		DEFB	030,018,030,060
		DEFB	030,06C,018,0
		DEFB	0,06C,018,0
		DEFB	0,07E,060,0
		DEFB	0,060,030,060
		DEFB	07C,066,0FE,06C
		DEFB	07C,06C,07E,06C
		DEFB	0FE,060,07E,0
		DEFB	0,06C,0C6,060
		DEFB	078,038,0BA,066
		DEFB	036,0DE,036,066
		DEFB	07C,06C,0F6,060
		DEFB	07C,07C,038,066
		DEFB	07C,06C,07E,06C
		DEFB	07C,06C,0FC,030
		DEFB	0DE,0,0,060
		DEFB	0FE,00C,07C,060
		DEFB	0FC,06C,0FE,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,020
		DEFB	010,024,0,028
		DEFB	010,068,050,028
		DEFB	010,020,010,0
		DEFB	0,024,0,020
		DEFB	010,018,018,098
		DEFB	050,0B8,050,024
		DEFB	0,028,010,020
		DEFB	010,03C,0,024
		DEFB	0,028,010,028
		DEFB	010,058,028,020
		DEFB	010,0,0,020
		DEFB	010,8,010,020
		DEFB	010,028,010,0
		DEFB	0,028,010,0
		DEFB	0,07E,040,0
		DEFB	0,020,010,020
		DEFB	03C,024,07E,028
		DEFB	03C,028,03E,028
		DEFB	07E,020,03E,0
		DEFB	0,024,042,020
		DEFB	038,018,05A,012
		DEFB	00A,02A,012,024
		DEFB	03C,028,052,020
		DEFB	03C,03C,018,024
		DEFB	03C,028,03E,028
		DEFB	03C,028,07C,010
		DEFB	04A,0,0,020
		DEFB	07E,4,03C,020
		DEFB	054,028,07E,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0
LF1C8:		CALL	LF1DD
		JR	Z,LF1C8
		LD	A,C
		OUT	(0FF),A
		LD	A,080
		OUT	(0FE),A
LF1D4:		IN	A,(0FE)
		RRA
		JR	NC,LF1D4
		XOR	A
		OUT	(0FE),A
		RET
LF1DD:		IN	A,(0FE)
		RRA
		CCF
		SBC	A,A
		RET
LF1E3:		IN	A,(0B1)
		BIT	2,A
		JR	Z,LF1E3
		LD	A,C
		OUT	(0B0),A
		RET
LF1ED:		IN	A,(0B1)
		RRA
		JR	NC,LF1ED
		IN	A,(0B0)
		RET
LF1F5:		XOR	A
		LD	(LFBE8),A
		RET
LF1FA:		LD	A,4
		XOR	C
		JR	Z,LF219
		LD	A,(LEA36)
		CP	1
		ADC	A,0
		CP	C
		JR	C,LF21F
LF209:		LD	A,C
		LD	(LFBE7),A
LF20D:		ADD	A,A
		ADD	A,A
		ADD	A,A
		ADD	A,A
		LD	BC,LF23B
		LD	H,0
		LD	L,A
		ADD	HL,BC
		RET
LF219:		LD	A,(LEA3F)
		AND	A
		JR	NZ,LF209
LF21F:		LD	(LFC14),SP
		LD	SP,LFC2E
		LD	DE,LF7F8
		CALL	LF8E5
		LD	SP,(LFC14)
		JR	Z,LF233
		AND	A
LF233:		SBC	HL,HL
		RET	NC
		LD	A,(LFBE7)
		JR	LF20D
LF23B:		DEFB	0,0,055,0
		DEFB	03A,0,028,8
		DEFB	02E,0FC,08B,0F2
		DEFB	0AE,0FC,02E,0FD
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	02E,0FC,077,0FD
		DEFB	0CE,0FC,05A,0FD
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	02E,0FC,0A9,0F2
		DEFB	0EE,0FC,086,0FD
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	02E,0FC,0CF,0FD
		DEFB	00E,0FD,0B2,0FD
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	02E,0FC,0C7,0F2
		DEFB	02E,0FD,0DE,0FD
LF28B:		DEFB	024,0,4,00F
		DEFB	0,05E,1,07F
		DEFB	0,0C0,0,020
		DEFB	0,4,0,024
		DEFB	0,4,00F,0
		DEFB	05E,1,07F,0
		DEFB	0C0,0,020,0
		DEFB	4,0,024,0
		DEFB	4,00F,0,05E
		DEFB	1,07F,0,0C0
		DEFB	0,020,0,4
		DEFB	0,024,0,4
		DEFB	00F,0,05E,1
		DEFB	07F,0,0C0,0
		DEFB	020,0,4,0
		DEFB	0,1,4,00F
		DEFB	1,07F,0,07F
		DEFB	0,0C0,0,0
		DEFB	0,0,0
;
LF2D6:		LD	A,C
		LD	(LFBE8),A
		RET
LF2DB:		LD	A,C
		LD	(LFBE9),A
		RET
LF2E0:		LD	(LFBEA),BC
		RET
LF2E5:		LD	(LFC14),SP
		LD	SP,LFC2E
		LD	A,(LFBE7)
		XOR	4
		JR	Z,LF31C
		XOR	A
		LD	(LFBF0),A
		LD	A,(LFBE9)
		AND	3
		JR	Z,LF304
		CALL	LF945
		SCF	
		JR	Z,LF30D
LF304:		CALL	LF9F2
		CALL	C,LF95A
		CALL	C,LF9B7
LF30D:		PUSH	AF
		CALL	LF966
		CALL	LFB8C
		POP	AF
LF315:		SBC	A,A
		INC	A
		LD	SP,(LFC14)
		RET	
LF31C:		CALL	LF995
		JR	Z,LF315
LF321:		IN	A,(C)
		LD	(HL),A
		INC	HL
		DEC	D
		JR	NZ,LF321
LF328:		SCF	
		JR	LF315
LF32B:		LD	(LFC14),SP
		LD	SP,LFC2E
		LD	A,(LFBE7)
		XOR	4
		JR	Z,LF3B0
		LD	A,C
		LD	(LEA34),A
		DEC	A
		JR	Z,LF379
		DEC	A
		JR	NZ,LF34A
		LD	A,010
		LD	(LFBF0),A
		JR	LF37D
LF34A:		LD	HL,LFBF2
		LD	A,(HL)
		INC	HL
		LD	B,(HL)
		INC	HL
		LD	C,(HL)
		LD	HL,LFBE7
		XOR	(HL)
		INC	HL
		JR	NZ,LF379
		LD	A,(LF28B)
		INC	C
		XOR	C
		JR	NZ,LF362
		LD	C,A
		INC	B
LF362:		LD	A,B
		XOR	(HL)
		INC	HL
		JR	NZ,LF379
		LD	A,C
		XOR	(HL)
		JR	NZ,LF379
		LD	HL,LFBF0
		XOR	(HL)
		JR	Z,LF379
		DEC	(HL)
		LD	A,2
		LD	(LEA34),A
		JR	LF37D
LF379:		XOR	A
		LD	(LFBF0),A
LF37D:		CALL	LF945
		JR	Z,LF396
		CALL	LF9F2
		JR	NC,LF315
		CALL	LF95A
		LD	A,(LEA34)
		XOR	2
		SCF	
		CALL	NZ,LF9B7
		JP	NC,LF315
LF396:		CALL	NC,LF95A
		LD	HL,LFBF5
		LD	(HL),1
		CALL	LF966
		EX	DE,HL
		CALL	LFB8C
		LD	A,(LEA34)
		DEC	A
		SCF	
		CALL	Z,LF9F2
		JP	LF315
LF3B0:		CALL	LF995
		JP	Z,LF315
LF3B6:		LD	A,(HL)
		INC	HL
		OUT	(C),A
		DEC	D
		JR	NZ,LF3B6
		JP	LF328
LF3C0:		LD	H,B
		LD	L,C
		RET	
		NOP	
		ADD	A,0F3
		LD	(LFBF6),SP
		LD	SP,LFC14
		PUSH	AF
		PUSH	BC
		PUSH	DE
		PUSH	HL
		IN	A,(0E0)
		CALL	LF418
		IN	A,(0E1)
		XOR	A
		LD	HL,LEA33
		CP	(HL)
		JR	Z,LF3E4
		DEC	(HL)
		JR	NZ,LF3E4
		OUT	(0DC),A
LF3E4:		LD	A,0F8
		OUT	(0D0),A
		IN	A,(0D1)
		AND	0C1
		LD	HL,LFBDA
		JR	Z,LF402
		BIT	2,(HL)
		JR	Z,LF3F7
		IN	A,(0E0)
LF3F7:		POP	HL
		POP	DE
		POP	BC
		POP	AF
		LD	SP,(LFBF6)
		EI	
		RETI	
LF402:		LD	SP,0100
		RES	2,(HL)
LF407:		IN	A,(0D1)
		INC	A
		JR	NZ,LF407
		SBC	HL,HL
		PUSH	HL
		LD	HL,LF8E5
		PUSH	HL
		LD	DE,LF7CA
		RETI	
LF418:		LD	A,(LFBDA)
		RRA	
		JR	C,LF427
		RRCA	
		LD	B,A
		IN	A,(0D2)
		RLA	
		XOR	B
		CALL	P,LF641
LF427:		LD	A,080
		OUT	(0D7),A
		LD	C,0D6
		IN	E,(C)
		IN	D,(C)
		LD	HL,(LFBD8)
		AND	A
		SBC	HL,DE
		CALL	NZ,LF827
		CALL	LF4D2
		RET	NC
		BIT	7,E
		JR	Z,LF4A9
		LD	A,D
		CP	08A
		JR	C,LF490
		JR	Z,LF486
		CP	08B
		JR	Z,LF482
		CP	08C
		JR	Z,LF46F
		CP	08D
		JR	Z,LF468
		CP	08E
		JR	Z,LF464
		CP	08F
		RET	NZ
		LD	A,8
		LD	HL,LFBDA
		XOR	(HL)
		LD	(HL),A
		RET	
LF464:		LD	A,4
		JR	LF488
LF468:		LD	A,(LFBD6)
		LD	(LFBD7),A
		RET
LF46F:		LD	A,(LFBD6)
		DEC	A
		CALL	LF4BF
		LD	(LFBD6),A
		DEC	A
		CALL	LF4BF
		INC	A
		LD	(LFBD7),A
		RET	
LF482:		LD	A,2
		JR	LF488
LF486:		LD	A,1
LF488:		LD	HL,LFBD2
		XOR	(HL)
		LD	(HL),A
		JP	LF753
LF490:		ADD	A,A
		ADD	A,D
		ADD	A,A
		ADD	A,A
		ADD	A,080
		LD	L,A
		LD	H,0BE
		LD	B,(HL)
		XOR	A
		XOR	B
		RET	Z
LF49D:		INC	L
		LD	D,(HL)
		PUSH	BC
		PUSH	HL
		CALL	LF4A9
		POP	HL
		POP	BC
		DJNZ	LF49D
		RET	
LF4A9:		LD	HL,LFBD6
		LD	A,(LFBD7)
		DEC	A
		XOR	(HL)
		RET	Z
		LD	A,D
		LD	D,0BF
		LD	E,(HL)
		LD	(DE),A
		INC	(HL)
		CP	00D
		RET	NZ
		LD	D,018
		JR	LF4A9
LF4BF:		LD	B,0
		LD	L,A
		LD	H,0BF
LF4C4:		LD	A,(HL)
		CP	00A
		JR	Z,LF4D0
		CP	00D
		JR	Z,LF4D0
		DEC	L
		DJNZ	LF4C4
LF4D0:		LD	A,L
		RET	
LF4D2:		CALL	LF514
		JR	NC,LF50F
		LD	A,(LFBD3)
		XOR	E
		LD	HL,LFBD5
		JR	NZ,LF4F1
		LD	BC,(LFBD6)
		LD	A,B
		XOR	C
		RET	NZ
		DEC	(HL)
		RET	NZ
		LD	DE,(LFBD3)
		LD	(HL),4
		JR	LF4F7
LF4F1:		LD	(LFBD3),DE
		LD	(HL),014
LF4F7:		LD	HL,(LEA35)
		XOR	A
		CP	L
		JR	Z,LF50D
		OUT	(0D4),A
		LD	A,2
		OUT	(0D4),A
		DEC	A
		OUT	(0D3),A
		LD	A,L
		CALL	LFAE2
		OUT	(0D3),A
LF50D:		SCF	
		RET
LF50F:		XOR	A
		LD	(LFBD3),A
		RET
LF514:		LD	H,0F0
		LD	DE,05000
		LD	C,E
LF51A:		LD	A,H
		OUT	(0D0),A
		IN	A,(0D1)
		LD	L,A
		LD	B,8
LF522:		RL	L
		JR	C,LF53D
		LD	A,D
		CP	00F
		JR	NZ,LF52E
		INC	C
		JR	LF53D
LF52E:		CP	9
		JR	NZ,LF539
		BIT	0,C
		RET	NZ
		SET	1,C
		JR	LF53D
LF539:		XOR	A
		XOR	E
		RET	NZ
		LD	E,D
LF53D:		DEC	D
		DJNZ	LF522
		INC	H
		INC	D
		DEC	D
		JR	NZ,LF51A
		XOR	A
		XOR	E
		RET	Z
		LD	HL,LF59A
		BIT	1,C
		JR	Z,LF552
		LD	HL,LF5EA
LF552:		ADD	HL,DE
		LD	D,(HL)
		LD	A,0F0
		AND	D
		XOR	080
		JR	Z,LF597
		BIT	0,C
		JR	Z,LF570
		LD	A,030
		XOR	D
		LD	A,01F
		JR	Z,LF56F
		LD	A,0DF
		AND	D
		SUB	040
		CP	020
		JR	NC,LF570
LF56F:		LD	D,A
LF570:		LD	HL,LFBD2
		BIT	0,(HL)
		JR	Z,LF586
		LD	A,05F
		AND	D
		CP	041
		JR	C,LF586
		CP	05B
		JR	NC,LF586
		LD	A,020
		XOR	D
		LD	D,A
LF586:		BIT	1,(HL)
		SCF
		RET	Z
		RES	1,(HL)
		LD	A,0A0
		XOR	D
		LD	D,A
		PUSH	DE
		CALL	LF753
		POP	DE
		SCF
		RET
LF597:		SET	7,E
		SCF
LF59A:		RET
		DEFB	0,0,0,084
		DEFB	083,082,081,080
		DEFB	0,0,0,0
		DEFB	0,0,0,01B
		DEFB	02F,03F,013,4
		DEFB	018,5,07F,8
		DEFB	02E,02C,039,030
		DEFB	020,02D,05E,05C
		DEFB	038,037,036,035
		DEFB	034,033,032,031
		DEFB	068,067,066,065
		DEFB	064,063,062,061
		DEFB	070,06F,06E,06D
		DEFB	06C,06B,06A,069
		DEFB	078,077,076,075
		DEFB	074,073,072,071
		DEFB	0,0,0,05D
		DEFB	05B,040,07A,079
		DEFB	00D,03A,03B,9
		DEFB	08A,08F,08B
LF5EA:		DEFB	08C
		DEFB	0,0,0,089
		DEFB	088,087,086,085
		DEFB	0,0,0,0
		DEFB	0,0,0,3
		DEFB	01A,017,1,6
		DEFB	3,012,7,014
		DEFB	03E,03C,029,05F
		DEFB	020,03D,07E,07C
		DEFB	028,027,026,025
		DEFB	024,023,022,021
		DEFB	048,047,046,045
		DEFB	044,043,042,041
		DEFB	050,04F,04E,04D
		DEFB	04C,04B,04A,049
		DEFB	058,057,056,055
		DEFB	054,053,052,051
		DEFB	0,0,0,07D
		DEFB	07B,060,05A,059
		DEFB	00A,02A,02B,9
		DEFB	08A,08E,08B,08D
LF63B:		LD	HL,LFBDA
		BIT	1,(HL)
		RET	Z
LF641:		PUSH	AF
		LD	A,2
		LD	HL,LFBDA
		XOR	(HL)
		LD	(HL),A
		LD	B,8
		LD	DE,050
		LD	HL,(LFBE1)
LF651:		LD	A,(HL)
		CPL
		LD	(HL),A
		ADD	HL,DE
		DJNZ	LF651
		POP	AF
		RET
LF659:		LD	A,H
		CP	018
		JP	Z,LF6D0
		CP	1
		JP	Z,LF6B6
		PUSH	AF
		DEC	A
		CALL	LF748
		RES	7,H
		LD	B,H
		LD	C,L
		LD	DE,0BBFF
		LD	HL,0B97F
LF673:		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD	
		LDD
		LDD	
		LDD
		LDD	
		LDD	
		LDD	
		JP	PE,LF673
		POP	AF
		JR	LF6B6
LF699:		LD	A,H
		CP	018
		JR	Z,LF6CC
		CP	1
		JR	Z,LF6B6
		CALL	LF745
		EX	DE,HL
		LD	HL,0B980
		SBC	HL,DE
		LD	B,H
		LD	C,L
		LD	HL,0280
		ADD	HL,DE
		CALL	LFB8C
		LD	A,1
LF6B6:		CALL	LF745
		LD	C,8
LF6BB:		XOR	A
LF6BC:		LD	B,014
LF6BE:		LD	(HL),A
		INC	L
		LD	(HL),A
		INC	L
		LD	(HL),A
		INC	L
		LD	(HL),A
		INC	HL
		DJNZ	LF6BE
		DEC	C
		JR	NZ,LF6BC
		RET	
LF6CC:		LD	E,0
		JR	LF6D2
LF6D0:		LD	E,0FF
LF6D2:		LD	A,(LFBDA)
		BIT	3,A
		LD	D,1
		JR	NZ,LF6DD
		LD	D,8
LF6DD:		LD	HL,LFBE5
		LD	A,D
		XOR	E
		SUB	E
		ADD	A,(HL)
		CP	0C0
		JR	C,LF6F0
		ADD	A,040
		CP	8
		JR	C,LF6F0
		ADD	A,080
LF6F0:		LD	(HL),A
		EI	
		HALT	
		LD	C,D
		LD	HL,08000
		BIT	7,E
		JR	Z,LF705
		LD	HL,0B980
		BIT	0,D
		JR	Z,LF705
		LD	HL,0BBB0
LF705:		CALL	LF6BB
		LD	HL,(LFBE5)
		LD	H,0
		LD	B,H
		LD	C,L
		ADD	HL,HL
		ADD	HL,HL
		ADD	HL,BC
		LD	BC,01CF
		OUT	(C),L
		INC	B
		OUT	(C),H
		LD	A,(LFBE5)
		AND	7
		JR	NZ,LF6DD
		RET	
LF722:		ADD	A,A
		LD	B,0
		LD	H,B
		LD	L,A
		ADD	HL,DE
		EX	DE,HL
		LD	HL,(LFBE1)
		LD	A,(DE)
LF72D:		NOP	
		INC	E
		LD	(HL),A
		LD	A,050
		ADD	A,L
		LD	L,A
		LD	A,B
		ADC	A,H
		LD	H,A
		LD	A,(DE)
LF738:		NOP
		LD	(HL),A
		EX	DE,HL
		LD	HL,LEDC7-00100
		LD	A,C
		SET	5,C
		ADD	HL,BC
		XOR	C
		OR	(HL)
		RET
LF745:		CPL
		ADD	A,019
LF748:		LD	H,A
		SCF
		RRA
		LD	L,0
		RR	L
		ADD	A,H
		ADD	A,H
		LD	H,A
		RET	
LF753:		LD	HL,0BC50
		LD	(LFBE3),HL
		LD	A,(LFBD2)
		BIT	2,A
		LD	DE,0BEBC
		JR	NZ,LF765
		LD	E,080
LF765:		LD	L,5
LF767:		LD	A,(LFBD2)
		BIT	2,A
		CALL	Z,LF8AF
		LD	A,05E
		CALL	NZ,LF8B1
		LD	A,(DE)
		INC	DE
		LD	B,A
		LD	C,00B
		AND	A
		JR	Z,LF78A
LF77C:		LD	A,(DE)
		INC	DE
		CP	020
		JR	NC,LF784
		LD	A,07F
LF784:		CALL	LF8B1
		DEC	C
		DJNZ	LF77C
LF78A:		INC	C
		DEC	C
		JR	Z,LF795
LF78E:		CALL	LF8AF
		INC	DE
		DEC	C
		JR	NZ,LF78E
LF795:		CALL	LF8A6
		DEC	L
		JR	NZ,LF767
		LD	HL,0BC99
		LD	(LFBE3),HL
		CALL	LF8A6
		CALL	LF8AF
		LD	A,(LFBD2)
		AND	3
		RLA	
		RLA	
		LD	C,A
		LD	HL,LF817
		ADD	HL,BC
		LD	B,4
LF7B5:		LD	A,(HL)
		INC	HL
		CALL	LF8B1
		DJNZ	LF7B5
		CALL	LF8AF
		RET
LF7C0:		DEFM	"Boot erro"
		DEFB	"r"+080
LF7CA:		DEFM	"User brea"
		DEFB	"k"+080
LF7D4:		DEFM	"Read/write error: Retry/Abort/I"
		DEFM	"gnor"
		DEFB	"e"+080
LF7F8:		DEFM	"Disk select error: Abort/Ignor"
		DEFB	"e"+080
LF817:		DEFM	"NORM"
		DEFM	"CAPS"
		DEFM	"GRAP"
		DEFM	"GRAP"
LF827:		EX	DE,HL
		LD	(LFBD8),HL
		LD	HL,0BC91
		LD	(LFBE3),HL
		LD	HL,(LEA40)
		ADD	HL,DE
		LD	(LEA40),HL
		LD	A,(LEA42)
		ADC	A,0
		LD	(LEA42),A
		JR	Z,LF853
		LD	DE,05180
		SBC	HL,DE
		ADD	HL,DE
		JR	C,LF853
		SBC	HL,DE
		LD	(LEA40),HL
		XOR	A
		LD	(LEA42),A
LF853:		RRA	
		LD	B,2
		LD	DE,08CA0
		RR	H
		RR	L
		PUSH	AF
		CALL	LF893
		LD	B,4
		LD	DE,07080
		POP	AF
		ADC	HL,HL
		CALL	LF893
		LD	A,03A
		CALL	LF8A8
		LD	B,3
		LD	DE,0960
		CALL	LF893
		LD	B,4
		LD	DE,01E0
		CALL	LF893
		LD	A,03A
		CALL	LF8A8
		LD	B,3
		LD	DE,028
		CALL	LF893
		LD	A,030
		ADD	A,L
		JR	LF8A8
LF893:		XOR	A
		DEC	A
LF895:		SBC	HL,DE
		JR	NC,LF89A
		ADD	HL,DE
LF89A:		RLA
		SRL	D
		RR	E
		DJNZ	LF895
		CPL
		ADD	A,030
		JR	LF8A8
LF8A6:		LD	A,020
LF8A8:		PUSH	IX
		DEFB	0DD
		LD	H,0
		JR	LF8B6
LF8AF:		LD	A,020
LF8B1:		PUSH	IX
		DEFB	0DD
		LD	H,0FF
LF8B6:		PUSH	BC
		PUSH	DE
		PUSH	HL
		ADD	A,A
		LD	H,0
		LD	L,A
		ADD	HL,HL
		ADD	HL,HL
		LD	BC,LECC8
		ADD	HL,BC
		EX	DE,HL
		LD	BC,050
		LD	HL,(LFBE3)
		INC	HL
		LD	(LFBE3),HL
		DEC	HL
		DEFB	0DD
		LD	L,7
LF8D2:		LD	A,(DE)
		INC	E
		DEFB	0DD
		XOR	H
		LD	(HL),A
		ADD	HL,BC
		DEFB	0DD
		DEC	L
		JR	NZ,LF8D2
		POP	HL
		POP	DE
		POP	BC
		POP	IX
		RET
LF8E2:		LD	DE,LF7D4
LF8E5:		CALL	LFBB0
		LD	B,03D
		LD	HL,0BC50
		LD	(LFBE3),HL
		CALL	LF8AF
LF8F3:		LD	A,(DE)
		CALL	LF8B1
		LD	A,(DE)
		DEC	B
		INC	DE
		RLA
		JR	NC,LF8F3
LF8FD:		CALL	LF8AF
		DJNZ	LF8FD
		CALL	LF8A6
		CALL	LF8A6
		CALL	LF63B
		LD	HL,(LFBE1)
		PUSH	HL
		LD	HL,0BC8F
		LD	(LFBE1),HL
		CALL	LFBC5
		CALL	LEB1F
		CALL	LF468
		CALL	LEAB7
		LD	L,A
		DI	
		IN	A,(0E0)
		LD	A,L
		CALL	LF63B
		POP	HL
		PUSH	AF
		LD	A,0BB
		CP	H
		JR	NC,LF932
		INC	HL
		INC	HL
LF932:		LD	(LFBE1),HL
		CALL	LF753
		CALL	LFBC5
		LD	A,05F
		POP	BC
		AND	B
		CP	041
		RET	Z
		ADD	A,0B7
		RET	
LF945:		LD	DE,LFBE7
		LD	HL,LFBF2
		LD	A,(DE)
		INC	DE
		CPI	
		RET	NZ
		LD	A,(DE)
		INC	DE
		CPI	
		RET	NZ
		LD	A,(DE)
		XOR	(HL)
		AND	0FC
		RET	
LF95A:		LD	BC,3
		LD	DE,LFBF2
		LD	HL,LFBE7
		LDIR
		RET
LF966:		LD	A,(LFBE9)
		LD	BC,080
		AND	3
		RRA
		LD	D,A
		LD	E,B
		RR	E
		LD	HL,LFDFE
		ADD	HL,DE
		LD	DE,(LFBEA)
		RET
LF97C:		CALL	LFBB0
LF97F:		LD	A,(LFBF2)
		LD	HL,LEA37
		ADD	A,L
		LD	L,A
		XOR	A
		BIT	1,(HL)
		RET	Z
		LD	A,(LFBF3)
		RLA
		RLA
		RLA
		AND	8
		SCF
		RET
LF995:		LD	A,(LEA3F)
		AND	A
		RET	Z
		LD	HL,(LFBE8)
		XOR	A
		SRL	L
		RR	H
		RRA
		LD	B,L
		LD	C,0E9
		OUT	(C),B
		LD	C,0EB
		IN	D,(C)
		LD	B,H
		OUT	(C),A
		LD	B,L
		DEC	C
		LD	D,080
		LD	HL,(LFBEA)
		RET	
LF9B7:		CALL	LFA73
		LD	B,5
LF9BC:		PUSH	BC
		CALL	LFAAA
		JR	NC,LF9DF
		CALL	LF97C
		XOR	07D
		OUT	(0D8),A
		CALL	LFB7A
		CALL	LFA3E
		CALL	LFBC5
		JR	NC,LF9DF
		CALL	LFB6E
		IN	A,(0D8)
		CPL	
		AND	0BF
		SCF	
		JR	Z,LF9EB
LF9DF:		CALL	LFAEC
		POP	BC
		DJNZ	LF9BC
		CALL	LF8E2
		JR	NZ,LF9B7
		PUSH	BC
LF9EB:		POP	BC
LF9EC:		LD	HL,LFBF5
		LD	(HL),0
		RET	
LF9F2:		LD	A,(LFBF5)
		AND	A
		SCF	
		RET	Z
		CALL	LFA73
		LD	B,5
LF9FD:		PUSH	BC
		CALL	LFAAA
		JR	NC,LFA31
		CALL	LFB6A
		IN	A,(0D8)
		BIT	6,A
		JR	Z,LFA34
		CALL	LFB87
		CALL	LF97C
		XOR	05D
		OUT	(0D8),A
		CALL	LFB7A
		CALL	LFA5D
		CALL	LFBC5
		LD	A,3
		CALL	LFAE2
		LD	HL,0
		SBC	HL,DE
		JR	NZ,LFA31
		IN	A,(0D8)
		INC	A
		SCF	
		JR	Z,LF9EB
LFA31:		CALL	LFAEC
LFA34:		POP	BC
		DJNZ	LF9FD
		CALL	LF8E2
		JR	NZ,LF9F2
		JR	LF9EC
LFA3E:		LD	BC,2
		LD	D,B
		LD	E,B
		LD	HL,LFDFE
LFA46:		DEC	DE
		LD	A,D
		OR	E
		RET	Z
LFA4A:		IN	A,(0D8)
		AND	2
		JR	NZ,LFA46
		IN	A,(0DB)
		CPL	
		LD	(HL),A
		INC	HL
		DJNZ	LFA4A
		DEC	C
		JP	NZ,LFA4A
		SCF	
		RET	
LFA5D:		LD	C,0DB
		LD	DE,LFDFE
		LD	HL,LFA65
LFA65:		LD	A,(DE)
		INC	DE
		CPL	
		LD	B,A
LFA69:		IN	A,(0D8)
		RRA
		RET	C
		RRA
		JR	C,LFA69
		OUT	(C),B
		JP	(HL)
LFA73:		LD	BC,LFBF1
		LD	A,(BC)
		LD	DE,LFBEC
		LD	H,0
		LD	L,A
		ADD	HL,DE
		IN	A,(0D9)
		LD	(HL),A
		INC	BC
		LD	A,(BC)
		DEC	BC
		LD	(BC),A
		LD	H,0
		LD	L,A
		ADD	HL,DE
		LD	A,(HL)
		OUT	(0D9),A
		LD	A,(BC)
LFA8D:		OR	084
		CALL	LFBB0
		OUT	(0DC),A
		LD	HL,LEA33
		LD	A,(HL)
		LD	(HL),0FA
		CALL	LFBC5
		AND	A
		RET	NZ
		LD	HL,(LEA3B)
LFAA2:		DJNZ	LFAA2
		DEC	HL
		LD	A,H
		OR	L
		JR	NZ,LFAA2
		RET	
LFAAA:		LD	A,(LFBF4)
		SRL	A
		SRL	A
		INC	A
		CPL	
		OUT	(0DA),A
		CALL	LF97F
		LD	A,(LFBF3)
		JR	C,LFABE
		ADD	A,A
LFABE:		OUT	(0DD),A
		SRL	A
		LD	H,A
		IN	A,(0D9)
		CPL	
		SUB	H
		CCF	
		RET	Z
		LD	L,A
		JR	NC,LFAD4
LFACC:		CALL	LFB60
		DEC	L
		JR	NZ,LFACC
		JR	LFADA
LFAD4:		CALL	LFB5C
		INC	L
		JR	NZ,LFAD4
LFADA:		IN	A,(0D9)
		XOR	H
		ADD	A,1
LFADF:		LD	A,(LEA3D)
LFAE2:		PUSH	BC
		LD	B,0
LFAE5:		DJNZ	LFAE5
		DEC	A
		JR	NZ,LFAE5
		POP	BC
		RET	
LFAEC:		LD	A,0FF
		LD	(LEA33),A
		LD	H,074
LFAF3:		IN	A,(0D8)
		RRA	
		JR	C,LFAFF
		DEC	HL
		LD	A,H
		OR	L
		JR	NZ,LFAF3
		JR	LFB6A
LFAFF:		IN	A,(0D9)
		RRA	
		CALL	C,LFB5C
		CALL	NC,LFB60
		CALL	LFADF
		CALL	LFBB0
		LD	A,03F
		OUT	(0D8),A
		CALL	LFB7A
		CALL	LFB2B
		CALL	LFBC5
		JR	NC,LFB48
		CALL	LFB6E
		IN	A,(0D8)
		CPL	
		AND	0BF
		JR	NZ,LFB48
		LD	A,C
		OUT	(0D9),A
		RET	
LFB2B:		LD	L,2
		LD	D,00F
LFB2F:		DEC	DE
		LD	A,D
		OR	E
		RET	Z
		IN	A,(0D8)
		AND	L
		JR	NZ,LFB2F
		IN	A,(0DB)
		LD	C,A
		LD	B,5
LFB3D:		IN	A,(0D8)
		AND	L
		JR	NZ,LFB3D
		IN	A,(0DB)
		DJNZ	LFB3D
		SCF	
		RET	
LFB48:		LD	L,050
LFB4A:		CALL	LFB60
		DEC	L
		JR	Z,LFADF
		IN	A,(0D8)
		BIT	2,A
		JR	NZ,LFB4A
		LD	A,0FF
		OUT	(0D9),A
		JR	LFADF
LFB5C:		LD	A,0A7
		JR	LFB62
LFB60:		LD	A,087
LFB62:		OUT	(0D8),A
		LD	A,(LEA3E)
		CALL	LFAE2
LFB6A:		LD	A,02F
		OUT	(0D8),A
LFB6E:		CALL	LFB87
LFB71:		IN	A,(0D8)
		RRA	
		JR	C,LFB87
		DJNZ	LFB71
		JR	LFB6A
LFB7A:		CALL	LFB87
LFB7D:		IN	A,(0D8)
		AND	081
		XOR	080
		RET	Z
		DJNZ	LFB7D
		RET	
LFB87:		LD	B,018
LFB89:		DJNZ	LFB89
		RET	
LFB8C:		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI	
		LDI
		JP	PE,LFB8C
		RET	
LFBB0:		PUSH	AF
LFBB1:		LD	A,I
		PUSH	AF
		POP	HL
		LD	A,I
		LD	A,L
		PUSH	AF
		POP	HL
		CP	L
		JR	NZ,LFBB1
		LD	(LEA43),A
		DI	
		IN	A,(0E0)
		POP	AF
		RET	
LFBC5:		PUSH	AF
		IN	A,(0E1)
		LD	A,(LEA43)
		BIT	2,A
		JR	Z,LFBD0
		EI
LFBD0:		POP	AF
		RET
LFBD2:		DEFB	0
LFBD3:		DEFB	0,00D
LFBD5:		DEFB	014
LFBD6:		DEFB	085
LFBD7:		DEFB	085
LFBD8:		DEFB	07F,0FF
LFBDA:		DEFB	0
LFBDB:		DEFB	074,0EC
LFBDD:		DEFB	074
		DEFB	0EC
LFBDF:		DEFB	036,1
LFBE1:		DEFB	09A
LFBE2:		DEFB	0B9
LFBE3:		DEFB	099,0BC
LFBE5:		DEFB	048
LFBE6:		DEFB	0
LFBE7:		DEFB	0
LFBE8:		DEFB	03E
LFBE9:		DEFB	00A
LFBEA:		DEFB	080,062
LFBEC:		DEFB	0E0,0FD
LFBEF:		DEFB	0FD,0FD
LFBF0:		DEFB	0
LFBF1:		DEFB	0
LFBF2:		DEFB	0
LFBF3:		DEFB	03E
LFBF4:		DEFB	8
LFBF5:		DEFB	0
LFBF6:		DEFB	02A,0FC,0,0
		DEFB	0,0,040,0
		DEFB	9,0,9,0
		DEFB	5,0,0D6,0
		DEFB	0D5,0F4,03D,0F4
		DEFB	0D6,0F3,0E5,0FB
		DEFB	0,8,080,2
		DEFB	3,038
LFC14:		DEFB	0B9,0E9
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0E5,0FA
		DEFB	0A5,0A5,041,0
		DEFB	071,0FB,0D7,0F9
		DEFB	8,0F7,01A,0EB
LFC2E:		DEFB	0
		DEFM	"INTERCA MZF"
		DEFB	0,0,0,040
		DEFB	075,0,076,0
		DEFB	077,0,078,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0
		DEFM	"GENMON- MZF"
		DEFB	0,0,0,080
		DEFB	079,0,07A,0
		DEFB	07B,0,07C,0
		DEFB	07D,0,07E,0
		DEFB	07F,0,080,0
		DEFB	0
		DEFM	"GENMON- MZF"
		DEFB	1,0,0,023
		DEFB	081,0,082,0
		DEFB	083,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	1
		DEFM	"DIO     MAC"
		DEFB	0,0,0,023
		DEFB	084,0,08E,0
		DEFB	095,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	00B,010,082,03E
		DEFB	05A,077,01C,04F
		DEFB	0DA,08E,0AE,0B8
		DEFB	0F8,06E,055,082
		DEFB	0B2,01D,0AF,02F
		DEFB	0F8,087,073,080
		DEFB	080,080,080,080
		DEFB	080,080,080,080
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		LD	HL,LFBF2
		LD	A,(HL)
		DEC	HL
		CP	(HL)
		JR	Z,LFD02
		LD	(HL),A
		ADD	A,041
		LD	(LFD1A),A
		LD	DE,LFD0E
		CALL	LF8E5
LFD02:		XOR	A
		JP	LFA8D
		DEFB	0,0,0,0
		DEFB	0,0,0,0
LFD0E:		DEFM	"Insert disk "
LFD1A:		DEFM	"A: / Push any ke"
		DEFB	"y"+080
		DEFB	0,0,0,0FF
		DEFB	0FF,0FF,0FF,0FF
		DEFB	0FF,0F3,0FF,0FF
		DEFB	0FF,0FD,0BF,0FC
		DEFB	03F,0FF,0FF,0FE
		DEFB	0FF,0BF,0FF,0FC
		DEFB	0FF,0FE,07F,0FF
		DEFB	0FF,0FF,0FC,07F
		DEFB	0E0,0,0,00F
		DEFB	080,1,0FF,09F
		DEFB	0,020,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	024,0,4,00F
		DEFB	1,0AA,0,07F
		DEFB	0,0C0,0,020
		DEFB	0,4,0
		CALL	LFB5C
		LD	A,(LFBF2)
		LD	BC,LEA37
		ADD	A,C
		LD	C,A
		LD	A,(BC)
		BIT	2,A
		RET	Z
		IN	A,(0D9)
		PUSH	AF
		CALL	LFB5C
		POP	AF
		OUT	(0D9),A
		RET
		DEFB	0,0,0,0
		DEFB	024,0,4,00F
		DEFB	1,0AA,0,07F
		DEFB	0,0C0,0,020
		DEFB	0,4,0
		CALL	LFB60
		LD	A,(LFBF2)
		LD	BC,LEA37
		ADD	A,C
		LD	C,A
		LD	A,(BC)
		BIT	2,A
		RET	Z
		IN	A,(0D9)
		PUSH	AF
		CALL	LFB60
		POP	AF
		OUT	(0D9),A
		RET
		DEFB	0,0,0,0
		DEFB	024
LFDD0:		DEFB	0
LFDD1:		DEFB	4,00F
		DEFB	1,0AA,0,07F
		DEFB	0,0C0,0,020
		DEFB	0,4,0,024
		DEFB	0,3,7,0
		DEFB	0A1,0,03F,0
		DEFB	0C0,0,010,0
		DEFB	4,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0,0
		DEFB	0,0,0
LFDFE:		DEFB	0F4
LFDFF:		IN	A,(0D1)
		AND	081
		JP	Z,0CD08
		IN	A,(0D2)
		AND	020
		JR	Z,LFDFF
		EXX
		OUT	(C),E
		INC	E
		EXX
		LD	A,049
LFE13:		DEC	A
		JR	NZ,LFE13
		IN	A,(0D2)
		AND	020
		ADD	A,0F0
		LD	A,E
		RET
		DI
		PUSH	IY
		EXX
		PUSH	BC
		PUSH	DE
		LD	BC,06CF
		EXX
		PUSH	BC
		PUSH	DE
		PUSH	HL
		LD	(0CD0C),SP
		LD	A,0F8
		OUT	(0D0),A
LFE33:		IN	A,(0D2)
		AND	010
		JR	NZ,LFE49
		IN	A,(0D1)
		AND	081
		JP	Z,0CD08
		LD	A,6
		OUT	(0D3),A
		INC	A
		OUT	(0D3),A
		JR	LFE33
LFE49:		LD	BC,0
LFE4C:		DEC	C
		JR	NZ,LFE4C
		DJNZ	LFE4C
		LD	A,E
		OR	A
		JP	NZ,0CD50
LFE56:		LD	B,0
LFE58:		CALL	0CC35
		JR	C,LFE56
		DJNZ	LFE58
		LD	HL,014
		LD	A,D
		CP	0CC
		JR	NZ,LFE68
		ADD	HL,HL
LFE68:		LD	H,L
LFE69:		CALL	0CC35
		JR	C,LFE74
		LD	A,H
		CP	L
		JR	Z,LFE69
		JR	LFE56
LFE74:		DEC	H
		JR	NZ,LFE69
		LD	H,L
LFE78:		CALL	0CC35
		JR	C,LFE56
		DEC	H
		JR	NZ,LFE78
		CALL	0CC35
		POP	HL
		POP	DE
		POP	BC
		PUSH	BC
		PUSH	DE
		PUSH	HL
		LD	IY,0
		CALL	0CC35
LFE90:		CALL	0CC28
		LD	(HL),A
		INC	HL
		DEC	BC
		LD	A,B
		OR	C
		JR	NZ,LFE90
		PUSH	IY
		POP	BC
		CALL	0CC28
		CP	B
		JR	NZ,LFEA9
		CALL	0CC28
		SUB	C
		JR	Z,LFEAC
LFEA9:		LD	A,1
LFEAB:		SCF
LFEAC:		LD	SP,(0CD0C)
		PUSH	AF
		LD	A,6
		OUT	(0D3),A
		INC	A
		OUT	(0D3),A
		POP	AF
		POP	HL
		POP	DE
		POP	BC
		EXX
		OUT	(C),(HL)
		POP	DE
		POP	BC
		EXX
		POP	IY
		EI
		RET
LFEC6:		LD	A,2
		JR	LFEAB
		DEFB	0,0,042,09D
		DEFB	092,0A1,0A9,020
		DEFB	021,00D,045,09D
		DEFB	09D,0B7,09D,020
		DEFB	021,00D
		PUSH	BC
		LD	B,03C
LFEDF:		DJNZ	LFEDF
		POP	BC
		RET
		PUSH	AF
		LD	A,3
		OUT	(0D2),A
		CALL	0CD1E
		CALL	C,0CD1E
		LD	A,0
		OUT	(0D2),A
		CALL	0CD1E
		CALL	C,0CD1E
		IN	A,(0D1)
		AND	081
		JR	Z,LFEC6
		POP	AF
		RET
		SCF
LFF01:		RL	A
		CALL	0CD25
		RET	Z
		JR	NC,LFF01
		INC	IY
		CCF
		JR	LFF01
		LD	HL,0157C
		LD	A,D
		CP	0CC
		PUSH	AF
		JR	NZ,LFF18
		ADD	HL,HL
LFF18:		OR	A
LFF19:		CALL	0CD25
		DEC	HL
		LD	A,H
		OR	L
		JR	NZ,LFF19
		LD	HL,01414
		POP	AF
		JR	NZ,LFF28
		ADD	HL,HL
LFF28:		SCF
LFF29:		LD	H,L
LFF2A:		CALL	0CD25
		DEC	H
		JR	NZ,LFF2A
		CCF
		JR	NC,LFF29
		CALL	0CD25
		POP	HL
		POP	DE
		POP	BC
		PUSH	BC
		PUSH	DE
		PUSH	HL
		LD	IY,0
		CALL	0CD25
LFF43:		LD	A,(HL)
		CALL	0CD42
		INC	HL
		DEC	BC
		LD	A,B
		OR	C
		JR	NZ,LFF43
		PUSH	IY
		POP	BC
		LD	A,B
		CALL	0CD42
		LD	A,C
		CALL	0CD42
		CALL	0CD25
		OR	A
		JP	0CCEE
LFF5F:		LD	HL,0875
		LD	(1),HL
		LD	HL,03340
		LD	DE,0B000
		LD	BC,01DA1
		LDIR
		JP	011F0
		LD	B,L
		LD	B,(HL)
		LD	B,D
		ADD	HL,BC
		JR	NC,LFFAE-3
		INC	(HL)
		INC	L
		JR	NC,LFFAE
		JR	C,LFF9E
		NOP
		CPIR
		JR	NZ,LFF8A
		SCF
		SBC	HL,DE
		LD	A,L
		ADD	A,061
LFF8A:		POP	DE
		POP	HL
		POP	BC
		RET
		LD	HL,(0BF98)
		LD	A,H
		OR	L
		JR	NZ,LFF98
		LD	HL,(01104)
LFF98:		EX	DE,HL
		LD	HL,(0BF9A)
		LD	A,H
		OR	L
LFF9E:		JR	Z,LFFA6
		SBC	HL,DE
		INC	HL
		LD	(01102),HL
LFFA6:		LD	BC,(01102)
		LD	HL,(0BF9C)
		LD	A,H
LFFAE:		OR	L
		JR	Z,LFFB4
		LD	(01106),HL
LFFB4:		PUSH	DE
		LD	HL,010F0
		LD	BC,080
		LD	DE,0CCFF
		CALL	0CC60
		POP	HL
		JR	C,LFF5F-2
		CALL	0CBB1
		LD	D,A
		SBC	A,L
		AND	(HL)
		SUB	(HL)
		AND	(HL)
		OR	B
		SUB	A
		JR	NZ,LFFD0
LFFD0:		EX	DE,HL
		LD	HL,010F1
		CALL	0CBA2
		EX	DE,HL
		LD	BC,(01102)
		LD	DE,0FF
		CALL	0CC60
		RET	NC
		JP	0CB9F
		LD	E,1
LFFE8:		CALL	0CC35
		JR	NC,LFFEF
		INC	IY
LFFEF:		RL	E
		JR	NC,LFFE8
		IN	A,(0D1)
		AND	081
		JR	Z,3
		IN	A,(0D2)
		AND	020
		JR	NZ,7
;
;
