Output you Input in Assembly

].model small
.stack
.data
mymsg1 db 'Enter First Name:$'
mymsg2 db 'Enter Lastname :$'
mymsg3 db 'hi,$'
myvar label byte
varlen db 20
actlen db ?
varptr db 20 dup(''),'$'
.code

mov ah,@data
mov ds,ax
mov ah,0ah
mov dx,offset mymsg1
int 21h

mov bh,00h
mov bl,actlen
mov varptr[bx],'$'

mov ah,09h
mov dx,offset mymsg2
int 21h


mov ah,09h
mov dx,offset mymsg3
int 21h

mov ah,4ch
int 21h
end