jmp start

mess db,0ah,0dh,'Enter 5 character:$'
mess1 db,0ah,0dh,'You enter:$'

bk db ?
ck db ?
dk db ?
ek db ?

start:

mov ah,09h
lea dx,mess
int 21h

mov ah,07h
int 21h
mov ah,02h
mob bl,al
mov dl,bl
int 21h

mov ah,07h
int 21h
mov ah,02h
mov bk,al
mov dl,bk
int 21h

mov ah,07h
int 21h
mov ah,02h
mov ck,al
mov dl,ck
int 21h

mov ah,07h
int 21h
mov ah,02h
mov dk,al
mov dl,dk
int 21h

mov ah,07h
int 21h
mov ah,02h
mov ek,al
mov dl,ek
int 21h

mov ah,09h
lea dx,mess1
int 21h
mov ah,02h
mov dl,ek
int 21h

mov ah,02h
mov dl,dk
int 21h

mov ah,02h
mov dl,ck
int 21h

mov ah,02h
mov dl,bk
int 21h

mov ah,02h
mov dl,bl
int 21h
int 20h