.MODEL SMALL
.STACK
.DATA
    str     db 'original character --> $'
    str1    db 'converted character --> $'
    oaod    db 0ah,0dh,'$'
    NO1     DB 'ABCDEFGHIJK$'
    no2     db 12 dup (?)
.CODE
    MOV AX,@DATA
    MOV DS,AX
;
    lea dx,str
    mov ah,09h
    int 21h
;
    lea dx,NO1
    mov ah,09h
    int 21h
;
    lea dx,oaod
    mov ah,09h
    int 21h
;
    lea dx,str1
    mov ah,09h
    int 21h
;
    mov ax, offset no1
    mov cx, offset no2
    sub cx,ax
;
    xor bx,bx
    xor si,si
lop: mov dl,no1[bx]
    or dl,00100000b
    mov no2[si],dl
    inc bx
    inc si
    loop lop
;
    lea  dx,no2
    mov  ah,09h
    int  21h
;
    lea  dx,oaod
    mov ah,09h
    int 21h
;
    MOV AH,4CH
    INT 21H
END