.model tiny
.code
.386
ORG 100h

START:
mov ah,0 ;ввод символа
int 16h

cmp al,1Bh ;Esc
jz short Esc

cmp al,0Dh ;Enter
jz short vivod

cmp al,'0' ; если введен неверный символ <0
jl short er
cmp al,'9' ; если введен неверный символ >9
ja short er


mov [Sumbol],al ;сохронить символ для его вывода

;Преобразовать числа
mov cl,al
xor ah,ah
mov al,[AL_]
mov bx,10
sub cl,'0'
mul bx
add ax,cx
cmp ax,100
jg short er

mov [AL_],al

mov dl,[Sumbol] ;вывести символ
mov ah,2
int 21h
jmp short START

er: ;не выводить символ
mov dl,7 ;сигнал динамика
mov ah,2
int 21h
jmp short START

vivod:
;перевод строки
mov ah,9
lea dx,perevod
int 21h

;получить номер строки
xor bx,bx
mov bl,[AL_]
test bl,bl ;если 0
jz short er

;получить адрес строки
dec bl
shl bl,1
mov dx,mes[bx]
mov ah,9
int 21h ;вывожу строку

mov [AL_],0 ;удалить старый номер строки

;перевод строки
mov ah,9
lea dx,perevod
int 21h
jmp short START

exit:
xor ax,ax
int 16h ;жду нажатия на клавиатуру

Esc:
ret ;завершить программу
;*******************
perevod db 13,10,'$'
AL_ db 0
Sumbol db ?

mes dw a1,a2,a3,a4,a5;адреса названий
a1 db 'Один Ћ¤Ё*$'
a2 db 'Два „ў*$'
a3 db 'Три ’аЁ$'
a4 db 'Четыре —ҐвлаҐ$'
a5 db 'Пять Џпвм$'
;******************

end start