ORG	#6000

		LD	HL,#3D00		; Адрес шрифта ПЗУ.
		LD	DE,#8000		; Здесь будет шрифт 6*8.
		LD	BC,#300		; Длина шрифта.

NEXT_B	LD	A,D		; Все символы разделяются на
		CP	#82		; две группы:
		JR	Z,NO_IZM		; 1) #2F-#5F
		CP	#80		; 2) #20-#2E,#60-#7F
		JR	NZ,IZM_1 		; Преобразование символов
		LD	A,E		; осуществляется по-разному,
		CP	15*8		; в зависимости от того, к
		JR	C,NO_IZM		; какой группе они принадлежат.

IZM_1	LD	A,(HL)		; Преобразование символов
		PUSH	BC		; первой группы.
		PUSH	AF
		AND	%00001111
		RLCA
		LD	B,A
		POP	AF
		AND	%11110000
		OR	B
		POP	BC
		JR	BYTE_OK

NO_IZM	LD	A,(HL)		; Преобразование символов
BYTE_OK	RLCA			; второй группы.
		AND	%11111100
		LD	(DE),A
		INC	HL
		INC	DE
		DEC	BC
		LD	A,B
		OR	C
		JR	NZ,NEXT_B

; Шрифт 6*8 подготовлен, теперь печатаем
; все полученные символы:

		LD	HL,#8000-#100
		LD	(#5C36),HL
		CALL	3435
		LD	A,2
		CALL	5633
		LD	A," "
PRINT_S	PUSH	AF
		RST	16
		POP	AF
		INC	A
		CP	128
		JR	NZ,PRINT_S
		RET
