ASEMBLY 4

.model small
.data

msg1 db  0dh,0ah,"Enter a character:  $"
msg2 db  0dh,0ah,"Lower Case:  $"

x db ?

main proc
    mov ax,@data
    mov ds,ax

     mov ah,9
    lea dx,msg1
    int 21h

    mov ah,1
    int 21h
    mov x,al

    add x,32

    mov ah,9
    lea dx,msg2
    int 21h

    mov ah,2
    mov dl,x
    int 21h

    main endp
end main