mvi	a,0d0h	;Выдача сигнала разрешения работы дисплея 
			; и включения битом 5 клавиш 8...f
	out	2
cont	in	0	;читам код
	cpi	0ffh	;если ff, то ничего не нажато
	jz	cont	;ждем новый код

			;ищем бит 0
	mvi	b,8	;база кодов линейки (8-f)
shift	rrc		;сдвинем на 1 бит, мл уходит в С
	jnc	analize	;0 - нашли
	inr	b	;нет увеличиваем код клавиши
	jmp	shift	;сдвигаем дальше

			;проанализируем на четность
analize	lxi	h,83f8h	;засылка в пару HL адреса старшего индикатора
	mov	a,b	;код клавиши
	rrc		;четность определяется младшим битом
	jc	nechet	;1 - число нечетное

			;0 - четное
	mvi	a,0	;погасим 7 первых
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	a,00111111b	;0 в последний
	mov	m,a
	jmp	cont	;на сканирование клавиатуры

			;нечет
nechet	mvi	a,0	;погасим 3 первых
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	m,a
	inx	h
	mov	a,01110110b	;H
	mov	m,a
	inx	h
	mov	a,01111100b	;Е
	mov	m,a
	inx	h
	mov	a,01100110b	;Ч
	mov	m,a
	inx	h
	mov	a,01111100b	;Е
	mov	m,a
	inx	h
	mov	a,01111000b	;t
	mov	m,a
	jmp	cont		;на сканирование клавиатуры

	end